Hi,
die Funktion bricht leider nicht mit einer
Exception ab, stattdessen nutze ich nun folgenden Code zum Überprüfen:
Delphi-Quellcode:
function ConvertString(SIn:string):string;
var SConverted:=string;
begin
SConverted:=UTF8ToAnsi(SIn);
if (length(SConverted) = 0) then
SConverted:=SIn;
result:=SConverted;
end;
Danke für den Denkanstoss.
cu