伴水清兄的方法是可行的,谢谢。不过有个问题,主Form和“提醒Form”,主Form里面用代码提醒,让“提醒Form”闪烁,在window的状态条里,点主Form的图标切换不过去,也就是一直是“提醒Icon”有效。用别的方法,比如,两个窗口随便点哪个,或者双击状态条里面的图标切换,是可以的。 主form是这样调用的: Flash := true; FlashWindow(FMyNoticeForm.Handle, Flash); Flash := not Flash; //flash the icon to make a notice状态条是指windows屏幕的最后一行,不知道规范名称叫什么 "提醒Form"是个Form,名词。“提醒Icon”同样。
procedure CreateParams(var Params: TCreateParams); override;
end;
//....
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
end;
VC6.0不支持 ,VC7.0才开始支持。
VCL不现在的框架只能支持到MDI,要实现多顶层窗口,就只有自己做了。
我先试一下专家门诊清洁工的办法
主form是这样调用的:
Flash := true;
FlashWindow(FMyNoticeForm.Handle, Flash);
Flash := not Flash; //flash the icon to make a notice状态条是指windows屏幕的最后一行,不知道规范名称叫什么
"提醒Form"是个Form,名词。“提醒Icon”同样。
叫WINDOWS任务栏.