Delphi 加载dll中的窗体放到主程序的panel里面。

下面这个是dll输出的一个过程，这个过程是把dll中的窗体加载到

procedure Led_Config(AHandle:THandle; parentHandle:THandle);stdcall;

参数说明：

   AHandle ： 主程序主窗体的句柄

  parentHandle ：父容器的句柄      --  panel的句柄

以下就是这个方法的实现：

procedure Led_Config(AHandle:THandle; parentHandle:THandle);stdcall;

var
R : TRect;
begin
  　　Application.Handle:= AHandle;
　　if Assigned(FLed) then
　　begin
　　　　FLed.Free;
　　　　FLed:=nil;
　　end;

　　FLed := TFLed.Create(Application);
　　FLed.BorderStyle := bsNone;
　　FLed.ParentWindow := parentHandle;
　　GetWindowRect(parentHandle, R);
　　OffsetRect(R, -R.Left, -R.Top);
　　FLed.BoundsRect := R;
end;