TC與Delphi

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;