Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
27. Nov 2014
Testen sollte man immer...
Ich habe mir gestern Abend auch so manchen Artikel hier durchgelesen...
Bei vielen Statements ist es nur schade , dass diese z.T. Hilfesuchende abschrecken, aus Furcht sich zum Deppen zu machen, wenn sie mit Antworten konfrontiert werden, die des Öfteren mal verhöhnend oder sogar beleidigend sind. :? Da könnte man eher mal die Schn... halten... :wink:
Daher...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
27. Nov 2014
Moin, moin,
da das Thema ja noch nicht abgefischt zu sein scheint, möchte ich noch etwas ergänzen:
Die DelphiMD5.pas fand ich als Quellcode im Internet, dann Code kopiert und als .pas getestet.
Der Vollständigkeit halber möchte ich jetzt jedoch noch kurz die von mir auf anraten von Klaus01 modifizierte Datei MD5.pas mit den zusätzlich von mir eingefügten Compiler-Schaltern zum Download und...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
So, ich habe die MD5 Datei (MD5.pas) modifiziert, wie von Klaus01 vorgeschlagen und... es funzt. Vielen Dank.
Ich hatte nicht berücksichtigt, dass in XE4 ein String ein UniCodeString ist.
Die Änderung in:
MD5Update(Context, PChar(M), Length(M) * sizeOf(Char));
erziehlt das gewünschte Ergebnis.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
Ich werde die Dateien wohl entsprechend anpassen müssen. (Komme ich heute wohl nicht mehr zu...)
Wenn ich zu einem Ergebnis gekommen bin, werde ich es hier posten.
Zunächst erstmal vielen Dank für alle Vorschläge.
Bis denne...
Humbuck
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
Das könntes es sein...
Tja, lieber Neutral General, mit den von dir verwendeten Strings erhalte ich ebenfalls unterschiedliche Hashes...
Hier mein Code zur Umsetzung:
type
TBenutzer = record
User : string;
Rechte : Packed Array OF Boolean;
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
Verwendet / getestet habe ich beide Dateien. Die MD5.pas habe ich modifizieren müssen, da permanent ein Integer-Überlauf eine Fehlermeldung erzeugte...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
Also erstmal danke für die schnellen Reaktionen...
Getestet habe ich die benannten Dateien mit XE4.
Das Resultat ist auf jeden Fall nicht immer eindeutig...
Beispiel:
dasisteinstringmittext = A5DCD7F958FBEFD92D0DDD784BE3E738
dasisteinstringmimmext = A5DCD7F958FBEFD92D0DDD784BE3E738
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by humbuck,
26. Nov 2014
Hi,
Dieser Artikel betrifft die im Internet bereitgestellten Codes der DelphiMD5.pas und MD5.pas.
Vielleicht kann jemand meine folgende Erfahrung mit den o.a. Codes bestätigen:
Beim Testen der Codes fällt auf, dass bei einem String, zu dem ein Hash-Code erstellt wird, zwar die Veränderung der String-Länge für die Veränderung des Hashes sorgt, jedoch:
NUR die ersten 5 Zeichen des...