[Lazarus] Flashing task bat icon orange on Windows 7

[Simon Ameis]

You'll need the taskbar's handle which you can get from WidgetSet.AppHandle.


uses JwaWindows, InterfaceBase;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: FLASH_INFO;
begin
  i.cbSize := sizeof(i);
  i.hwnd := WidgetSet.AppHandle;
  i.dwFlags := FLASHW_TRAY or FLASHW_TIMERNOFG;
  i.uCount := 0;
  i.dwTimeout := 0;
  FlashWindowEx(i);
end;  

Am 12.06.2015 um 22:25 schrieb Richard Mace:
> ​Hi,
> I am trying to work out how to flash the taskbar icon in Windows 7,
> like Skype does, pragmatically. I have googled, and the closest I
> found was FlashWindowEx, but that doesn't actually flash the icon,
> just the form window.
>
> Any ideas?
>
> Thanks
>
> Richard​
>
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20150613/a11059a2/attachment-0003.html>