摘要: procedure TForm2.Timer1Timer(Sender: TObject); var h:HWND; begin h := FindWindow(nil,PAnsiChar('123')); if h > 0 then begin //PostMessage(h,WM_SYSCOMMAND, SC_CLOASE,0);//现在这样写法不管用 Send... 阅读全文
posted @ 2018-09-11 15:54 一字节 阅读(150) 评论(0) 推荐(0) 编辑