delphi 报表 显示

Question

我把、2个表的数据给拿出来了
显示下面的样子,例如 ID   name   age
 1    aaa     22
 2    bbb     11这样的一个数据,我想用Stringgri 给表现出来,怎么实现
谢谢大家了!

Answer 1

先用query查询取出数据后,开始写入.试试下面的函数
procedure SetGridInfo(StrGrid:TStringGrid;sQuery:TAdoQuery);
var
  i,j:integer;
begin
  StrGrid.RowCount:=2;
  i:=1;
  while not sQuery.eof do
  begin
    StrGrid.Cells[0,i]:=inttostr(i);
    for j:=1 to sQuery.FieldCount do
    begin
      StrGrid.Cells[j,i]:=sQuery.Fields[j-1].AsString;
    end;
    i:=i+1;
    StrGrid.RowCount:=StrGrid.RowCount+1;
    sQuery.Next;
  end;
end;

Answer 2

补充：stringgrid要设置好列数．

Answer 3

stringGrid读取数据库中某个数据表的例子不少
总体思路是两重循环，每个cell显示一个数据
代码基本就如楼上说的，具体自己调整下