/p 后面跟的是预览窗口的局柄，不是hdc，所以你需要利用GetClientRect 获得该窗口

的坐标，然后设定你自己窗口的Style为 WS_CHILD 。然后利用Setparent将自己的预览

窗口设定为系统提供给你的窗口局柄。然后利用SetWindowsPos将自己窗体的位置设定

到你获得的系统预览窗口的位置。

program Project1;

uses

 Forms,

 SysUtils,

 Unit1 in 'Unit1.pas' {Form1};

{$R *.RES}

var

 Hwnd : Cardinal;

begin

 Application.Initialize;

 Application.CreateForm(TForm1, Form1);

 if ParamStr(1) = '/p' then

 begin

   Hwnd := StrToInt(ParamStr(2));

   Form1.ParentWindow := Hwnd;

   Form1.Visible := True;

   form1.Left := 0;

   form1.Top := 0;

 end;

 Application.Run;

end.