Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi XOR-Resultat als String

**Klaus01**

Das würde auch gehen:

Delphi-Quellcode:

			result:='';

for i := 1 to x do

  result := result+IntToHex( ( (ord(Key1[x]) xor ord(Key2[x]) ),2);

Grüße
Klaus

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.771 Beiträge Delphi 10.4 Sydney	#12 Re: XOR-Resultat als String 31. Okt 2006, 19:16 Das würde auch gehen: markieren Delphi-Quellcode: result:=''; for i := 1 to x do result := result+IntToHex( ( (ord(Key1[x]) xor ord(Key2[x]) ),2); Grüße Klaus Klaus
	Zitat