(特急，特刺激) 如何不显示开始菜单...

[Michaelyfj]

如何截取WM_KWYDOWN消息,如果按下的键为win键,(键值为91),如何不显示开始菜
单。我该怎样使用wndproc函数?
说白了是让client端，如何只能做一件事情，屏蔽桌面后，不能使用win系统的
功能键，如win,ctrl+esc, win+e等，我该如何解决？？？

[Michaelyfj]

我先试一试！

[dragongong]

Hi, 碰到我算你运气.
给你两个函数, 应该不用我解释了吧?

procedure hidesystem;
var
temp:integer;
wndHandle : THandle;
wndClass : array[0..50] of Char;
hDesktop : THandle;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_HIDE);
hDesktop := FindWindow('Progman', nil);
ShowWindow(hDesktop, SW_HIDE);
SystemParametersInfo(Spi_screensaverrunning,1,@temp,0);
FHide:= True;
End;

procedure showsystem;
var
temp:integer;
wndHandle : THandle;
wndClass : array[0..50] of Char;
hDesktop : THandle;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_show);
hDesktop := FindWindow('Progman', nil);
ShowWindow(hDesktop, SW_show);
SystemParametersInfo(Spi_screensaverrunning,0,@temp,0);
FHide:= False;
End;