MD5.pas einbinden

[freak4fun]

Hallo,
ich hab die MD5.pas runtergeladen und angeguckt. Hab aber keine Funktion gefunden, bei der man nen String eingibt und nen hashWert zurückbekommt. Gibt es sowas überhaubt?
Kann mir da mal einer nen Tipp geben, wie ich jetzt den hashWert erstellen aknn?

mfg
freak

[teebee]

HashString := MD5Print(MD5String(Pass)); MD5String macht aus dem String den Digest, MD5Print liefert den Digest als String zurück.

Gruß, teebee

[Tonic1024]

Hi

Password:=MD5DigestToStr(MD5String(EdtPass.Text)) Gibt den Wert des Verschlüsselten Passwortes als String zurück...


MfG

Tonic

[freak4fun]

Wie sieht das dann aus?

Ist der MD5Diggest ein Array?!

mfg
freak

[Tonic1024]

nein, woraus schliesst du das??

schau mal da: Sehr ausführlich...MD5 Wikipedia

[Edit]

okay... noch was zum anfassen:

MD5 liefert nicht eine verschlüsselung im eigentlichen Sinne, da die Information selbst nicht in dem Hash enthalten ist. Musst du dir etwa so vorstellen wie eine Prüfsumme, die aber (nahezu) eindeutig ist.

Beispiel:

Passwort: 'test'
Hash: 098F6BCD4621D373CADE4E832627B4F6
Passwort: 'Delphi Praxis Forever'
Hash: 4DE1EE7EF636EC79A926172553402402
Passwort: ''
Hash: D41D8CD98F00B204E9800998ECF8427E

Der Witz daran ist, dass du auch seitenlange Texte eingeben kannst und das resultat sind immer solche 32 byte.

[/Edit]

MfG Tonic

[freak4fun]

danke ich schaue es mir an

[teebee]

Zitat von freak4fun:

Ist der MD5Diggest ein Array?!

Ja. Wenn Du Dir den Quelltext mal anschaust, siehst Du, dass der Digest (der eigentliche Hash als Bytefolge) wie folgt deklariert ist:   MD5Digest = array[0..15] of byte; @Tonic1024: Es sind zwar 32 Stellen aber nur 16 Byte

Gruß, teebee

[Tonic1024]

bei Stringausgabe (darüber sprachen wir grade) wird die 32 stellige Hex-Zahl in einen 32 Zeichen langen Text umgewandelt, der dann natürlich etwas länger ist als 16 Byte...

Ansonsten hast natürlich recht.

[The-X]

was daran liegt, das der in einen String umbegandelte Hash in 16 * 2 Byte, nämlich in der hexadezimalen Darstellung ausgegeben wird