120分问个隐藏问题(120分)

  • 主题发起人 主题发起人 pub66cn
  • 开始时间 开始时间
P

pub66cn

Unregistered / Unconfirmed
GUEST, unregistred user!
请问怎么样用隐藏方式运行一个程存,<br>例如,我按下button后,就自动运行C:/1.exe,且运行后不在任务栏出现,也看不到界面,请问怎样实现,(全部身家只有120分了)。。。
 
private void button1_Click(object sender, System.EventArgs e)<br> {<br> ShowInTaskbar=false;//在任务栏消失<br> this.Hide();//窗体消失<br> }
 
1.写的程序不使用窗体;<br>2.使用窗体,但是不显示出来<br>工程单元加入<br>Application.ShowMainForm := False;<br>如:<br>program Project1;<br><br>uses<br> &nbsp;Forms,<br> &nbsp;Unit1 in 'Unit1.pas' {Form1};<br><br>{$R *.res}<br><br>begin<br> &nbsp;Application.Initialize;<br> &nbsp;Application.ShowMainForm := False;<br> &nbsp;Application.CreateForm(TForm1, Form1);<br> &nbsp;Application.Run;<br>end.<br><br>3.如果在调用外部程序时使用<br>WinExec('c:/1.exe',SW_HIDE); &nbsp;//使用 SW_HIDE 参数隐藏外部程序
 
WinExec('c:/1.exe',SW_HIDE); &nbsp;//使用 SW_HIDE 参数隐藏外部程序<br>不能隐藏,1.exe还是显视了出来[:(]
 
var<br>EXEHD : HWND;<br>WinExec('c:/1.exe',SW_HIDE); &nbsp;<br>EXEHD := findwindow(nil,'1的标题栏');<br>if EXEHD &lt;&gt; 0 then<br> PostMessage(EXEHD,SW_HIDE,0,0);
 
http://www.js.lss.gov.cn:7001/download/files/HideProcess.rar
 
怎么用:happycyp的代码不用啊.
 
用 SW_HIDE 参数有些程存不能隐藏,例如我用WinExec('c:/1.exe',SW_HIDE);打开记事本程存,可以正常隐藏,但打开delphi随便编译的程存,却不能隐藏,<br>EXEHD := findwindow(nil,'1的标题栏');<br>if EXEHD &lt;&gt; 0 then<br> PostMessage(EXEHD,SW_HIDE,0,0);<br>加上面代码也不能隐藏,[:(]怎么办。。。<br>能不能用CreateProcess去实现~?[:(]
 
后退
顶部