SergioFeitoza Posted November 15, 2020 Posted November 15, 2020 I have a unidbnavigator and I am trying this code here on event before action procedure TMainForm.UniDBNavigator3BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if button = nbnext then pr_emfoco := uniMainModule.cdsselected.FieldValues['codigo'] + 1; if button = nbprior then pr_emfoco := uniMainModule.cdsselected.FieldValues['codigo']- 1; end; When I compile I get the error Undeclared identifier: 'nbnext' Two questions: a) My uses clause is below. Is it missing any thing ? b) What is the code to do a button of unidbnavigator visible/false in runtime ? My USES clause uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uniGUITypes, uniGUIAbstractClasses, uniGUIClasses, uniGUIRegClasses, uniGUIForm, uniGUIBaseClasses, Menus, uniMainMenu, TypInfo, uniButton, uniRadioButton, uniEdit, uniBitBtn,unicheckbox, UniScrollBox , UniStringGrid , Data.DB, MemDS, DBAccess, MyAccess,ShellAPI, Datasnap.DBClient, UniFSMenuButton, UniFSButton, MLP, uniPanel, uniDBEdit, uniLabel, uniMultiItem, uniComboBox, uniMemo, uniRadioGroup, uniChart, StrUtils, uniSpeedButton, uniDBNavigator, uniBasicGrid, uniDBGrid, uniDBRadioGroup, uniDBComboBox, uniStatusBar, uniImage, uniDBImage, uniProgressBar, uniListBox, uniGroupBox, uniPageControl,math, Vcl.StdCtrls, uniHTMLFrame, UniFSKendoUI; Quote
Sherzod Posted November 15, 2020 Posted November 15, 2020 9 minutes ago, SergioFeitoza said: When I compile I get the error Undeclared identifier: 'nbnext' Uses ... DBCtrls; Quote
SergioFeitoza Posted November 15, 2020 Author Posted November 15, 2020 Just now, Sherzod said: Uses ... DBCtrls; Thank you Sherzod. It working well now. . I tried dbcontrols before but seems that I did some error when typing it Rgds Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.