DirectX für Delphi.

[shifter]

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