pf8Bit seltsames aussehen der Palette

[EWeiss]

Boahh das dauert aber viel länger als mit den RGB Farben.

Delphi-Quellcode:

      if bScanLines then
      begin
        QueryPerformanceCounter(timeDraw0);
        k := BuffBMP.Height - i - 1;
        P := BuffBMP.ScanLine[k];

        Move(P[OffsetX], P[0], (BuffBMP.Width - OffsetX));

        for m := 0 to pred(OffsetX) do
          P[BuffBMP.Width - OffsetX + m] := Value;

        QueryPerformanceCounter(timeDraw1);
        timeDraw := timeDraw + (timeDraw1-timeDraw0);
      end

Da muss ich wohl noch was Tüfteln

gruss