Langsom TCanvas.Pixels

Det er sikkert fordi billedet \"refreshes\" efter hver pixel - hvad kommandoen hedder til at lave flere updates kan jeg desværre ikke huske, men det var da noget at gå efter. Når du så er færdig med din opdatering, laver du så en Invalidate.

Du skal ikke bruge pixels det ER for langsom. Brug i stedet scanline. Flg er fra Delphi\'s hjælp:
<SNIP>
procedure TForm1.Button1Click(Sender: TObject);

// This example shows drawing directly to the BitMap
var
  x,y : Integer;
  BitMap : TBitMap;
  P : PByteArray;
begin
  BitMap := TBitMap.create;
  try
    BitMap.LoadFromFile(\'..\\Images\\Splash\\256color\\factory.bmp\');
    for y := 0 to BitMap.height -1 do
    begin
      P := BitMap.ScanLine[y];
      for x := 0 to BitMap.width -1 do
        P[x] := y;
    end;
  Canvas.draw(0,0,BitMap);

  finally
    BitMap.free;
  end;
end;
<\\SNIP>