比如:
var i:integer;
query1.close;
query1.sql.clear;
query1.sql.add('select name from table where....');
query1.open;
StringGrid1.rowcount:=query1.recordcount;//行
StringGrid1.colcount:=2;//列
while not query1.eof do
begin
StringGrid1.Cells[1,query1.recno+1]:=query1.fieldbyname('name').asstring;
query1.next;
end;
上面只列出一个name字段,如果是多个字段更复杂一些