打开隐藏窗口的问题

發文回覆瀏覽次數：1013

推到 Plurk!

推到 Facebook!

答題得分者是：pceyes

wq236589
一般會員

發表：21
回覆：37
積分：16
註冊：2008-08-27

發送簡訊給我

#1 引用回覆回覆

發表時間：2008-12-03 12:56:51

IP:124.237.xxx.xxx 訂閱

我想打开一个exe程序并使这个程序隐藏（不在桌面显示），调用的时候在显示出来。
我用ShellExecute(Handle, 'open', 路径,nil, nil, SW_HIDE);打开了一个.exe，但是不知道该怎么让隐藏的进程显示在桌面
我用SendMessage(FindWindow(nil,PChar('Google Earth Pro ')),WM_SHOWWINDOW,1,0); 显示不出来

pceyes
尊榮會員

發表：70
回覆：657
積分：1140
註冊：2003-03-13

發送簡訊給我

#2 引用回覆回覆

發表時間：2008-12-03 14:38:05

IP:122.118.xxx.xxx 訂閱

procedure TForm1.Button3Click(Sender: TObject);
var h1 :hwnd;
begin
h1 := findwindow(nil,pchar(''Google Earth Pro));
if (h1 <> 0) then
ShowWindow(H1, SW_show);
end;
===================引用 wq236589 文章===================
我想打开一个exe程序并使这个程序隐藏（不在桌面显示），调用的时候在显示出来。
我用ShellExecute(Handle, 'open', 路径,nil, nil, SW_HIDE);打开了一个.exe，但是不知道该怎么让隐藏的进程显示在桌面
我用SendMessage(FindWindow(nil,PChar('Google Earth Pro ')),WM_SHOWWINDOW,1,0); 显示不出来

------
努力會更接近成功

系統時間：2024-05-16 6:16:35

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！