Bom dia .. ai galera deu certo a dica foi 100 % .. é o seguinte com o
programinha(pesado hemmm) do Lidio ele simula a combinção das teclas ou seja
qdo vc tecla Ctrl +c ele disse q é o 3 e Ctrl +v é o 22 é só acrescentar no
codigo
> > > if not(Key in['0'..'9', #8 , 'A'..'F' , 'a'..'f', #3 , #22])
Obrigado
Vlw
----- Mensagem original ----
De: lidio.zucchi <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 15 de Maio de 2008 22:54:23
Assunto: Re: Res: Res: [delphi-br] Exceção de bloqueios de teclas
Desculpem
Retificação...
Onde foi ---> Poste na sessão. Leiam ---> Postei na sessão
--- Em [EMAIL PROTECTED] os.com.br, "lidio.zucchi"
<lidio.zucchi@ ...> escreveu
>
> Boa noite a todos
>
> Poste na sessão de arquivos um programinha que desenvolvi na época
de
> clippeiro e que me ajudou muito.
>
> Ele retorna o código da tecla ou das teclas pressionadas.
> Se servir façam bom proveito dele.
>
> []'s
>
> Zucchi
>
>
> --- Em [EMAIL PROTECTED] os.com..br, Joao Morais <post@> escreveu
> >
> > Delphi Sql wrote:
> > > Seguinte ... nenhuma dica resolveu meu problema ..
> > > coloquei no OnKeyPress o seguinte
> > >
> > > if not(Key in['0'..'9', #8 , 'A'..'F' , 'a'...'f'])
> > > then
> > > begin
> > > Beep;
> > > Key := #0;
> > > end;
> > >
> > > porém com esta exceção bloquiei tbem o "Ctrl + c" e "Ctrl + v"
ou
> seja não
> > > posso copiar nem nem colar nada no edit devido o bloqueio das
> teclas ...
> >
> > Significa que Ctrl+C e Ctrl+V passam pelo OnKeyPress. Se passam,
> eles
> > tem um código. Se tem um código, você pode recuperar seu valor.
Meu
> > palpite é que Ctrl+C tenha código #3 e Ctrl+V tenha código #22,
mas
> eu
> > recomendo você testar por conta própria. Após descobrir os
códigos,
> > acrescente-os na lista.
> >
>
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para
armazenamento!
http://br.mail.yahoo.com/
[As partes desta mensagem que não continham texto foram removidas]
