详细教你如何使用delphi中thread的线程编程

原创 2002年01月04日 10:32:00

       为什么要用线程,简单一点来说吧,省得有些象我一样的新手听不懂,当你编完一个程序,例如是读取文件的程序,如果你读取的文件很大,你的程序如果不是通过线程来执行的话,你一动这个正在读取文件的程序窗口,结果是什么,“死屏”就是你的程序根本拖不动,无法继续做其它的事了,呵呵,如果你用线程,什么问题都解决了,废话少讲,要学的看以下文章吧。

       首先当然是打开你的delphi 6 ,点取菜单栏中的文件-新建-其它,弹出一个标签窗口,选取new标签,然后找到Thread Object,就是它了,双击它就行了,弹出一个类命名窗口,输入mythread,当然名称可由你自已来定的。这时程序自动创建一个unit,我这里是unit2,现在我们来看unit,代码如下:

unit Unit2;

interface

uses
  Classes;

type
  mythread = class(TThread)
  private
    { Private declarations }
  protected
    procedure Execute; override;
  end;

implementation

{ Important: Methods and properties of objects in VCL or CLX can only be used
  in a method called using Synchronize, for example,

      Synchronize(UpdateCaption);

  and UpdateCaption could look like,

    procedure mythread.UpdateCaption;
    begin
      Form1.Caption := 'Updated in a thread';
    end; }

{ mythread }

procedure mythread.Execute;
begin
  { Place thread code here }
end;

end.

其中,你注意找到procedure mythread.execute;,应找到了吧,连我都看到了,这就是你刚才建立的线程了,那么接下来,我们要做的就是加入后台执行的代码,代码要加在那里?不会吧,当然是加在
begin
 //这里就是加入程序代码的地方了
end;
如果你要调用unit1上的控件,你可以在unit2上面的uses中加入unit1就行了,记住,在unit1里的implementation后面增加uses unit2,这样你就可在unit1中引用线程了,引用的方法很简单,就是,就是,就是,好啦,不卖关了,就是mythread.Create(false);。OK 这就是delphi中的线程,呵呵。

本人刚学delphi 有什么地方说得不对的,欢迎评批指证,我的联系信箱netboy@cnpick.com谢谢!

Delphi Thread线程编程(4)

核心提示:多线程是多任务操作系统下一个重要的组成部分,它能够提高应用程序的效率,然而,我们想利用好多线程,必须要了解很多的东西...                                 ...
  • lailai186
  • lailai186
  • 2013年04月09日 09:04
  • 1892

Delphi 多线程编程(1)

本文的内容取自万一博客,并重新加以整理,在此留存仅仅是方便自己学习和查阅。所有代码均亲自测试 delphi7下测试有效。图片均为自己制作。 多线程应该是编程工作者的基础技能, 但这个基础我从来没...
  • lailai186
  • lailai186
  • 2013年04月09日 07:55
  • 2615

delphi中Thread线程的使用方法

  TClientDataThread = class(TThread) private public    ListBuffer :TStringList;    TargetList :TStri...
  • delphi1234
  • delphi1234
  • 2008年02月20日 18:38
  • 5416

Java多线程编程之使用多线程

继承Thread类: 在Java中,自带了对多线程技术的支持。继承Thread,还有实现Runnable接口。先看一下Thread类的结果,如下: public class Thread implem...
  • qq455276333
  • qq455276333
  • 2016年07月15日 14:14
  • 2344

VC多线程编程学习笔记(一)

VC多线程编程学习笔记(一)    最近两天在学多线程编程,有了一些心得,写下来和大家一起共勉。文中一些部分引用了韩耀旭的文章《多线程编程》http://www.vckbase.com/documen...
  • onlyou930
  • onlyou930
  • 2010年09月11日 23:59
  • 7382

Linux--线程编程 thread

进程   系统中程序执行和资源分配的基本单位   每个进程有自己的数据段、代码段和堆栈段   在进行切换时需要有比较复杂的上下文切换   线程   减少处理机的空转...
  • zhwei_87
  • zhwei_87
  • 2013年08月27日 15:30
  • 413

delphi基本类的操作

unit CommonFunction; interface uses Windows,DB,ADODB,Controls,Forms,SysUtils,StdCtrls, Classes, strU...
  • wozengcong
  • wozengcong
  • 2014年08月31日 10:27
  • 1009

Delphi Thread 线程(1)

Delphi中有一个线程类TThread是用来实现多线程编程的,这个绝大多数Delphi书藉都有说到, 但基本上都是对TThread类的几个成员作一简单介绍,再说明一下Execute的实现和Sync...
  • lailai186
  • lailai186
  • 2012年10月12日 09:22
  • 10312

spawn分析

spawn def spawn(func, *args, **kwargs): """Create a greenthread to run ``func(*args, **kwargs)``...
  • adreamliu
  • adreamliu
  • 2015年11月22日 19:39
  • 285

Java 中多线程的实现方法之Thread和Runnable

【该博文摘抄于百度知道,原文链接为:http://zhidao.baidu.com/question/164816755.html?fr=ala&word=java%E4%B8%AD%E7%9A%84...
  • u012719153
  • u012719153
  • 2015年04月02日 11:16
  • 1199
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:详细教你如何使用delphi中thread的线程编程
举报原因:
原因补充:

(最多只允许输入30个字)