Question

Delphi怎么获得另一个程序的句柄

Answer 1

用 FindWindow() 是最方便的，缺点是对方的标题栏文字必须固定。

var
h: HWND;
begin
//假设标题是: Form1
h := FindWindow(nil, 'Form1');
ShowMessage(IntToStr(h));