天道酬勤,学无止境

句柄

用鼠标获取任意窗口的句柄, 并把它当作"干儿子"

用鼠标获取任意窗口的句柄, 并把它当作"干儿子" 首先建议初学者不要在这些小的技巧上下太多功夫, 学好基础才是根本; 我的博客上这种东西不多, 这是大家讨论时, 话赶话赶出来的, 知道有这种可行性即可, 没有多少实用价值. 本例效果图: 此例回复来宾在http://www.cnblogs.com/del/archive/2008/02/26/1081644.html 碰到的问题. 全部代码如下(测试时注意给主窗体焦点): unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Panel1: TPanel; Edit1: TEdit; Button1: TButton; Button2: TButton; Timer1: TTimer; procedure FormCreate(Sender: TObject); procedure Timer1Timer(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button2Click

2021-05-19 02:22:58    分类:博客    鼠标   句柄