delphi如何将excel数据导入stringgrid1中,请贴详细代码和注释,谢谢!!

发布网友 发布时间: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中是通过访问数据库访问表的。先学学连接数据库吧!

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com