Gallery - getItemScreenTip

 

Gallery

Der Callback liefert jedem Gallery Item ein Screentip - String zurück

 









Beispiel XML Ribbon Datei:

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad">
    <ribbon startFromScratch="false">
        <tabs>
            <tab id="MyTab" label="Gallery Beispiel">
                <group id="MyGroup" label="Gallery Beispiel">
                    <labelControl id="myLabel1" label="Beispiel:" />
                    <labelControl id="myLabel2" label="Gallery" />
                    <gallery id="MyPictureGallery1" 
                      label="Meine Gallerie" 
                      columns="2" rows="2" size="large" 
                      getItemImage="CallbackGetItemImage" 
                      getItemCount="CallbackGetItemCount" 
                      getItemLabel="CallbackGetItemLabel" 
                      getItemScreentip="CallbackGetItemScreentip" 
                      getItemSupertip="CallbackGetItemSupertip" 
                      getItemID="CallbackGetItemID" 
                      imageMso="PictureEffectsGlowGallery" 
                      getItemWidth="CallbackGetItemWidth" 
                      getItemHeight="CallbackGetItemHeight"
                      getSelectedItemID="CallbackGetSelectedItemID" 
                      onAction="CallbackGalleryOnAction">
                    </gallery>
                </group>
            </tab>
        </tabs>
    </ribbon>
</customUI>  

Funktion in einem Standardmodul:

Sub CallbackGetItemScreentip(control As IRibbonControl, _
                             index As Integer, _
                             ByRef screentip)
    ' Callback Liest den Screentip für ein Gallery Item
    ' aus der Tabelle und gibt diesen zurück
    Select Case control.ID
        Case "MyPictureGallery1"
            screentip = DLookup("txtName", "tblBilder", _
                                "txtPicName='" & _
                                Format(index, "00") & "'")
        End Select
End Sub




Sie finden dieses Beispiel auch in der Beispieldatenbank 2




Zurück