delphi怎么读取iDispatch类型的记录集，在线等

Posted 2023-05-06

参考技术A 首先，记录集的传递需要通过 TClientDataSet 才能进行。
mysql中 TINYINT(1) 恰巧是 BOOL, BOOLEAN 的同名，你可以把字段定义为TINYINT(3)

Delphi定位TDataSet数据集最后一条记录

function TF.GetID(x,y:String):String;
var
StrSQL:String;
dst_temp:TDataSet;
begin
try
StrSQL='XXXX Order by ID'
dst_temp:=GetDataSetFromOracle(StrSQL); //此处自定义的函数
//在这里由于dst_temp可能会有几条记录，确定的是只有ID号不一样
//要指向dst_temp的最后一条数据，改怎么操作？
finally
if assigned(dst_temp) then freeandnil(dst_temp);
end;
end;

参考技术A dst_temp.last;//焦点会跳到数据集中的最后一行 参考技术B dst_temp.last ;//最后一条
dst_temp.first ;//第一条
dst_temp.next ;//下一条
dst_temp.prior;//上一条本回答被提问者采纳