Meinst etwa so?:
Delphi-Quellcode:
function MyStrToHex(const s: TStringBuilder): TStringBuilder;
var
i: Integer;
begin
Result := TStringBuilder.Create;
for i := 0 to s.Length - 1 do
Result.Append(IntToHex(Ord(s.Chars[i]), 4));
end;
SB := TStringBuilder.Create;
SB.Append('Tᾯest');
SB := MyStrToHex(SB);
Self.Caption := SB.ToString;
SB.Free;
Aber damit scheint der Code nicht schneller, sondern eher langsamer geworden zu sein.
Außerdem mache ich mir Sorgen: Muss die in der Funktion MyStrToHex in Result erzeugte StringBuilder-Instanz nicht irgendwie freigegeben werden?