如何在主窗口中增加一个浮动窗口？

Question

1.浮动窗口可以缩小成一个小图标在主窗口的又上角
2.浮动窗口里的数据随着数据库内容变化自动变化

Answer 1

把你要设置浮动的窗体按照如下方法做：unit Unit2;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TForm2 = class(TForm)
    Label1: TLabel;
  private
    { Private declarations }
  public
    procedure Createparams(Var Params:TCreateParams);override;
  end;var
  Form2: TForm2;implementation{$R *.dfm}{ TForm2 }procedure TForm2.Createparams(var Params: TCreateParams);
begin
  Inherited CreateParams(Params);  With Params do
  begin
    EXStyle:=ExStyle or WS_EX_TOPMOST OR WS_EX_ACCEPTFILES or WS_DLGFRAME;
    WndParent := GetDesktopWindow;
  end;
end;end.

Answer 2

wudi_1982照你的方法写了，但如果我在界面上加个panel，则panel里的控件显示不出来!