关于窗口显示的问题(实现NetAnts的拖放窗口) (50分)

  • 主题发起人 主题发起人 wjh_wy
  • 开始时间 开始时间
W

wjh_wy

Unregistered / Unconfirmed
GUEST, unregistred user!
跟NetAnts的拖放窗口不完全相同.
我现在有一个非模式窗口,想要在主窗体最前面,这个我实现了
SetWindowpos(Handle, HWND_TOPmost, Left, Left, Width, Height,
swp_nomove or SWP_SHOWWINDOW );
而且要在主窗体最小化时非模式窗口也最小化,这个也可以,不要任何代码。
现在就是有一个问题,假如我在主窗体调出一个模式窗口,这时我的非模式窗口就变成不可动。我要实现NetAnts的拖放窗口,在主窗体调出什么设置选项窗口,这个NetAnts的拖放窗口还可以操作。
 
最简单的办法:做成两个程序
 
把拖放窗口独立出来
 
网络蚂蚁是怎样实现的呀。
 

private
{ Private declarations }
procedure EnableChanged(var Msg: TMessage); message WM_ENABLE; end;

var
FrmOnTop: TFrmOnTop;

implementation

{$R *.dfm}
procedure TFrmOnTop.EnableChanged(var Msg: TMessage);
begin
//当窗口被禁止的时候
EnableWindow(handle, true);
inherited;
end;
 
to dickc
谢谢。
 
多人接受答案了。
 
后退
顶部