各位先進大家好： 用那個函數可把字串轉成數字，且不會當掉？ s1,s2 : string; i1 :integer; s1 := 'txx1'; i1 := strtoint(s1); //會當掉 s2 := 't之'; i1 := strtoint(s1); //會當掉 如何是好？

var
  s1: string;
  i1: integer;
begin
  s1 := 'txx1';
  try
    i1 := strtoint(s1);
  except
    ShowMessage('不合法的數字');
  end;
end;

--- 這次沒買到 cd-pro2 實在很 ...

StrToIntDef(Str,Defaut Value)