Hallo ich möchte mit Canvas was auf die Form Zeichnen. Wenn der Timer1 fertig ist bzw er alles geschrieben hat dann soll Timer2 aktiviert werden Hier mal der code ich kriege es nicht hin
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
a:='Anrede:'+' Herr';
inc(i);
if i > length(a)then
begin
Canvas.Font.Name := 'CLARENCE'; //Schriftart
Canvas.Font.Style := [fsBold]; //Fett
Canvas.Font.Height := 18; //Schriftgrösse
canvas.textout(296+i*16,32,a[i]);
if timer1.enabled= true then mediaplayer1.play else mediaplayer1.stop;
end;