发布网友 发布时间:2022-04-23 00:39
共3个回答
热心网友 时间:2023-10-09 10:38
假设你的数据集是ADOQuery1,连接excel,打开数据的原理就不说了。
procere TForm1.Button1Click(Sender: TObject);
var
i,j: Integer;
begin
StringGrid1.ColCount:=ADOQuery1.FieldCount+1;
StringGrid1.RowCount:=ADOQuery1.RecordCount+1;
ADOQuery1.First;
for i:=1 to ADOQuery1.RecordCount do
begin
for j:=1 to ADOQuery1.FieldCount do
begin
StringGrid1.Cells[j,i]:=ADOQuery1.Fields[j-1].AsString;
end;
ADOQuery1.Next;
end;
end;
热心网友 时间:2023-10-09 10:38
都是表格,导了有什么用处呢,两种表格中的任一格都称为单元格,都是通过(1,2)行列标来引用表述,表格中的内容可以通过赋值语句来更新.
热心网友 时间:2023-10-09 10:39
table1设置对应你的数据库中的表;
dataset1设置datsourcr=table1;
stringgrid1设置数据源dataset1。
so easy追问我不需要导入进数据库,就是想将excel表里的数据导入stringgrid1中,我是用来做盘点功能用的。
追答大哥,你的表必须通过odbc设置数据源,在delphi中是通过访问数据库访问表的。先学学连接数据库吧!