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 suite组件页面上，您拥有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;

DelphiXE2：如何将数据从数据库显示到NextGrid

2 个答案: