当前位置: 开源爱好者 » Delphi源码 » 字符处理 » 详情页

Delphi 判断字符是否可以转换成整数

Delphi 判断字符是否可以转换成整数,这个主要是判断字符串类型的数字,因为这样经过转换后才可能是整数,可根据以下的代码做转换,编写代码的时候,用的是Delphi7.0,代码如下:
  function TForm1.IsIntStr(const S: string): boolean;
  begin
   if StrToIntDef(S,0)=StrToIntDef(S,1) then
   Result:=true
   else
   Result:=false;
  end;
  
  procedure TForm1.Button1Click(Sender: TObject);
  begin
   if IsIntStr(Edit1.Text) then
   showmessage('可以转换成整数')
   else
   showmessage('不可以转换成整数');
  end;

Delphi 判断字符是否可以转换成整数测试效果图
源码包大小:6.22K
该源码已累计下载了:
相关Delphi源码:

CopyRight 2018© 开源爱好者 All Rights Reserved 豫ICP备16030607号 隐私声明 网站地图