Relleno personalizado
 

Hola, aquí les traigo un nuevo reto, ojalas puedan ayudarme. El asunto es como logro este tipo de relleno. Sino existe, como crear uno personalizado. De antemano, gracias.

Hola, si lo quieres implementar tu mismo seria algo asi

Código Delphi [-]
procedure Form1.OnPaint(sender : TObject);
const 
          Colors : array [boolean] of TColor = (clBlack,clWhite)
begin
         for i := 0 to clientwidth do
         for j := 0 to clientheight do 
                Canvas.Pixels[i,j] := Colors[(i + j) mod 2 = 0];
end;

por otra banda, quiza te sea mas practico usar el FloodFill del canvas, previamente habiendo cargado un bitmap sencillo con los cuadros (de 2x2, cuadro negro, cuadro blanco y en la siguiente linea cuadro blanco, cuadro negro) en el brush. Para cargar al brush, de la ayuda de delphi:

Código Delphi [-]
var
  Bitmap: TBitmap;
begin
  Bitmap := TBitmap.Create;
  try
    Bitmap.LoadFromFile('MyBitmap.bmp');
    Form1.Canvas.Brush.Bitmap := Bitmap;
    Form1.Canvas.FillRect(Rect(0,0,100,100));
  finally
    Form1.Canvas.Brush.Bitmap := nil;
    Bitmap.Free;
  end;

end;

Exclentisimo, te lo agradesco enormemente.