紧急求助:隐藏一个应用程序不让显示(不是在任务管理器)?(40分)

S

sxwy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-16

• #1

用户打开了MEDIAPLAY.EXE,
如何隐藏这个MEDIAPLAY程序,然后又显示.我用FINDWINDOW找到了线程,但是奇怪:发Sendmessage(Tmpid,Wm_Syscommand,SC_MINIMIZE,0);有效(最小化)
发Sendmessage(Tmpid,Wm_Syscommand,SW_HIDE,0);就无效了.哪位大虾帮帮我呀.

 

R

rwlin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-16

• #2

为什么要发消息呢，这么麻烦干吗

1.去掉程序任务栏显示；
2.改变程序窗体的left =-1024 ;top=-768 (比如)

不就隐藏了吗。（同时改变长宽也可也）

 

S

sxwy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-16

• #3

唉,是别人的程序呀.不是说了吗.是WINDOWS自带的Mediaplay播放器呀.我怎么控制这个播放器的长和宽.
我想是不是有办法发送消息让它隐藏起来.过一些时间再显示.

 

S

sxwy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-19

• #4

帮帮忙呀.为什么找到了一个窗体的句柄,向这个窗体发送SW_HIDE,它不隐藏呢.

 

2

2002360326

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-19

• #5

procedure TForm1.BitBtn1Click(Sender: TObject);
var
hand : THandle;
begin
hand := FindWindow(nil, PChar('windows Media player'));
Windows.SetParent(hand,self.Handle);
MoveWindow(hand,top,left,0,0,true);
end;

procedure TForm1.BitBtn5Click(Sender: TObject);
begin
Hide;
end;
这样就可以隐藏了

 

2

2002360326

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-19

• #6

procedure TForm1.BitBtn1Click(Sender: TObject);
var
hand : THandle;
begin
hand := FindWindow(nil, PChar('windows Media player'));
Windows.SetParent(hand,self.Handle);
MoveWindow(hand,top,left,0,0,true);
　　Hide;
end

 

D

dfw1001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-09-19

• #7

2002360326[]