Setar um variavel, se digitar alguma tecla
Olá, gostaria que setasse um variavel Modificado= True, se um pessoa digitasse alguma coisa num Edit... Ja pus no KeyPress... porem se a pessoa apertar backespace ou espaco.. ele nao seta a variavel... funciona no KeyDown... porem nao pode setar se for apartado o ENTER nem o ESC... segue o codigo que estou usando, ele nao entra de jeito nenhum, qual a solucao para isto? desde ja agradeco
procedure TFrmCadClientes.EdtNomeKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (not Key = VK_RETURN) and (not Key = VK_ESCAPE) then Modificado := True; end;
Titanius
Curtidas 0
Respostas
Rômulo Barros
01/10/2004
:arrow: [b:00c41c4b3c]Coloque o código no evento OnChange do Edit.[/b:00c41c4b3c]
GOSTEI 0
Titanius
01/10/2004
[quote:f97e9f5d27=´Undeclared Identifier´]:arrow: [b:f97e9f5d27]Coloque o código no evento OnChange do Edit.[/b:f97e9f5d27][/quote:f97e9f5d27]
Vixi, nao tinha pensado nisso.. valeu mesmo!! :lol:
Vixi, nao tinha pensado nisso.. valeu mesmo!! :lol:
GOSTEI 0