IsInteger..

Du kan bruge den gode gamle "Val" kommando

Fra Delphi's egen hjælp:
<SNIP>
uses Dialogs;
var

  I, Code: Integer;
begin
  { Get text from TEdit control }
  Val(Edit1.Text, I, Code);
  { Error during conversion to integer? }
  if Code <> 0 then
    MessageDlg('Error at position: ' + IntToStr(Code), mtWarning, [mbOk], 0);
  else
    Canvas.TextOut(10, 10, 'Value = ' + IntToStr(I));

end;
</SNIP>

function IsInteger(S: String): Boolean;
var
  I, Code: Integer;
begin
  Val(S, I, Code);
  Result := Code = 0;
end;

Svar!

pellelil: Dit svar var sikkert ganske glimrende, men hermandsens var lidt mere overskuelig!!...
Men tak for hjælpen begge to!!