[AlexSku]

На форме Edit (без текста), Timer (Enabled=false) и кнопка.

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.Text:= 'a';
  Timer1.Enabled:= true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Timer1.Enabled:= false;
  Edit1.Text:= Edit1.Text + 'b';
end;