Ai vai um codigo que peguei no site da Borland que trava as teclas
(Ctrl+Alt+Del),(Alt+Tab), (Ctrl+Esc)
var
OldValue : LongBool;
begin
{liga a trava}
SystemParametersInfo(97, Word(True), @OldValue, 0);
{desliga a trava}
SystemParametersInfo(97, Word(False), @OldValue, 0);
end;
----- Original Message -----
From: WILLER
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 09, 2006 10:18 AM
Subject: Re: [delphi-br] Bloquear o teclado
Tentai fazer assim, mas deu erro.
ERRO:"O arquivo 'project.exe' está vinculado ao KERNEL32.DLL de exportação
que não foi encontrado: geren".
Sabe o que pode ser?
Estou usando o Win98. Pode ser isso?
----- Original Message -----
From: Hudson
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 09, 2006 10:03 AM
Subject: Re: [delphi-br] Bloquear o teclado
Acho o q vc pode fazer e tirar o aplicação do gerenciador
"Kernel32.dll".....
bom eu faço assim
function geren(dwProcessId, dwType: integer): integer; stdcall; external
'KERNEL32.DLL';
//ve
geren(getCurrentProcessID, 1);
//não ve
geren(getCurrentProcessID, 0);
espero ter ajudado
----- Original Message -----
From: WILLER
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 09, 2006 9:42 AM
Subject: Re: [delphi-br] Bloquear o teclado
Esta API não bloqueia Ctrl+Alt+Del, então o usuário pode finaliza minha
aplicação. É possível bloquear "Ctrl+Alt+Del" ?
[]s
Willer Alves da Costa.
----- Original Message -----
From: Rubem Nascimento da Rocha
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 08, 2006 7:21 PM
Subject: RE: [delphi-br] Bloquear o teclado
Informe-se sobre a função BlockInput() da API do Windows. Ela bloqueia
teclado e mouse. Sds.
>From: "WILLER" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: <delphi-br@yahoogrupos.com.br>
>Subject: [delphi-br] Bloquear o teclado
>Date: Tue, 8 Aug 2006 17:04:14 -0300
>
>Olá,
> Estou desenvolvendo uma aplicação onde o usuário deve ficar com o
teclado
>desabilitado durante uns segundos. Impedindo-o de acessar algum
programa
>através de atalhos do teclado.
>Alguém sabe se é possível fazer?
>
>
>[]s
>Willer Alves da Costa.
>
>[As partes desta mensagem que não continham texto foram removidas]
>
_________________________________________________________________
MSN Messenger: converse com os seus amigos online.
http://messenger.msn.com.br
__________ Informação do NOD32 1.1683 (20060728) __________
Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
__________ Informação do NOD32 1.1683 (20060728) __________
Esta mensagem foi verificada pelo NOD32 Sistema Antivírus
http://www.nod32.com.br
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
