No Encuentreo evento OnKeyPreess

[cloayza]

Puedes usar el evento OnTyping

Existe una diferencia entre ambos eventos, el OnChange se dispara cuando el Control pierde el foco (Se cambia a otro TEdit), en cambio el OnTyping, se dispara cada vez que digitas un caracter en el control...

Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
     Label2.Text:='OnChange->'+Edit1.Text;
end;

procedure TForm1.Edit1Typing(Sender: TObject);
begin
     Label1.Text:='OnTyping->'+Edit1.Text;
end;

Espero te ayuda, saludos cordiales