Delphi 用recno定位记录的当前位置 适合于小型数据库

转载 2012年03月27日 00:06:28

1.if qrytem.isempty=true then qrytem.recno:=-1; //最小值   此情况为 数据源刚打开的时候且数据记录集为空值,不为空则recno:=1;

2.if qrytem.eof=true then qrytem.recno:=qrytem.recordcount;//最大值(数据源不为空)

   //当 recno=qrytem.recordcount时 指向最后一条记录 此时可以再执行一次qrytem.next;而后qrytem.eof才为真,recno值不变

3. //所有qrytem.close;qrytem.open; 此语句 使当前记录位置为 记录集的最前头;或者说为第一条记录;不用执行qrytem.first;语句

   qrytem.open;qrytem.first; //此语句永远是真的  即 初始记录 都存在 且 空时 recno=-1 不空时 recno=1;

   qrytem.open; if qrytem.bof then //此语句永远是真的  即 初始记录 都存在 且 空时 recno=-1 不空时 recno=1;

 

eg://delphi7  qrytem:TAdoQuery;

    if qrytem.isempty=false then   //利用recno属性 定位记录位置

    begin

      r:=qrytem.recno;

      qrytem.close;qrytem.open;

      if r<=qrytem.recordcount then qrytem.recno:=r;

    end;


Delphi AdoQuery

1.if qrytem.isempty=true then qrytem.recno:=-1; //最小值   此情况为 数据源刚打开的时候且数据记录集为空值,不为空则recno:=1; 2.if ...
  • lailai186
  • lailai186
  • 2013年06月03日 18:01
  • 1435

Rs.recordcount=-1的解决办法

利用ADO连接数据库时,Rs.recordcount总是返回-1,可能的解决办法如下:在记录集打开前加上rs.cursorlocation=3  rs.CursorLocation=3 是什么意...
  • xifeijian
  • xifeijian
  • 2013年02月28日 01:38
  • 3849

android ListView 记录当前位置 恢复

为了更好的用户体验,当我们使用 ListView 展示列表内容,用户点击进入下级列表后,返回上级时,我们应当给用户返回到上次所在位置 首先你可能会想到使用: void scrollTo(int x...
  • z1074971432
  • z1074971432
  • 2016年07月26日 20:25
  • 2168

DELPHI获得系统当前时间日期和格式化时间

获得系统当前时间     本例中主要应用了FormatDateTime函数,此函数主要用于将日期时间格式化为指定的字符串。利用该函数可以输出许多形式的时间格式。     程序运行结果如图6...
  • wozengcong
  • wozengcong
  • 2015年04月05日 12:22
  • 7084

百度地图定位 当前位置和地图显示

activity_main.xml 布局
  • ITchengge
  • ITchengge
  • 2016年06月01日 10:40
  • 1658

Delphi 日志输出记录类

{ ******************************************************* } { 单元名:  UntTIO.pas } { 创建日期:2006-1-14 23...
  • warrially
  • warrially
  • 2013年09月12日 11:19
  • 3236

iOS定位操作,获取当前位置

原文地址:http://www.open-open.com/lib/view/open1376353661741.html 摘要: 通过CoreLocation定位,获取到用户当前位置,跟地...
  • loongwong2011
  • loongwong2011
  • 2015年06月12日 14:06
  • 390

MKMapView的使用及定位自己当前的位置

IOS 地图定位,标注地图,获取经纬度: 一、使用MKMapView 定位 二、在地图上通过经纬度标注(大头针) // //  ViewController.m //  ...
  • CoCo12456
  • CoCo12456
  • 2016年08月26日 12:52
  • 2101

Delphi:记录类型、过程指针、函数(方法)指针字段的应用

由于工作关系使用delphi已经有一年时间,
  • jakrq
  • jakrq
  • 2014年10月14日 14:54
  • 887

delphi连接access数据库的步骤(简介)

一、放置adoconnection控件 (ADO组件板中) 1、设置name属性 :简单来说就是该控件的名字 为以后在代码中调用他用的 ,也可以不更改。 2、connectionstring属性:...
  • zisongjia
  • zisongjia
  • 2017年05月23日 15:24
  • 693
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:Delphi 用recno定位记录的当前位置 适合于小型数据库
举报原因:
原因补充:

(最多只允许输入30个字)