Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
 
Delphi 12 Athens
 
#2

Re: Hilfe bei XOR-"Verschlüsselung"

  Alt 17. Okt 2005, 16:34
Zitat von Pseudemys Nelsoni:
Wieso wird mir beim ShowMessage "j" angezeigt, statt "h"?
Du musst die Reihenfolge der Auswertung umdrehen
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  C: Char;
begin
  C := 'h';
  C := Chr(((Ord(C) xor 1) + 1) + 24);
  C := Chr(((Ord(C) - 24) - 1) xor 1);
  showmessage(C);
end;
Denke ich

......
Daniel Lizbeth
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat