Question

delphi7 TDataSet怎么样存储StringGrid里的值？

我有个用数据流把数据保存为EXCEL文件的函数。
但是函数里传入的数据格式是TDataSet,而我是用StringGrid显示数据的。
现在要求就是把StringGrid里的数据怎么存到TDataSet里面去。
请给代码，谢谢。
StringGrid取值我没有问题。
就是TDataSet的使用问题

Answer 1

把 StringGrid 里的数据存到 TDataSet 里面去，其实就是通过遍历 grid 各行，再 append 记录到 DataSet 中，示例代码：

for i:=0 to stringgrid1.rowcount-1 do
begin
    tbl.append;
    tbl.fieldbyname('字段名').asstring := stringgrid1.cells[1,i];
    ........
    tbl.post;
    //或者直接用 AppendRecord 函数
end;