#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 delphi-br@yahoogrupos.com.br, "lidio.zucchi"
<[EMAIL PROTECTED]> escreveu
>
> Boa noite a todos
>
> Poste na sessão de arquivos um programinha que desenvolvi na época
de
> clippeiro e que me ajudou mu
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 delphi-br@yahoogrupos.com.br, Joao Morais <[EMAIL PRO
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 ...
- Mensagem original
De: Ricardo César Cardoso <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 15
icardo César Cardoso
Data: 05/15/08 11:21:05
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: Res: [delphi-br] Exceção de bloqueios de teclas
Bom dia !
Em qual evento vc vai usar isso? Se for em OnKeyDown, Key é do tipo Word e
vc vai ter um erro quando usar a comparação que vc usa. Obrigatoriamente vc
vai te
Bom dia !
Em qual evento vc vai usar isso? Se for em OnKeyDown, Key é do tipo Word e vc
vai ter um erro quando usar a comparação que vc usa. Obrigatoriamente vc vai
ter que trabalhar com os valores ASC II dessas teclas ( 0-9, A-F e a-f )
Abraço,
Ricardo.
André Luis <[EMAIL PROTECTED]> escreve
if not(Key in['0'..'9', #8 , 'A'..'F' , 'a'..'f']) then
begin
Beep;
Key := #0;
end;
if ssCTRL in Shift then
begin
Beep;
Key := #0;
end;
[As partes desta mensagem que não continham texto foram removidas]
Olha não posso colocar assim pois o usuario só pode digitar letras q seja de
"a" até "f" .. se eu colocar dessa maneiro só vou liberar o "a" e o "f", mesmo
assim não resolveria o problema de liberar a tecla Ctrl + c ou v
- Mensagem original
De: Jorge Ericsson <[EMAIL PROTECTED]>
Para:
- Mensagem original
De: Delphi Sql <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 9 de Maio de 2008 16:35:53
Assunto: [delphi-br] Exceção de bloqueios de teclas
Boa Tarde
é o seguinte em um edit coloquei o seguinte codigo no evento OnKeyPress
if not(
9 matches
Mail list logo