ENABLED OU DISABLED EM TOOLBAR
Bom dia, seguinte...Em meu form principal tenho uma toolbar com um botão estilo dropdown, neste botão dropdown tem todas as opções de relatórios que o usuário pode imprimir mas como meu programa é por nivel de acesso, ou seja, quando é cadastrado um usuário é especificado o que ele pode ter acesso ou não...O botão dropdown da toolbar é o numero 7...Eu gostaria que eu pudesse escolher qual os relatorios que se pode imprimir até agora eu consigo apenas desativar o botão todo. mas gostaria que fosse desativado não o botão mas sim as opcoes que eu escolhesse...Este é o codigo que estou usando tem como modifica-lo ? Obrigado..
Dim iCount As Integer
For iCount = 1 To Len(SMenu)
If Mid(SMenu, iCount, 1) = 0 Then Toolbar1.Buttons(iCount).Enabled = False
Next iCount
Dim iCount As Integer
For iCount = 1 To Len(SMenu)
If Mid(SMenu, iCount, 1) = 0 Then Toolbar1.Buttons(iCount).Enabled = False
Next iCount
Fazer o disabled dos botões é fácil, mas melhor ainda se você fizer o seguinte, os menus (apesar de no editorde menus não aparecer, pode receber a propriedade TAG), assim como os ButtonMenus de uma toolbar, então ao invés de usar INDEX, você poderia coincidir tags de menus e toolbars, assim o menu desabilitado também reflete na toolbar.
Private Sub Form_Load()
Me.Toolbar1.Buttons(2).ButtonMenus(2).Enabled = False
End Sub
Tópico encerrado , respostas não são mais permitidas