组件stringgrid显示ORCAL数据库中的数据,具体如何操作
菜鸟一名,求大神指导。。
越详细越好!具体每部的操作,具体的编程。!!
不胜感激!

解决方案 »

  1.   

    大概是这样,你再改改吧
    procedure TForm27.FormCreate(Sender: TObject);
    var
      row, col: Integer;
    begin
      self.StringGrid1.RowCount := self.qry1.RecordCount;
      qry1.First;
      row := 0;
      while not qry1.Eof do
      begin
        for col := 0 to qry1.Fields.Count - 1 do
          StringGrid1.Cells[col, row] := qry1.Fields.Fields[col].Value;
        row := row + 1;
      end;
    end;