Pesado!!! Nem tanto, foi desenvolvido em Clipper na época do imortal DOS. Bom final de semana a todos....
[]'s Zucchi --- Em delphi-br@yahoogrupos.com.br, Delphi Sql <[EMAIL PROTECTED]> escreveu > > 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] >