Zitat von
SirThornberry:
Delphi-Quellcode:
if Ord(txt[x]) > 255 then
begin
txt[x] := Chr( Ord(txt[x]) - 256 );
end;
auch bei neuen Delphiversionen nicht nötig ist da eben durch den Cast auf Byte sichergestellt wird das ein Überlauf statt findet und somit niemals ein Wert größer 255 entsteht.
In diesen Codeabschnitt ist kein Cast und somit kann bei D2009 Ord() einen Wert > 255 liefern.
Zitat von
SirThornberry:
[Edit]@mkinzler: und müsste es nicht wenn dann "mod 256" heißen?[/Edit]
Ja sollte es.