Código Delphi [-] procedure TCnxDatos.DSTablaDataChange(Sender: TObject; Field: TField); begin Label1.Caption := IntToStr(ADOTabla1.RecNo+1); end;
procedure TCnxDatos.DSTablaDataChange(Sender: TObject; Field: TField); begin Label1.Caption := IntToStr(ADOTabla1.RecNo+1); end;