Question

delphi中一个工程有Form1,Form2两个窗口，如何实现鼠标单击桌面空位，Form1上的label就显示“程序未运行”

Answer 1

放一个 TApplicationEvents 到 form1 上..
然后在其事件 ApplicationEvents1Deactivate 中判断. 代码如下

procedure TForm1.ApplicationEvents1Deactivate(Sender: TObject);
begin
Labe1.Caption := '程序未运行;
end;