我想判断edit1里输入的数据是否符合要求(要求是整型),如果不符合要求就弹出提示对话框,该怎么做,哪位高手指点一下!
解决方案 »
- hello world
- 请教:Delphi做Authorware调用的DLL,如何来做?
- 怎样把屏幕上的某个区域保存下来?
- 进制转换问题(有劳各个老师!!)
- query的CachedUpdates属性问题,回复有分。
- 在excel中打开一个文本文件——在delphi中编程实现,怎么写?录制的宏在OLEObject中没有相应的openText的方法。
- 关于dbgrid中输入法的问题,有兴趣的朋友请进:)
- 为什么有时我用DELPHI打开别人的程序时,不能使用Ctrl+Click就定位到类的声明代码上(在自己的程序上是可以的)?
- 怎样学好delphi???........
- 关于从数据库读取word2010文档的问题,困扰我多时,请指教!
- 帮帮兄弟,一个关于线程的问题。。。。
- 有没有这样的sql语句.
exit;end;
var
I, Code: Integer;
begin
Val(Edit1.Text, I, Code);
if Code <> 0 then
begin
MessageDlg('Error at position: ' + IntToStr(Code), mtWarning, [mbOk], 0);
Edit1.SetFocus;
end;
end;