Ach, so einfach
Ich wusste doch, dass es einen Befehl dafür gibt ^^
Vielen Dank - so sieht mein Programm viel ordentlicher aus !
Thomas
Edit:
Zum "Schachteln" habe ich mich nicht so deutlich ausgedrückt, ich meinte soetwas:
Delphi-Quellcode:
if (a<>'') and (isnumeric(a)) and qx(a) then begin
s:= a...
end;
Allerdings benütigt die Funktion "qx" schon einen numerischen nichtleeren String "a", ansonsten Fehler.
Daher muss ich machen:
Delphi-Quellcode:
if (a<>'') and isnumeric(a) then begin
if qx(a) then s:=...
end;
so in der Art...