Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi MD5-Hash wirft Integer-Überlauf Exception (EIntOverflow)

Du könntest auch folgendes mal probieren...

Delphi-Quellcode:

			procedure FF(var a: DWORD; b, c, d, x: DWORD; s: BYTE; ac: DWORD);

begin

  a:=a+F(b, c, d) + x + ac;

  rot(a, s);

  a:=a+b;

end;

Damit lässt sich meine MD5 zumindest compilen,auch mit den genannten Prüfroutinen..

0x802b (Gast) n/a Beiträge	#7 Re: MD5-Hash wirft Integer-Überlauf Exception (EIntOverflow) 23. Jan 2008, 12:11 Du könntest auch folgendes mal probieren... markieren Delphi-Quellcode: procedure FF(var a: DWORD; b, c, d, x: DWORD; s: BYTE; ac: DWORD); begin a:=a+F(b, c, d) + x + ac; rot(a, s); a:=a+b; end; Damit lässt sich meine MD5 zumindest compilen,auch mit den genannten Prüfroutinen..
	Zitat