Forum: Object-Pascal / Delphi-Language
by himitsu,
25. Feb 2009
ich sag's mal so, das rechnet genauso wie alles andere hier ... und nirgendwo wird UTF beachtet. :angel:
klar, aber so funktioniert es auch, wo UnicodeString noch nicht bekannt ist :angel2:
Forum: Object-Pascal / Delphi-Language
by himitsu,
25. Feb 2009
Dann mußt du natürlich auch PAnsiChar verwenden :zwinker:
function ConvertStr(const Input: AnsiString): AnsiString; Overload;
var
i: Integer;
begin
for i:=1 to Length(Input) do
//Result := AnsiChar(Ord(Input) xor $FF);
Result := AnsiChar(not Ord(Input));