请教如何从dbgrid获取数据，不用dataset方法

[shuaialang]

1我在航天金税导出界面上加载了一个dll文件，启动的时候会在窗体上创建一个按钮
2.点击按钮的时候，跨进程获取dbgrid，再进一步得到dataset，获取他的数据

前台显示都是正常的，但是我使用 dataset进行导出的时候，出现了乱码
for i := 0 to c - 1 do
app.cells(1, 1 + i) := DBGrid.Columns[i].Title.Caption;
以上代码先获取表头写入excel，

以下代码循环获取表体写入excel
for i := 0 to c - 1 do
app.cells(j + 1, 1 + i) := DBGrid.DataSource.DataSet.FieldByName(DBGrid.Columns[i].FieldName).AsString; // DBGrid.DataSource.DataSet.Fields[i].AsString;
DBGrid.DataSource.DataSet.Next;

查看数据库后发现数据库里也是加密的，获取得到的也是乱码（图2）。
我该用什么方法获得前台显示的这些内容。。

[Playmaster]

接分

[xjq2003]

[shuaialang]

搞定，1楼送分


type
TCusGrid=class(TDBGrid) ;

TCusGrid(DBGrid).GetEditText(i+1,2);