关于 DrawGrid1 控件的用法 —————— 在线等待！！！！

Question

大家好！
      我的DrawGrid1控件有5列 ，我怎么给DrawGrid1 控件的这5个列动态的定义列的名字？？？？？？？？？？？？？？？又怎么给每一行赋值？？？？？？？？？？？？在线等待！！！

Answer 1

//TDrawGrid的单元格是通过OnDrawCell事件绘制出来的
procedure TForm1.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var
  S: string;
begin
  if ARow = 0 then
  begin
    S := IntToStr(ACol);
    DrawText(TDrawGrid(Sender).Canvas.Handle,
      PChar(S), Length(S), Rect, DT_LEFT
    );
  end;
end;
//想赋值为什么不用TStringGrid?

Answer 2

怎么用TStringGrid啊?有控件吗？？/还是直接用代码操作？？/怎么操作啊 ？？？？？？？？？？？？？？？？？