//将字符串转为int或者 floatprocedure TRtlForm.Button3Click(Sender: TObject); var i:Integer; begin val('123',i); ShowMessage(IntToStr(i)); end;