in der
Unit IdGlobal gibt es die Funktion IsNumeric(c: char)
mir dieser kannst du Zeichen für Zeichen einer Zeile druchgehen und überprüfen.
mit try except würde das so gehen
try
//umwandeln der Zeile von String in Integer
StrToInt(Zeile);
except
//Hier weitermachen wenn es nicht geht (d.h. Zeile ist keine Zahl)
end;
IsNumeric ist aber um einiges schöner!