Delphi定位TDataSet数据集最后一条记录
functionTF.GetID(x,y:String):String;varStrSQL:String;dst_temp:TDataSet;begintryStrSQL...
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; 展开
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; 展开
2个回答
展开全部
dst_temp.last;//焦点会跳到数据集中的最后一行
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dst_temp.last ;//最后一条
dst_temp.first ;//第一条
dst_temp.next ;//下一条
dst_temp.prior;//上一条
dst_temp.first ;//第一条
dst_temp.next ;//下一条
dst_temp.prior;//上一条
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询