TSCARBitmap.SetPixels

From SCAR Divi Manual
Jump to: navigation, search

Definition

Member of TSCARBitmap.
procedure TSCARBitmap.SetPixels(const TPA: TPointArray; const Color: Integer);

Availability

SCAR Divi 3.37 > Current

Description

Sets all of the pixels at the coordinates in the given TPointArray TPA to the color given in Color. If a coordinate in TPA is outside of the bitmap's boundaries, the method will throw an exception.

Example

var
  TPA: TPointArray; 
  Bmp: TSCARBitmap;

begin
  TPA := RandomTPA(10000, 500, 500);   
  Bmp := BmpFromTPA(TPA, clGreen, clBlack);
  try                 
    Bmp.SetPixels(TPA, clSkyBlue);
    DebugBitmap(Bmp);  
  finally
    Bmp.Free;
  end;
end.

See Also