uses
ChildForm;

var
>DLLApp : TApplication;
>
>procedure MyDLLProc(Reason: Integer);
>begin
>if Reason = DLL_PROCESS_DETACH then
>  { DLL이 메모리에서 내려갈때}
>  { 애플리케이션 포인터를 원위치 시킨다. }
>  if Assigned(DllApp) then
>    Application := DllApp;
>end;

procedure ShowMDIChildForm(MainApp : TApplication);
>var
>Child : TChildForm;
>
>begin
>
>if not Assigned(DllApp) then
>begin
>
>  DllApp := Application;
>  Application := MainApp;
>end;
>Child := TChildForm.Create(Application.MainForm);
>Child.Show;
>end;
>
>exports ShowMDIChildForm;
>begin
>{ DllApp 변수를 초기화 한다. }
>DllApp := nil;
>DLLProc := @MyDLLProc;
>end.


form이 한개인 경우는 돼는데
form이 2개인 경우 1개는 프린트폼으로 쓰는데요
project unit에서 어떻게 처리하면 돨까요