Desenhar no Form

Delphi

23/04/2004

Preciso desenhar na superfície do form uma ´malha´ quadriculada, ou seja, vários quadros um ao lado do outro. Imagino que deve ser no evento paint do form, porém não sei como criar várias linhas horizontais e verticais...

Alguem tem alguma dica de como fazer isso?


Mcd

Mcd

Curtidas 0

Respostas

Cebikyn

Cebikyn

23/04/2004

Use os métodos [b:2c0d5f7f0e]MoveTo[/b:2c0d5f7f0e] e [b:2c0d5f7f0e]LineTo[/b:2c0d5f7f0e] da propriedade Canvas do Form:

procedure TForm1.Form1Paint...
begin
  Canvas.MoveTo(10,10); // Vai até o ponto x=10, y=10
  Canvas.LineTo(20,20); // Desenha a linha do ponto 10,10 até 20,20
end;


O Canvas também tem o método Retangle, que desenha um retângulo.


GOSTEI 0
POSTAR