sql - DelphiXE2：如何将数据库中的数据显示到 NextGrid

Question

我四处寻找，问我学校的当地老师。但是我无法找到如何将数据从数据库显示到 NextGrid。我使用了 SELECT * 但它没有显示在下一个网格上。

ZQuery1.Close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Text := 'SELECT * FROM tb_siswa';
ZQuery1.Open;

NextGrid1.ClearRows;
x:= 0;

while not ZQuery1.Eof  do
begin
  NextGrid1.AddRow();
  NextGrid1.Cell[0,x].AsString := ZQuery1.Fields[0].AsString;
  NextGrid1.Cell[1,x].AsString := ZQuery1.Fields[1].AsString;
  NextGrid1.Cell[2,x].AsString := ZQuery1.Fields[2].AsString;
  NextGrid1.Cell[3,x].AsString := ZQuery1.Fields[3].AsString;
  NextGrid1.Cell[4,x].AsString := ZQuery1.Fields[4].AsString;
  inc(x);
  ZQuery1.Next;
end;
ZQuery1.Close;

请问有什么支持吗？

Answer 1

在 nex 套件组件页面上，您拥有该NxDataCellSource组件。把它放在表格上。将下一个网格放在表单上。在NxDataCellSource属性中，将数据源更改为您正在使用的数据源ZQuery1。将关联属性更改为NextGrid1（或您已关联到 nextgrid 的其他名称）。将 active 设置为 true 并享受。

Answer 2

我使用 NextGrid1.RowCount-1 这个代码，不需要手动增量值

while not ZQuery1.Eof  do
begin
  NextGrid1.AddRow();
  NextGrid1.Cell[0,NextGrid1.RowCount-1].AsString := ZQuery1.Fields[0].AsString;
  Next;
end;