Delphi-Quellcode:
procedure TypeString(RE: TRichEdit; s: String; wait: Word);
var
i: integer;
begin
for i := 1 to Length(s) do
begin
RE.Text := RE.Text + s[i];
Sleep(wait);
Application.ProcessMessages;
end;
end;
Wenn du nicht willst, dass die Form immer kurz einschläft wärend des Wartens, nimm die Prozedur Delay anstatt Sleep. Der Code ist nicht getestet, dürfte aber klappen. Mit der Wartezeit ("wait") musste halt etwas rumexperimentieren.
//Edit: "type" als Prozedurenname ist etwas ungeschickt
