请教高手，有关停靠窗口的问题

Question

请教高手，有关停靠窗口的问题
在一般的应用程序里，
procedure TForm3.Button2Click(Sender: TObject);
var
  form4:TForm4;
begin
  panel1.docksite:=true;
  form4:=TForm4.Create(nil);
  form4.dragkind:=dkDock;
  form4.dragmode:=dmAutomatic;
  form4.Show;
end;
浮动窗口的停靠是正确的，但是为什么当浮动窗口在com里生成时，外面的应用程序调用com，却实现不了浮动窗口的停靠问题。
难道是窗口句柄的问题？？
请问大家如何解决的