FlexPro
HistoryBase
Ingénierie
Formation
Téléchargements
Assistance FlexPro
Connaissance
Communauté
À propos de nous
Références
Emplois
Contact général
Liste des revendeurs
Assistance FlexPro
FR
DE
EN
Porte-plaquette
Produits et solutions
Support et téléchargements
Entreprise
Magazine
Contact
Langue
MyWeisang

Paramètres du compte.

Topic

Creating independent editboxs in a toolbar

Page d'accueil ' Communauté ' Automation et VBA ' Création de boîtes d'édition indépendantes dans une barre d'outils

Voir les messages de 3 - 1 à 3 (sur un total de 3)
  • Auteur
    Messages
  • #34930
    Jean Dalmayrac
    Participant

    I’m trying to create a toolbar with 3 editBoxs via VBA. Here is the code :
    [i] Dim emaToolBar As CommandBar
    Dim myCombobox As CommandBarComboBox
    Dim angle1List As CommandBarComboBox
    Set emaToolBar = Application.CommandBars.Add(“Custom”, fpBarPositionTop, True)
    Set btnUp = emaToolBar.Controls.Add(Type:=fpControlTypeButton)
    Set btnUp = emaToolBar.Controls.Add(Type:=fpControlTypeButton)
    Set angle1List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)
    Set angle2List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)
    Set angle3List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)[/i]
    But when I change the content of one of the editBoxs, the 2 others change at the same time and display the same value as the first one.
    Could you please explain me how to create 3 independent editboxs in the same toolbar.
    Thanks,

    Jean

    #34932
    Jean Dalmayrac
    Participant

    I’m trying to create a toolbar with 3 editBoxs via VBA. Here is the code :
    [i] Dim emaToolBar As CommandBar
    Dim myCombobox As CommandBarComboBox
    Dim angle1List As CommandBarComboBox
    Set emaToolBar = Application.CommandBars.Add(“Custom”, fpBarPositionTop, True)
    Set btnUp = emaToolBar.Controls.Add(Type:=fpControlTypeButton)
    Set btnUp = emaToolBar.Controls.Add(Type:=fpControlTypeButton)
    Set angle1List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)
    Set angle2List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)
    Set angle3List = emaToolBar.Controls.Add(Type:=fpControlTypeEdit)[/i]
    But when I change the content of one of the editBoxs, the 2 others change at the same time and display the same value as the first one.
    Could you please explain me how to create 3 independent editboxs in the same toolbar.
    Thanks,

    Jean

    #34931
    Bernhard Kantz
    Participant

    The reason for the synchronization of the controls is that you also can add several built-in edit controls or combo boxes to one or different custom toolbars. In this case the contents of the controls has to be synchronized as they have all to be in sync with the current selection.
    Of course this is not correct for custom edit controls or combo boxes. We will fix this behavior in the next release of FlexPro.
    Thanks for reporting this issue.

    Support
    support@weisang.com

Voir les messages de 3 - 1 à 3 (sur un total de 3)
  • Vous devez être connecté pour répondre à ce sujet.