try..except 中的出错问题(0分)

  • 主题发起人 主题发起人 honghaier
  • 开始时间 开始时间
H

honghaier

Unregistered / Unconfirmed
GUEST, unregistred user!
当执行到
try strtofloat(0.1.2)
except showmessage('错误')
end;
时,delphi7会出现错误,必须重起,郁闷,请各位大哥指点小弟一下啊~~~
 
不明白你说的意思
 
不要在delphi中運行, 直接運行exe文件...
 
procedure TForm1.Edit6Exit(Sender: TObject);
begin
try strtofloat(edit6.Text)
except showmessage('请输入正确信息') end;
end;
当edit6中输入的是正常的数字,不会出错,但是如果输入类似0.11.2这样的东东,程序就不能正常运行了.而我希望的是程序能执行showmessage('请输入正确信息').
 
我试了一下怎么没问题啊
 
最好先付值再来进行显示
 
找到你的程序,脱离delphi运行就可以了,因为delphi会扑捉所有的错误,而使程序暂停,你在
delphi中运行的话,在出现错误时,可以按下F9继续运行程序,你就会看到的提示了.
 
程序没有问题呀,直接运行exe文件吧。
 

Similar threads

后退
顶部