Fórum Como bloquear a tecla Windows? #264148
04/01/2005
0
Olá, beleza?
Estou atrás de uma função que bloqueie as teclas do Windows, ou seja, aquelas que ativam o menu iniciar. Eu sei que dá pra mapeá-las no onKeyDown, por exemplo, com mas como fazer para cancelar?
Se alguém souber, fico agradecido.
Até mais!
Estou atrás de uma função que bloqueie as teclas do Windows, ou seja, aquelas que ativam o menu iniciar. Eu sei que dá pra mapeá-las no onKeyDown, por exemplo, com
if Key = VK_LWIN then
Se alguém souber, fico agradecido.
Até mais!
Accessviolationataddressf
Curtir tópico
+ 0
Responder
Posts
05/01/2005
Tatuweb
Nessa [url=http://delphiforum.icft.com.br/forum/viewtopic.php?t=24191&start=23]thread[/url] a dois exemplos diferentes para bloquear/desbloquear a tecla Win.
Responder
Gostei + 0
07/01/2005
J-araujo
Olá.
Veja se este código ajuda também.
Procedure EscIniciar (Visible:Boolean);
Var taskbarhandle,
Buttonhandle : HWND;
Begin
Taskbarhandle := FindWindow(´Shell_TrayWnd´, nil);
Buttonhandle := GetWindow (taskbarhandle, GW_CHILD);
If visible = true then
Begin
ShowWindow (buttonhandle, SW_RESTORE); {mostra o botão}
End
Else
Begin
ShowWindow (buttonhandle, SW_HIDE); {esconde o botão}
End;
End;
t+ :D
Veja se este código ajuda também.
Procedure EscIniciar (Visible:Boolean);
Var taskbarhandle,
Buttonhandle : HWND;
Begin
Taskbarhandle := FindWindow(´Shell_TrayWnd´, nil);
Buttonhandle := GetWindow (taskbarhandle, GW_CHILD);
If visible = true then
Begin
ShowWindow (buttonhandle, SW_RESTORE); {mostra o botão}
End
Else
Begin
ShowWindow (buttonhandle, SW_HIDE); {esconde o botão}
End;
End;
t+ :D
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)