Kleines VCL-Problem

[Wolfgang Mix]

Nach Klick auf Button1 wird 'Mix#' in Edit1 nicht angezeigt,
nach ca. 5 sec. wohl aber der geänderte Text.
Was mache ich falsch?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
  s:='Mix#';
  Edit1.Text:=s; //Klappt nicht
  delete(s,1,3);
  sleep(5000);
  Edit1.Text:=s;
end;

end.