StringGrid问题!急!急

Question

如何在StringGrid中直接输入数据:StringGrid.Cells[0,0]:='序号';
StringGrid.Cells[1,0]:='产品名称';
StringGrid.Cells[2,0]:='接班读数';
StringGrid.Cells[3,0]:='交班读数';'序号','产品名称' 这两列的数量是直接从数据库查找出来.'接班读数','交班读数'这两列是要求直接输入数据,请问各位大侠如何实现该功能.

Answer 1

给你段代码参考一下,这是从数据集中读数据到StringGrid表格中:
procedure SetGridInfo(StrGrid:TStringGrid;sOraQuery:TpFIBQuery);
var
  i,j:integer;
begin
  StrGrid.RowCount:=2;
  i:=1;
  while not sOraQuery.eof do
  begin
    StrGrid.Cells[0,i]:=inttostr(i);
    for j:=1 to sOraQuery.FieldCount do
    begin
      StrGrid.Cells[j,i]:=sOraQuery.Fields[j-1].AsString;
    end;
    i:=i+1;
    StrGrid.RowCount:=StrGrid.RowCount+1;
    sOraQuery.Next;
  end;
end;