VarIsNumeric...
Ja, wie der Name schon sagt ... einfach prüfen, ob im Variant ein nummerischer Wert drin steckt
Delphi-Quellcode:
Result := TryStrToFloat(String(AValue));
// aber TryStrToFloat kennt dein Delphi wohl nicht
var
E: Integer;
F: Single;
Val(String(AValue), F, E);
Result := E = 0;
[edit]
halt nee, String() könnte auch noch eine
Exception auslösen
Delphi-Quellcode:
try
StrToFloat(String(AValue));
Result := True;
except
Result := False;
end;