如何在Delphi的advstringgrid里面显示数据库表里的信息

来源:百度知道 编辑:UC知道 时间:2024/05/24 21:42:49
我在窗体上放了query控件,datasouce,database控件,advstringGrid控件,
数据库,和表都建好了,也都连好了,怎么才能把表里的信息通过advstringGrid控件显示出来呢?
上面的问题已经解决了,现在是怎么把advstringgrid里数据,保存到数据库中?

procedure TForm38.Button1Click(Sender: TObject);
var
i, j: Integer;
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select id, publishDate,memstyle,publisher,titleState,telephone,title,checkbox from guest.WULIU');
ADOQuery1.Open;
for i := 1 to ADOQuery1.RecordCount do
begin
for j := 0 to ADOQuery1.FieldCount - 1 do
begin
AdvStringGrid1.Cells[j+2,i]:=ADOQuery1.Fields.Fields[j].AsString;
//advstringgrid1.HideColumn(1);
end;
ADOQuery1.Next;
end;
end;