delphi写的动态链接库，怎么使用多线程？

Question

本帖最后由 lk13962517093 于 2013-06-07 16:02:19 编辑

Answer 1

但是使用动态链接库，MyThreadFun方法中的form3为nil!
就是没有 form3 := TForm3.Create(nil); 还有在线程里面你还是Synchronize(Form3.FormProc); 这样为好！

Answer 2

hThread := CreateThread(nil, 0, @MyThreadFun, nil, 0, ID); 
使用这个创建函数！ 你愿写成这样：
IsMultiThread := TRUE; //加上这句以免出现不必要的麻烦
hThread := CreateThread(nil, 0, @MyThreadFun, nil, 0, ID); 

Answer 3

以下是引出函数，form3是create的。
procedure fcs;
begin
    with TForm3.Create(nil) do
    begin
      Show;
    end;
end;
发现应该这么写
procedure fcs;
begin
    Form3:=TForm3.Create(nil);
    Form3.Show;
end;感谢你的点拨，让我恍然大悟。