Hallo,
ich habe das Problem, dass Chr(xx) unter Delphi 2009 etwas anderes liefert als Chr(xx) unter Delphi 2007.
Delphi-Quellcode:
var
c : AnsiChar;
begin
c := AnsiChar(Chr(224));
ShowMessage(c);
end;
Gibt es eine Möglichkeit unter Delphi 2009 den gleichen Wert zu einer Zahl zu generieren, die Chr() in Delphi 2007 zurückgegeben hat?
Das eigentliche Problem das ich habe sind Daten die mit der Funktion:
Delphi-Quellcode:
function BinaryStrToHexStr(aBinary : AnsiString) : AnsiString;
var
i : Integer;
begin
Result := '';
for i := 1 to Length(aBinary) do
Result := Result + IntToHex(Ord(aBinary[i]), 2);
end;
geschrieben, und nun mit der Funktion:
Delphi-Quellcode:
function HexStrToBinaryStr(aHex : AnsiString) : AnsiString;
var
i : Integer;
begin
Result := '';
for i := 1 to (Length(aHex) div 2) do begin
Result := Result + Chr(:= StrToint('$' + Copy(aHex,i*2-1,2)));
end;
end;
gelesen werden sollen. Es handelt sich um verschlüsselte Texte.