desabilitando CTRL-ALT-DEL via xHarbour

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1297
Registrado em: 06 Jul 2004 00:44
Contato:

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por ANDRIL »

Amigos, em relação ao CTRL-ALT-DEL, pode-se desabilita-lo diretamente no registro do windows.

Desativando o Gerenciador de tarefas (CTRL+ALT+DEL)

Chave:[HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Policies\System]
Nome: DisableTaskMgr
Tipo:Valor DWORD
Valor:0=ativado, 1=desativado
Se o [x]Harbour tiver funções de manipulações de registro, pode-se criar uma função que ao abrir o sistema desabilite-o. Acho que o WAPI.EXE do nosso amigo Maligno tem tratamento ao registro do windows.

PS: Não testei esse procedimento ainda, li em algum lugar da NET, por favor de um retorno se funcionou.

Abraços
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por alxsts »

Olá!

Para um "clippeiro", achei o assunto interessante...

Tem uma lista das funções da API do Windows, separada por categoria.
[]´s
Alexandre Santos (AlxSts)
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

Não acompanhei mais o tópico, por isso, posso estar fazendo chover no molhado. Mas para bloquear qualquer tecla, incluindo Ctrl+Alt+Del, usa-se um hook de teclado.

Funções: SetWindowsHookEx() e sua contra-partida UnhookWindowsHookEx(), da API do Windows. Detalhe: há muitos exemplos de uso na Net, em C. Descarte SetWindowsHook(), que é considerada obsoleta.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
ANDRIL
Usuário Nível 5
Usuário Nível 5
Mensagens: 1297
Registrado em: 06 Jul 2004 00:44
Contato:

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por ANDRIL »

Alxsts, sabe me dizer se estas funções da API do Windows podem ser usadas com [x]Harbour + HwGui, dei uma olhada e vi que a GetKeyState() e a Keybd_event() tem disponiveis na HwGui. Ou se tem alguma função shell nela que permita chamar esta funções diretamente, passando-as como parametro.

Se tiver como, será bom demais.

Ate+
Clipper 5.2e / Blinker 5.1 / Harbour 3.2 / GTwvg
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por alxsts »

Olá!

Caro Andril:

sou leigo no assunto. Aliás, este tópico é que despertou meu interesse.

Não sei se entendi direito o exemplo acima, postado pelo Leonardo (Sygecom). Parece que entre #pragma BEGINDUMP e #pragma ENDDUMP, podemos escrever funções em C++ invocando a API do Windows e depois chamá-las de nossas aplicações [x]Harbour.

Creio que o Maligno poderá nos ajudar. Só não sei se ó assunto está ou não sendo desviado...
[]´s
Alexandre Santos (AlxSts)
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por alxsts »

Olá!

Leonardo:

Tentei baixar o anexo de seu primeiro post no tópico e:

Código: Selecionar todos

Virus was detected in the content (virus_detected) 

Content contained "App/Winlock-A" virus. Details: Virus: App/Winlock-A; File: file.php; Sub File: \desabilita_tela_teclas/WinLockDll.dll; Vendor: Sophos, Plc.; Engine error code: 537133571; Engine version: 3.10.0; Pattern version: 4.56E.1874228.1785688352; Pattern date: 2010/08/24 11:40:00  
 

For assistance, contact your network support team 
Não sei se o problema é o nosso antivírus ou se está mesmo contaminado.
[]´s
Alexandre Santos (AlxSts)
Avatar do usuário
Netavin
Usuário Nível 3
Usuário Nível 3
Mensagens: 306
Registrado em: 28 Fev 2007 08:37
Localização: Cacoal-RO

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Netavin »

Fiquei feliz em trazer à tona um assunto que despertou outrora, a curiosidade de muitos e que hoje ainda o faz.
Porém, sobre minha indagação ... rsrs
Fico na expectativa.

[]´s
Netavin
TK90 / TK95 / APPLE IIe / 286 / 386 / 486 / 586 / AMD Atlhon
" Sem saber que era impossível, foi lá e fez !! "
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

Creio que o Maligno poderá nos ajudar.
No que diz respeito a C, sim (melhor seria um tópico próprio). Mas sobre os detalhes do [x]Harbour não posso ajudar muito. Mas é só olhar o help e os códigos exemplo dele, ou mesmo algum código já postado no fórum. E depois fazer algumas experiências. É uma dúvida fácil de matar.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

PS: Não testei esse procedimento ainda, li em algum lugar da NET, por favor de um retorno se funcionou.
Talvez no Win98, mas no XP não funciona. Precisa ser por hook.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

Netavin escreveu:Fiquei feliz em trazer à tona um assunto que despertou outrora, a curiosidade de muitos e que hoje ainda o faz.
Porém, sobre minha indagação ... rsrs
Ao ler essa mensagem, que eu encontrei pela busca do fórum, acredito que seu problema poderá ser resolvido. Mas se a dúvida persistir, por favor, abra outro tópico. Assim não misturamos os assuntos. :)
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

alxsts escreveu:Parece que entre #pragma BEGINDUMP e #pragma ENDDUMP, podemos escrever funções em C++ invocando a API do Windows e depois chamá-las de nossas aplicações [x]Harbour.
Exatamente, conforme o Leonardo já havia exemplificado nesta mensagem.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
Avatar do usuário
Maligno
Membro Master
Membro Master
Mensagens: 6398
Registrado em: 06 Jul 2004 01:40
Localização: Londrina/PR

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por Maligno »

alxsts escreveu:Não sei se o problema é o nosso antivírus ou se está mesmo contaminado.
Acabo de testar. Está vindo sem problema, sem qualquer aviso do AVG.
[]'s
Maligno
---
Não respondo questões técnicas através de MP ou eMail. Não insista.
As dúvidas devem ser postadas no fórum. Desta forma, todos poderão
se beneficiar das respostas.

---
Se um dia precisar de uma transfusão de sangue você perceberá como
é importante a figura do doador. Procure o hemocentro de sua cidade e
se informe sobre a doação de sangue, plaquetas e medula óssea. Doe!
alxsts
Colaborador
Colaborador
Mensagens: 3092
Registrado em: 12 Ago 2008 15:50
Localização: São Paulo-SP-Brasil

Re: desabilitando CTRL-ALT-DEL via xHarbour

Mensagem por alxsts »

Olá!

Grato Maligno.

Deve ser bloqueio da rede da empresa. Vou verificar em casa.
[]´s
Alexandre Santos (AlxSts)
Responder