请问如何在线程类的OnTerminate事件里写内容?
线程摧毁的时候会触发OnTerminate事件,请问我怎么能够在这个事件里面写代码?给个例子好吗?谢
线程摧毁的时候会触发OnTerminate事件,请问我怎么能够在这个事件里面写代码?给个例子好吗?谢
解决方案 »
- 线程里使用adoquery 释放的问题
- 用循环向数据表中插入数据,为什么循环一次会插入两条相同的数据,最后一次循环插入一条数据???
- 一条sql语句问题
- F1Book中ObjCreatePicture方法使用??
- 请问各位,我怎么不能向SQLSERVER数据库插入超过15个字符的字符串,代码如下
- 编写一个Label组件
- 串口通信中,使用Clearcommerror(hcom,lpErrors,@Coms);编译不通过,马上给分
- 什么类的class才能响应消息?(TForm可以,那没窗体的什么可以呢?)
- 关于执行sql语言后,表的释放问题!
- 为什么显示乱码
- dbf能否制成网络数据库?急!
- 找不到控件了,告诉我吧。
private
{ Private declarations }
protected
procedure Execute; override;
end;
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
FThread :TTestThread;
procedure ExecuteOnTerminate(Sender:TObject);
public
{ Public declarations }
end;var
Form1: TForm1;implementation
{$R *.dfm}{ TTestThread }procedure TTestThread.Execute;
begin
inherited;
//...
end;procedure TForm1.ExecuteOnTerminate(Sender: TObject);
begin
//...
end;procedure TForm1.FormCreate(Sender: TObject);
begin
//...
FThread.OnTerminate := ExecuteOnTerminate;
//...
end;