09 2018 档案

创建新的MessageBox窗口前，先关掉之前已经创建好的
摘要：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 一字节 阅读(155) 评论(0) 推荐(0)