Einzelnen Beitrag anzeigen

Natcree

Registriert seit: 5. Mär 2013
502 Beiträge
 
Delphi 7 Enterprise
 
#4

AW: Lauftext von rechts nach links

  Alt 18. Nov 2013, 14:06
Delphi-Quellcode:
var
s:string;
i:integer;
begin
  edit1.text:='Hallo';
  s:=edit1.text;
  for i:=1 to length(s) do
  canvas.textout(50+i*10,50,s[i]);
end;
Wo kann ich hier in der schleife den timer einbauen ? er soll nach jedem Buchstaben eine sekunde warten....
  Mit Zitat antworten Zitat