Dbnavigator-Buttons zur Laufzeit ausblenden

[drschubi]

Guten Morgen,

ich möchte je nach Benutzerstatus, den ich aus meiner DB auslese, die DBNavigatorbuttons sichtbar oder unsichtbar machen.

Delphi-Quellcode:

dbnavigator.visibleButtons[nbFirst,nbPrior,nbNext,nbLast,nbInsert,nbDelete,nbEdit,nbPost,nbCancel,nbRefresh];

funktioniert nicht.

Weiss jemand wie die richtige Syntax dafür lautet?

Danke schön

Schubi

[Hoshy]

Buttons setzen:

Delphi-Quellcode:

DBNavigator1.VisibleButtons :=
    [nbFirst, nbLast];

Einzelne Buttons ausblenden:

Delphi-Quellcode:

  DBNavigator1.VisibleButtons :=
    DBNavigator1.VisibleButtons - [nbFirst];

Einzelne Buttons einblenden:

Delphi-Quellcode:

  DBNavigator1.VisibleButtons :=
    DBNavigator1.VisibleButtons + [nbFirst];

Gruß
Andi

[drschubi]

Hi Andy vielen Dank,

die Lösung habe ich auch gerade getestet, allerdings liegt es wohl an der verwendeten Komponente( BsSkin von Almdev), sagt mir immer
Inkompatible Typen: 'TbsNavigateBtn' und 'TNavigateBtn', muss ich mich mal an ALMDEV wenden.

Mit Standardkomponente funktioniert das einwandfrei.

Gruß Schubi