I have a routine which returns a text md5sum given a stream. This can be
easily hacked to return in binary instead.

----- Original Message -----
From: "Donovan J. Edye" <[EMAIL PROTECTED]>
To: "Multiple recipients of list delphi" <[EMAIL PROTECTED]>
Sent: Wednesday, October 18, 2000 4:33 PM
Subject: RE: [DUG]: [Q] Convert a given string to a magic number....


> N,
>
> > as the input is unlimited and the output restricted)...
>
> Hence my idea to MD5 it as that gives you a fixed result string from an
any
> length input string.....
>
> > language 'Neven wrote an email..'
>
> It could be any string. So as per your example or 'My dog spot', '123
runs',
> '132', 'Yet another string'
>
> ------------------------------------------------------------------------
> --Donovan [[EMAIL PROTECTED]]
> Donovan J. Edye [www.edye.wattle.id.au]
> Namadgi Systems, Delphi Developer [www.namsys.com.au]
> Voice: +61 2 6285-3460 Fax: +61 2 6285-3459
> TVisualBasic = Class(None);
> Heard just before the 'Big Bang': "...Uh Oh...."
> ------------------------------------------------------------------------
> GXExplorer [http://www.gxexplorer.org] Freeware Windows Explorer
> replacement. Also includes freeware delphi windows explorer components.
> ------------------------------------------------------------------------
>
>
> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> Behalf Of Neven MacEwan
> Sent: Wednesday, 18 October 2000 14:28
> To: Multiple recipients of list delphi
> Subject: Re: [DUG]: [Q] Convert a given string to a magic number....
>
>
> D
>
> Correct answer is No..you cannot do it (as the input is unlimited and the
> output restricted)...
> however and more clues re the input is it acii a..z or language 'Neven
wrote
> an email..'
>
> Neven
>
> ----- Original Message -----
> From: Donovan J. Edye <[EMAIL PROTECTED]>
> To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
> Sent: Wednesday, 18 October 2000 16:14
> Subject: RE: [DUG]: [Q] Convert a given string to a magic number....
>
>
> > N,
> >
> > - String can be any length
> > - Result "number" must "fit" into a longword (ie unsigned 32 bit number)
> >
> > ------------------------------------------------------------------------
> > --Donovan [[EMAIL PROTECTED]]
> > Donovan J. Edye [www.edye.wattle.id.au]
> > Namadgi Systems, Delphi Developer [www.namsys.com.au]
> > Voice: +61 2 6285-3460 Fax: +61 2 6285-3459
> > TVisualBasic = Class(None);
> > Heard just before the 'Big Bang': "...Uh Oh...."
> > ------------------------------------------------------------------------
> > GXExplorer [http://www.gxexplorer.org] Freeware Windows Explorer
> > replacement. Also includes freeware delphi windows explorer components.
> > ------------------------------------------------------------------------
> >
> >
> > -----Original Message-----
> > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> > Behalf Of Neven MacEwan
> > Sent: Wednesday, 18 October 2000 13:48
> > To: Multiple recipients of list delphi
> > Subject: Re: [DUG]: [Q] Convert a given string to a magic number....
> >
> >
> > D,
> >
> > May be a bit obvoius but why hash? Any restrictions on max input
> > length/number size
> >
> > Neven
> > ----- Original Message -----
> > From: Donovan J. Edye <[EMAIL PROTECTED]>
> > To: Multiple recipients of list delphi <[EMAIL PROTECTED]>
> > Sent: Wednesday, 18 October 2000 15:43
> > Subject: [DUG]: [Q] Convert a given string to a magic number....
> >
> >
> > > G'Day,
> > >
> > > Another obscure one. Has anyone got any suggestins on how to turn an
> > > arbitrary string into a unique number?
> > >
> > > Eg 'ab' = 123
> > >     'ba' = 456
> > >     'abc' = 1234
> > >
> > > etc.
> > >
> > > My first thought was
> > >
> > > Original String --> Apply MD5 Hash --> StringOfFixed length -->
> > > MagicStringToNoEncoding = Desired Result
> > >
> >
> ------------------------------------------------------------------------
> > > --Donovan [[EMAIL PROTECTED]]
> > > Donovan J. Edye [www.edye.wattle.id.au]
> > > Namadgi Systems, Delphi Developer [www.namsys.com.au]
> > > Voice: +61 2 6285-3460 Fax: +61 2 6285-3459
> > > TVisualBasic = Class(None);
> > > Heard just before the 'Big Bang': "...Uh Oh...."
> >
> ------------------------------------------------------------------------
> > > GXExplorer [http://www.gxexplorer.org] Freeware Windows Explorer
> > > replacement. Also includes freeware delphi windows explorer
components.
> >
> ------------------------------------------------------------------------
> > >
> >
>
> --------------------------------------------------------------------------
> > -
> > >     New Zealand Delphi Users group - Delphi List -
[EMAIL PROTECTED]
> > >                   Website: http://www.delphi.org.nz
> > > To UnSub, send email to: [EMAIL PROTECTED]
> > > with body of "unsubscribe delphi"
> > >
> >
>
> --------------------------------------------------------------------------
> -
> >     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> >                   Website: http://www.delphi.org.nz
> > To UnSub, send email to: [EMAIL PROTECTED]
> > with body of "unsubscribe delphi"
> >
>
> --------------------------------------------------------------------------
> -
> >     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
> >                   Website: http://www.delphi.org.nz
> > To UnSub, send email to: [EMAIL PROTECTED]
> > with body of "unsubscribe delphi"
> >
>
> --------------------------------------------------------------------------
-
>     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>
> --------------------------------------------------------------------------
-
>     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> To UnSub, send email to: [EMAIL PROTECTED]
> with body of "unsubscribe delphi"
>

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED] 
with body of "unsubscribe delphi"

Reply via email to