1、准备
编译前将Options->Compiler->Debugging中的Debug information、Use Debug DCUS、Linker->EXE and DLL options中的Include TD32 debug info勾选，Packages->Runtime packages下的Build with runtime packages不勾选，重新编译。
2、测试
var grid,dataset:OleVariant;
begin
grid:=Sys.Process('Project1').VCLObject('Form1').VCLObject('dbgrdh1');
dataset:=grid.DataSource.DataSet;
//以下均相对于dataset
//取表格内值
Fields.Fields[0].AsString;
//列名
FieldList.Strings[0];
//行数
RecordCount;
//行号
RecNo;
end;