Zitat von
Rackergen2:
Zitat von
neolithos:
Delphi-Quellcode:
procedure ???(lbl : TLabel; const sText : String);
var i : Integer;
begin
for i := 1 to Length(sText) do
begin
lbl.Caption := Copy(sText, 1, i);
Application.ProcessMessages;
Sleep(200);
end;
end;
Nicht getestet, aus dem Kopf heraus geschreiben.
Du irrst. Ist zwar das Sleep aus der
Unit Windows.pas aber das tut ja nichts zur Sache.