- for i:=0 to FBackPuffer.Width div (FZoom div 10) do begin
 - FBackPuffer.Canvas.MoveTo(i*(FZoom div 10),0);
 - FBackPuffer.Canvas.LineTo(i*(FZoom div 10),FBackPuffer.Height);
 - end;
 - FBackPuffer.Canvas.MoveTo(0,0);
 - for i:=0 to FBackPuffer.Height div (FZoom div 10) do begin
 - FBackPuffer.Canvas.MoveTo(0,i*(FZoom div 10));
 - FBackPuffer.Canvas.LineTo(FBackPuffer.Width,i*(FZoom div 10));
 - end;
 

