关于stringgrid的简单问题！

Question

想把数据库里的一张表，通过stringgrid显示出来，不知道如何弄？
弄过相反操作，即把stringgrid数据保存到数据库，代码如下，  for i := 1 to StringGrid1.RowCount - 1 do begin
    Scode := StringGrid1.Cells[1,i];    SInsert := 'Insert into Table values ('''+Scode+''')';    DM.adocommand1.CommandText := SInsert;
    DM.aodcommand1.Execute;
  end;有相关代码的也可以发上来看看，马上给分，谢谢！

Answer 1

就一条数据一条数据赋给stringgrid的单元格呀，
比方adoquery,
while not adoquery.eof do
begin....///////这里写赋值语句呀,可通过循环也让stringgrid一条一条往下移动adoquery.next;end;