落 落莹 Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-21 #1 比如有一个hello.txt我想编一个delphi程序,使之隐藏,请问各位高手!!<br>谢谢!!
F Fyx Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-21 #2 procedure TForm1.Button1Click(Sender: TObject);<br>var<br> h: THandle;<br>begin<br> h := FindWindow('notepad', nil);<br> if h <> 0 then<br> ShowWindow(h, SW_HIDE);<br>end;
procedure TForm1.Button1Click(Sender: TObject);<br>var<br> h: THandle;<br>begin<br> h := FindWindow('notepad', nil);<br> if h <> 0 then<br> ShowWindow(h, SW_HIDE);<br>end;
S Shenxinaz Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-21 #3 FindWindow 使用有一定限制,<br>也可以使用 FindWindowEx.<br>另外如果是隐藏Delphi的程序,你最好将第二个参数设成TApplication<br>同时为了画面不要出现闪烁,可以先将找到的窗口移到(MoveWindow) 4000 X 4000 <br>之类无人看得到的地方
FindWindow 使用有一定限制,<br>也可以使用 FindWindowEx.<br>另外如果是隐藏Delphi的程序,你最好将第二个参数设成TApplication<br>同时为了画面不要出现闪烁,可以先将找到的窗口移到(MoveWindow) 4000 X 4000 <br>之类无人看得到的地方
R Reboot Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-21 #4 若是那程序运行了几个实例呢?<br>再加上EnumWindows吧