Teclado - Bloquear acentos no main form

Delphi

10/04/2003

Boa noite galera... queria saber o seguinte: no meu form principal, tenho varios campos de input de texto (edits, comboboxes, richedits, etc) e queria bloquear os acentos... gostaria de saber como faz para bloquear totalmente os acentos no form, no application ou sei la (pode ser habilitando de 0..9, a..z, tratando o backspace e o espaco, queria saber mesmo como faz, um outro jeito que nao seja pondo codigo no keydown de cada campo, pois tem muuuuuitos... se alguem souber, por favor ajude este pobre mortal!!!
valeu!!!


Zerbinatti

Zerbinatti

Curtidas 0

Respostas

Lord_angel

Lord_angel

10/04/2003

alow,

cara, isso eh ¬$#@da mesmo, eu tbem preciso em muitos casos evitar que acentos sejam digitados, para tanto coloquei no onkeypress dos forms que nao devem aceitar acentos

if not (key in [´A´..´Z´,8] then key := 0;

obs: coloque tudo que vc quer aceitar entre []

ow senao crie um array com os acentos que vc nao quer aceitar e coloca

if key in ArrayAcentos then key :=0;

nao se é a melhor forma de fazer, mas aki funciona e nao da trabalho =]

vlw?


GOSTEI 0
POSTAR