Matrix-Effekt

[Skiron]

Das geht auch:

Delphi-Quellcode:

procedure Buchstabieren(Text: string);
var
  i: integer;
begin
  Label1.Caption := '';
  for i := 1 to length(Text) do begin
    Label1.Caption := Label1.Caption + Text[i];
    sleep(100);
  end;
end;