Ver Mensaje Individual
  #3  
Antiguo 14-01-2005
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.293
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
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.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita