Hallo Delphianer,
als erstes habe ich mal mein Delphi angepasst. Ich habe etwas neuers als D7. Sorry hate ich gar nicht mehr im Auge.
Das ist kein UTF-8. Das ist UCS-2LE oder UTF-16LE (kann man am Beispiel nicht erkennen, ist den meisten Usern aber auch egal), das wird gerne falsch als
Unicode bezeichnet. Bei Delphi ab Version 2009 geht so etwas:
Delphi-Quellcode:
var
bs: TByteStream;
sl: TStringList;
begin
bs := TByteStream.Create(FieldByName('bla').AsBytes);
try
sl := TStringList.Create();
try
sl.LoadFoomStream(bs, TEncoding.Unicode);
// tu was
finally
sl.Free();
end;
finally
bs.Free();
end;
end;
Das ganze funktioniert leider nicht so. Ich habe bei tu was eingetragehn Hstring := SL[0]. Hier kommen nur die ersten 6 Stellen raus und nicht mehr. Das ganze fängt am mit 050301. Nur das wird angezeigt. Bei IBExpert funktioniert es komplett. Es ist dort noch bedeutend mehr an Daten vorhanden
Hat eventuell noch jemand für micht ein Tip ??