没人能解决吗?如何取得dbgrid的行号(200)

  • 主题发起人 主题发起人 amourz
  • 开始时间 开始时间
A

amourz

Unregistered / Unconfirmed
GUEST, unregistred user!
不要跟我说dbGrid1.DataSource.DataSet.Recno,我是用的ltBatchOptimistic的,数据根本还没写入数据库的,ehlib的dbgrideh就有这个功能的,可以选择是否选择显示行号,问题是我如何获取呢?或者我把问题改变下描述:有个dbgrid,连着一个table,用的是ltBatchOptimistic方法更新的,我需要在保存记录时候,把行号也保存进数据库,比如第一行就是1,第二行就是2。
 
用 sql语句可以实现
 
你说的行号是指组件上的第几行?还是数据表里的第几行?如是指组件上的第几行,如下:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, StdCtrls, ADODB, DBGrids, Grids;type // 同一单元内可访问其它声明类的受保护属性 TDBGrid = class(DBGrids.TDBGrid) {public property Row; end}; TForm1 = class(TForm) DBGrid1: TDBGrid; ADOQuery1: TADOQuery; DataSource1: TDataSource; procedure DBGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin Caption := Format('当前行号为:%d.', [DBGrid1.Row]);end;end.
 
后退
顶部