val

//将字符串转为int或者 float
procedure TRtlForm.Button3Click(Sender: TObject);
var
  i:Integer;
begin

  val('123',i);
  ShowMessage(IntToStr(i));


end;