Cuadricular una forma

[Neftali [Germán.Estévez]]

Empezado por luis_sencion

...como puedo cuadricular una forma en delphi, para que tengan un ejemplo es como el componente de zreport.

Prueba a poner un form con un TButton; En el Click programa lo siguiente:

Código Delphi [-]
 const
   GRID_INC = 10;   // Grid cada 10 pixels
 var
   i,j:Integer;
 begin
 
   // Inicializar
   i := 0;
   j := 0;
 
   // A lo ancho
   while i < Self.Width do begin
     // A lo largo
     while j < Self.Height do begin
 
       // Pintar Grid
       Canvas.Pixels[i, j] := clBlack;
       j := j + GRID_INC;
 
     end;
     // Incremenetar y reiniciar
     i := i + GRID_INC;
     j := 0;
   end;

Te puede servir para empezar con algunas pruebas.