try...except问题(0分)

T

ttaa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #1

我在使用try...except的时候。
当系统在try中出现异常时。怎么不运行except中的程序？
我觉得很奇怪。我用win xp+delphi6。就像如下：
begin
try
Database1.Open;
except
Application.MessageBox('请确认用户名密码！','数据库连接错误',MB_OK);
end;
我故意输错密码，它也不出现我设定的（'请确认用户名密码！','数据库连接错误',MB_OK）
对话框啊。还是delphi自己异常的对话框。
我没有分了。辛辛苦苦积蓄下来的分，今天问了几个问题，分完了。

 

T

twos

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #2

不会呀，我都是这样用的。应该是其它地方有问题
你的原代码？

 

H

hjx38

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #3

你的语句错了，格式如下：TRY。。。。EXCEPT 。。。END

 

D

dreamliu2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #4

还有就是Try..Except..end在程序调试期间不会工作。
只有你编译成可执行文件后才起作用，你再试试运行你的exe文件。

 

T

ttaa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #5

procedure TForm1.Button1Click(Sender: TObject);
begin
try
StrToInt('a');
except
showmessage('wrong');
end;
end;
或者
procedure TForm1.Button1Click(Sender: TObject);
begin
try
StrToInt('a');
except
showmessage('wrong');
end
end;

都不会出现wrong，
而是出现：
Project project1.exe raised exception class EConverError
with message ''a' is not a valid integer value'.
process stopped.use use step or run to continue.
很奇怪啊。我的机子就是用不了try.对try感冒？

 

草

草央包包

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #6

不要在集成环境下运行，直接运行编译出的EXE试试

 

T

ttaa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #7

to dreamliu2001 & 草央包包:
一言惊醒梦中人，我都是在调试时候得出来的结果。
谢谢各位。谢谢

 

J

jackl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #8

这个问题很简单呀,try except end本来在调试的时候只会抛出自己内部的异常信息,在EXE中才会
抛出自己的异常信息!

 

H

hjx38

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #9

呵呵，原来如此。