如题.

解决方案 »

  1.   

    在DLL中没有Application的Handle,即使使用也可能出错!!!楼上的方法不能正确工作!!!如果想使用Application.CreateForm的话,必须将调用程序的Application.Handle引出!!!
      

  2.   

    {有两种方法}
    //方法一:procedure DllDemo(AHandle:THandle);
    begin
      {AHandle:在主程序调用此函数时将该程序的Application.Handle,
       作为参数传进来}
      Application.Handle:=AHandle;
      Application.CreateForm(TForm1,Form1);
      Form1.ShowModal;
      Form1.Free;
    end;exports DllDemo;//方法二:procedure DllDemo;
    begin
      Form1:=TForm1.Create(nil);
      Form1.ShowModal;
      Form1.Free;
    end;exports DllDemo;