Viel schneller als Label1.Caption:='abc' und ohne flackern...
Einen Timer mit 100 ms einstellen und mit "Paintbox1.Repaint" ausführen
Delphi-Quellcode:
procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
Paintbox1.Canvas.TextOut(0,0,'dein Text'); //den Text immer noch mit Leerzeichen auffüllen oder letzten Inhalt vorher löschen
end;