Problem/Question/Abstract:
I would like to know how use the FlashWindow API function. It never flashes the icon on the Taskbar.
Answer:
Try this - works on all versions of Windows from Windows 98 upwards. It will flash the window caption and task bar window until it comes to the foreground. You can amend the flags, count and timeout to change if you want it to work differently.
procedure TestFlash;
var
FW: TFlashWInfo;
begin
FW.cbSize := SizeOf(FW);
FW.hwnd := Application.Handle;
FW.dwFlags := FLASHW_ALL + FLASHW_TIMERNOFG;
FW.uCount := 1;
FW.dwTimeout := 0;
FlashWindowEx(FW);
end;
Nincsenek megjegyzések:
Megjegyzés küldése