Hi,
wenn er es jedoch einem Char zuweisen möchte, bringt deine Variante auch nichts.
Delphi-Quellcode:
function GetFirstCharDef(const S: String; Default: Char = #0): Char;
begin
if S = '' then
Result := Default
else
Result := S[1];
end;
//im Code
MyChar := GetFirstCharDef(MyStringList[I]);
Mfg
FAlter