GetForegroundWindow函数 获取一个前台窗口的句柄(用户当前工作的窗口)。

函数原型:HWND GetForegroundWindow(void);
参数:无
返回值:一个前台窗口的句柄。在某些情况下,如一个窗口失去激活时,前台窗口可以是NULL。

var
  p: array[0..254] of Char;
begin
  if h <> GetForegroundWindow then
  begin
    h := GetForegroundWindow;
    GetWindowText(h, p, 255);
    if p <> '' then Memo1.Lines.Add(p);
  end;
end;

GetWindowText函数

 

 

创建时间:2020.01.03