怎样用Drawing Grid画一个标准的个人简历表??并在输入的地方嵌入一些编辑控件??

Question

怎样用Drawing Grid画一个标准的个人简历表??并在输入的地方嵌入一些编辑控件??

Answer 1

这个恐怕作不到我的方法是用TPanel拼一个表,一个格一个格的拼,在其中放edit

Answer 2

就用Canvas的MoveTo、LineTo直接画网格吧：
procedure TForm1.FormPaint(Sender: TObject);
begin
  with self.Canvas do
  begin
    Pen.Color := clBlue;
    MoveTo(2, 2);
    LineTo( 400, 2);
    LineTo( 400, 80);
    ...
  end;end;

Answer 3

我原来用image画，做个一维数组存放坐标值和存放内容，呵呵，笨笨的，可是逼急了没有办法了。关注！我的
type  TimagePanel = record
   Imax,Imix:Tpoint;图像的最大最小值
   Imemo:string;//存放内容
end;type TimageGrid = record
   Iw,Ih:integer;//工作区大小
   Imemo:array of TimagePanel;//存放数组
end;var GGridStr:TimageGrid;
大该就是这样了，用Imax,Imix画Imemo，呵呵