UTF8ToAnsi (gemodded) und ANSI/UTF8 gemischt

[sECuRE]

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