看流星社区 › 其它编程技术 › Delphi挂DLL中创建多线程

P8551945 发表于 2011-4-4 09:54:02

Delphi挂DLL中创建多线程

哪位朋友有相关源码呢？学习学习。

甜密的穷哥 发表于 2011-4-4 09:54:12

var td:Cardinal;

procedure Start;stdcall;
begin
if form1=nil then
begin
    form1:=tform1.Create(nil);
    //form1.ShowModal;
    form1.Show;
    end;
end;

yemao4587 发表于 2011-4-4 09:54:24

就是用BeginThread(nil,0,@Start,nil,0,td); 这句启用多线程

多线程调用过程 Start

查看完整版本: Delphi挂DLL中创建多线程