Fórum Verificar determinada letra no edit #264640
08/01/2005
0
CAROS AMIGOS
ESTOU FAZENDO UM NAVEGADOR SIMPLES QUE NAO PODE ACESSAR O EXPLORER ENTAO COMO EU FAÇO PARA VERIFICAR O CONTEUDO DIGITADO NO EDIT.TEXT SE TIVER DIGITADO C:\ OU D:\ ELE BLOQUEI
ESTOU FAZENDO UM NAVEGADOR SIMPLES QUE NAO PODE ACESSAR O EXPLORER ENTAO COMO EU FAÇO PARA VERIFICAR O CONTEUDO DIGITADO NO EDIT.TEXT SE TIVER DIGITADO C:\ OU D:\ ELE BLOQUEI
Rafael Roni
Curtir tópico
+ 0
Responder
Posts
09/01/2005
Fabio.hc
Tente assim:
procedure TForm1.Edit1Exit(Sender: TObject);
begin
if copy(Edit1.Text,2,2) = ´:\´ then
begin
ShowMessage(´Não é permitido ...´);
Edit1.SetFocus;
end;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)