摘要: procedure TForm1.Button1Click(Sender: TObject);begin//创建线程,同时线程函数被调用hthread:=CreateThread(nil,0,@MyThreadfunc,nil,0,ThreadID);end;procedure TForm1.Button2Click(Sender: TObject);beginSuspendThread(hThread); //挂起线程end;procedure TForm1.Button3Click(Sender: TObject);beginResumeThread(hThread); // 激活线程en 阅读全文
posted @ 2013-01-11 10:22 Qiu_L 阅读(8569) 评论(0) 推荐(0)
摘要: delphi self 的使用delphi之self在使用delphi的对象技术的时候,经常会看到一个词汇:self,它到底指的是什么呢?我们还要从对象与类的关系谈起。 类是对将要创建的对象的性质的描述,是一种文档。这很重要:类只是一段描述性的文字,它并不会真去分配内存,无论在其中定义多少变量。 如果打个比方,类就是图纸,而对象就是根据图纸盖的房子。对象是真正在 内存中存在的东西,是运行“实体”。根据一份图纸可以盖多个相似的房子,同 样道理,根据一个类,可以创建多个类似的对象,这个过程叫做“实例化”。在delphi中使用对象技术,要遵循以下的步骤:1。定义一个类2。用该类声明一个名字(实质是一 阅读全文
posted @ 2013-01-11 10:14 Qiu_L 阅读(5626) 评论(0) 推荐(0)