Como acionar uma rotina escondida dentro de um aplicativo

Question

Ol�...algu�m saberia me informar como posso acionar uma rotina �escondida� dentro de um aplicativo atrav�s de um clique sobre um panel por exemplo, e este clique deve acionar a rotina escondida quando os bot�es CTRL+ALT estiverem segurados inclusive...

Um abra�o...

Marcelo Saviski · Answer

[quote:039e6043f3]Verificar se uma determinada tecla est� pressionadaInclua na se��o uses: Windows{ Esta fun��o retorna true se a tecla informada  estiver pressionada. False em caso contr�rio. }function tbKeyIsDown(const Key: integer): boolean;begin  Result := GetKeyState(Key) and 128 > 0;end;{ Exemplos de uso: }if tbKeyIsDown(VK_CONTROL) then  { Tecla Ctrl pressionada }if tbKeyIsDown(VK_MENU) then  { Tecla Alt pressionada }if tbKeyIsDown(VK_SHIFT) then  { Tecla Shift pressionada }if tbKeyIsDown(VK_F2) then  { Tecla F2 pressionada }[/quote:039e6043f3]...

Alessandro_info · Answer

Eu consultei o site do MSDN(//msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/winui/windowsuserinterface/userinput/keyboardinput/keyboardinputreference/keyboardinputfunctions/getkeystate.asp) e descobri essa fun��o, s� tem um problema acho q ali...Pq essa fun��o retorna 4 valores: 0 ou 1 para ligado e desligado, isto quando vc apenas digita ela, como se ligasse e desligasse, e -127 e -128 para teclas seguradas...Muito Obrigado...Um abra�o......

F�rum Como acionar uma rotina escondida dentro de um aplicativo #178467