都搞掂啦!!再请教xianjun老大一个问题,win+M不是可以来回用吗?我这怎么只会跑,回不来呢?? (50分)

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #1

我想Win+M后(最小化所有窗口后), zi自己留着.下面怎么不行呢??
procedure TForm1.Label3Click(Sender: TObject);
begin
//hwdtemp:=application.handle;
keybd_event(91, MapVirtualKey( 91, 0 ), 0 , 0 );
// win 键按下
keybd_event(77, MapVirtualKey( 77, 0 ), 0 , 0 );
// M 键按下
keybd_event(77, MapVirtualKey( 77, 0 ), KEYEVENTF_KEYUP , 0 );
// M 键抬起
keybd_event(91, MapVirtualKey( 91, 0 ), KEYEVENTF_KEYUP , 0 );
// win 键抬起
// sendmessage(hwdtemp,WM_SYSCOMMAND,SC_RESTORE,0);///<---------not work???
ShowWindow(form1.handle, SW_restore);
///<--------------------not work???
end;

都搞掂啦!!再请教xianjun老大一个问题,win+M不是可以来回用吗?我这怎么只会跑,回不来呢??

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #2

我一点,都砲啦,这家伙也不回来,是其它的问题?

 

X

xianjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #3

var
B: Cardinal;
begin
keybd_event(91, MapVirtualKey( 91, 0 ), 0 , 0 );
// win 键按下
keybd_event(77, MapVirtualKey( 77, 0 ), 0 , 0 );
// M 键按下
keybd_event(77, MapVirtualKey( 77, 0 ), KEYEVENTF_KEYUP , 0 );
// M 键抬起
keybd_event(91, MapVirtualKey( 91, 0 ), KEYEVENTF_KEYUP , 0 );
// win 键抬起
B := GetTickCount;
repeat
Application.ProcessMessages;
until GetTickCount - B > 50;
PostMessage(Handle, WM_SYSCOMMAND, SC_RESTORE, MAKEWORD(Width, Height));

 

D

delphifans_hx

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #4

http://www.delphibbs.com/delphibbs/dispq.asp?LID=1105212
100块大洋等你

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #5

一时半会我还搞不明,稍后给分,见凉为盼!

 

C

chiu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #6

to xianjun
这一句中until GetTickCount - B > 50;
为什么是>50？

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #7

b是没什么意思,我用,
// sendmessage(hwdtemp,WM_SYSCOMMAND,SC_RESTORE,0);///<---------not work???
ShowWindow(form1.handle, SW_restore);
///<--------------------not work???
要改到1000,h还不爽,我用post 试试!

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #8

偶的机器慢,

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #9

xianjun老大再看看这贴!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
都搞掂啦!!再请教xianjun老大一个问题,win+M不是可以来回用吗?我这怎么只会跑,回不来呢??

 

X

xianjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #10

50是我机上的测试数据
要延时50毫秒才有效
WIN+M是可以来回用的吗？ 我的2000下不能来回用，只能最小化。

 

X

xianjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #11

2000的帮助上说是可以来回用的
WIN +M: Minimize or restore all windows.
但我机上只能最小化，不能回复，我说的是用键盘按

 

C

CathyEagle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #12

注意windows中shift的功能，通常是反的。
比如：tab，反之就是shift-tab，
空格（IE中下滚），反之就是shift-空格，
所以：win+m，反之就是win-shift-m

 

X

xianjun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #13

CathyEagle说得没错
微软没在文档中说明
有一个例外，就是WIN+D，它是不用加SHIFT， 没想到WIN+M却要加

 

Y

yxjdelphi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-17

• #14

谢各位,明白啦