Question

delphi中怎么判断一个字符串是不是数字？

若以下回答无法解决问题，邀请你更新回答

Answer 1

No.1var I: Integer;begin if TryStrToInt(Edit1.Text, I) then ShowMessage('yes') else ShowMessage('no');end;var R: Extended;begin if TryStrToFloat(Edit1.Text, R) then ShowMessage('yes') else ShowMessage('no');end;No.2var I: Integer; vCode: Integer;begin Var(Edit1.Text, I, vCode); if vCode = 0 then ShowMessage('yes') else ShowMessage('Err' + IntToStr(vCode));end; 查看原帖>>

希望采纳