Hier vieleich ein paar einzelheiten :
Hier Wird Text zur BMP Convertiert und ein TImage zugeordnet.
Delphi-Quellcode:
Procedure TForm3.CREATE_BMP;
begin
bmp.Width := Canvas.TextWidth( Info );
bmp.Height := Canvas.TextHeight( Info );
bmp.Canvas.TextOut(0,0,Info);
img.Picture.Assign(bmp);
end;
Hier Bewegt der "Timer" die geschichte von Rechts nach Links.
p0 -> ist ein TPanel
Delphi-Quellcode:
procedure TForm23.lauf_tTimer(Sender: TObject);
Begin
if img.Left> (img.width)* -1 then
img.left := img.left - 3
else
img.left := p0.Width;
end;
Der Timer wurde von Intervale 5 bis x ausprobiert.
Windows XP
Delphi 2007
2xCPU a 3 GHz
2x9800GT
4GB
RAM
An Resourcen Liegt es mit sicherheit nicht.
Ich möchte den Lauftext 100% Rückelfrei haben da das Programm in öffentlichen bereich ausgestell wird,
somiut muss er 100%-ig sein.
Danke für eure Hilfe.
shifter