minha aplicação sempre em foco
06/09/2004
0
eu gostaria de por exemplo qualquer ação que a pessoa fizesse já voltasse para a minha aplicação por exemplo assim que ela tentar um ´ctrl + esc´ e subir o menu de windows.... já voltar para a minha aplicação logo em seguida e assim por diante pois eu tentei bloquear as teclas só que através do mouse a pessoa consegue clicar com o botão direito na barra de tarefas e minimiza a aplicação isso que eu queria tb que ela não pudesse fazer...
tem como eu fazer isso
agradecendo desde já
Piaum3
Posts
06/09/2004
Lucas Silva
http://delphiforum.icft.com.br/forum/viewtopic.php?t=50388&highlight=tshiftstate
Para mais detalhes, utilize o método de pesquisa do fórum!
Lucas!
06/09/2004
Aroldo Zanela
Existem algumas diferenças entre os sistemas operacionais da Microsoft para forçar que sua aplicação fique à frente das outras. No caso da famdo Windows 2000 use o seguinte:
function ForceForegroundWindow(hWnd: THandle): BOOL; var hCurWnd: THandle; begin hCurWnd := GetForegroundWindow; AttachThreadInput( GetWindowThreadProcessId(hCurWnd, nil), GetCurrentThreadId, True); Result := SetForegroundWindow(hWnd); AttachThreadInput( GetWindowThreadProcessId(hCurWnd, nil), GetCurrentThreadId, False); end;
06/09/2004
Piaum3
só que na hora de executar qual parâmetro que eu passo para ela funcionar sendo que essa função pede um parâmetro o que que eu tenho que passar?
06/09/2004
Aroldo Zanela
O handle do formulário principal. Exemplo:
ForceForegroundWindow(Form1.Handle);
Você pode inclusive, colocar isto dentro do manipulador de evento OnTimer de um objeto TTimer.
Clique aqui para fazer login e interagir na Comunidade :)