枫
枫
Unregistered / Unconfirmed
GUEST, unregistred user!
如题！
P
Pipi.
Unregistered / Unconfirmed
GUEST, unregistred user!
捕捉错误要该线程自己捕捉。
要是想在住线程知道子线程的错误，可以由子线程捕捉后发消息给住线程
要是想在住线程知道子线程的错误，可以由子线程捕捉后发消息给住线程
A
aimingoo
Unregistered / Unconfirmed
GUEST, unregistred user!
没有别的方法么？？？——比如在其它线程监视另一个线程的执行状态。
——我也时间遇到这样的问题要解决。
——我也时间遇到这样的问题要解决。
I
Iknow
Unregistered / Unconfirmed
GUEST, unregistred user!
写一个TApplication.HandleException函数
Application.HandleException(Sender: TObject);
begin
if Sender is TThread then
begin
.....
end;
end;
Application.HandleException(Sender: TObject);
begin
if Sender is TThread then
begin
.....
end;
end;
T
tanglu
Unregistered / Unconfirmed
GUEST, unregistred user!
可以在线程内用PostMessage发送一个消息给主窗口，主窗口再写一个捕获程序。
1、发送消息：PostMessage
(FForm.Handle,wm_ThreadErrorMsg,Self.ThreadID,0);
2、接受消息的申明为：
procedure ThreadError(var AMessage : TMessage);
message WM_ThreadErrorMsg;
实现就可以了。
其中WM_ThreadErrorMsg是自定义的MEssage.
1、发送消息：PostMessage
(FForm.Handle,wm_ThreadErrorMsg,Self.ThreadID,0);
2、接受消息的申明为：
procedure ThreadError(var AMessage : TMessage);
message WM_ThreadErrorMsg;
实现就可以了。
其中WM_ThreadErrorMsg是自定义的MEssage.
B
bethouvnlue
Unregistered / Unconfirmed
GUEST, unregistred user!
自定义一个Exception类，再线程中Throw它，在Application中处理它
D
delphi7
Unregistered / Unconfirmed
GUEST, unregistred user!
太简单！这样吧：
procedure TMyThread.Execute;
begin
try
(线程的执行代码...)
except
(错误的处理代码...)
end;
end;
OK!!!
procedure TMyThread.Execute;
begin
try
(线程的执行代码...)
except
(错误的处理代码...)
end;
end;
OK!!!
L
lczhuohuo
Unregistered / Unconfirmed
GUEST, unregistred user!
呵呵,delphi里不是throw,而是raise,
在出现错误的时候,引起一个异常,异常会
逐层的引起,只要捕获就可以了
在出现错误的时候,引起一个异常,异常会
逐层的引起,只要捕获就可以了
W
wjiachun
Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.