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