Delphi WinAPI: GetFocus - 获取当前拥有焦点的窗口的句柄


本文整理自网络,侵删。

 
WinAPI: GetFocus - 获取当前拥有焦点的窗口的句柄
//声明:
GetFocus: HWND; {无参数; 返回当前拥有焦点窗口的句柄}


//举例:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    Edit1: TEdit;
    Timer1: TTimer;
    procedure Timer1Timer(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
var
  h: HWND;
begin
  h := GetFocus;
  Text := IntToStr(h);
end;

end.

相关阅读 >>

Delphi之声音资源(*.res)的编译方法

Delphi 创建dll文件 及其调用和注意事项

Delphi随机字符(密码生成)函数

Delphi 检测文件数字签名

Delphi shutdown() 关机

Delphi dataset和json互转函数

Delphi提取网页中的所有链接、点击第n个链接

Delphi -- gdi+ Delphi如何让 tgpimage 直接从流中加载图片

Delphi httpencode

Delphi使用cef4Delphi制作chromium谷歌内核浏览器

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...