从批处理文件触发任务栏按钮闪烁?

Ben*_*ank 21 windows taskbar batch-file

是否有可能从批处理文件中触发Windows"闪存任务栏按钮X次或直到窗口到达前台"行为?我试图在完成时将用户的注意力转移到长时间运行的脚本上.

只要不需要安装(即可执行文件可以与我的脚本捆绑在一起),使用外部程序来触发闪存就可以了.

更新

这就是我最终得到的(Andreas'Delphi代码的极简主义端口).我在MinGW下编译它似乎只依赖于KERNEL32.DLL和USER32.DLL,所以应该是高度可移植的.

闪烁三次,然后保持突出显示直到前景.

#define WINVER 0x501
#define _WIN32_WINNT 0x501

#include <windows.h>

void main(int argc, char **argv) {
    FLASHWINFO info = { sizeof(info), GetConsoleWindow(), FLASHW_TIMERNOFG | FLASHW_TRAY, 3, 0 };

    FlashWindowEx(&info);
}
Run Code Online (Sandbox Code Playgroud)

And*_*and 7

使用非常简单的外部*.exe非常容易.它只需要调用FlashWindowExWindows API 的功能.

这是一个示例Delphi控制台应用程序:

program flashwnd;

{$APPTYPE CONSOLE}

uses
  SysUtils, Windows;

var
  OldTitle, UniqueTitle: string;
  h: HWND;
  c: cardinal;
  fwi: TFlashWInfo;

begin

  try
    h := GetConsoleWindow();

    c := 10;
    if ParamCount = 1 then
      c := StrToInt(ParamStr(1));

    FillChar(fwi, sizeof(fwi), 0);
    fwi.cbSize := sizeof(fwi);
    fwi.hwnd := h;
    fwi.dwFlags := FLASHW_ALL;
    fwi.uCount := c;
    fwi.dwTimeout := 0;
    FlashWindowEx(fwi);
  except
    on E: Exception do
      Writeln(E.ClassName + ': ' + E.Message);
  end;
end.
Run Code Online (Sandbox Code Playgroud)

简单地称之为

flashwnd
Run Code Online (Sandbox Code Playgroud)

闪烁当前控制台窗口十次.呼叫

flashwnd 27
Run Code Online (Sandbox Code Playgroud)

闪过窗户27次.