如何用SELECT语句把查询结果显示到stringgrid中?

Question

SELECT FIELD1,FIELD2 FROM T_TABLEFOR J=1 TO RECODERCOUNT DO
BEGIN
  FOR I=0 TO FIELDCOUNT-1 DO
  BEGIN
    STRINGGRIDE[0,0]=FIELD[I].ASSTRING;
    
  END;
  CDS.NEXT;
END;

Answer 1

实际上还需要有以下设置：
with StringGrid do
begin
  Col := ADOQuery1.FieldCount; 
  Row := ADOQUery1.RecordCount + 1;   //多一行来显示列名
  for i := 0 to FieldCount - 1 do
    Cells[i,0] := ADOQuery1.Fields[i].FieldName;
end;
//让后才是显示内容的代码
//当然，最好是设置 FixedRows := 1  
  

Answer 2

上面的程序有错误，Col和Row应该分别是ColCount和RowCount。

Answer 3

for i := 0 to FieldCount - 1 do
begin
    Cells[i,0] := ADOQuery1.Fields[i].FieldName;
    .........
   ADOQuery1.Next;end;