Flickernder Newsticker - ich hab bald alle Techniken durch

[jfheins]

Also der Code geht bei mir relativ gut, auch bei 100% cpu - dann natürlich sehr langsam

Delphi-Quellcode:

var
  ende, x: Cardinal;
begin
  ende := GetTickCount + 3000;
  x := 800;

  while GetTickCount < ende do
  begin
    PaintBox321.Buffer.Clear (clWhite32);
    PaintBox321.Buffer.Textout(x, 20, 'Hallo');
    PaintBox321.Flush;
    sleep (0);
    if x <= 10 then x := 800
    else dec (x);
  end;

Mit GR32 ...

@Luke: Gerade dann wird es springen, wenn eine lange Zeit zwischen den Frames vergeht