hi
das ding heist Show_popup_menu
siehe unten
gruss aus finsterhennen
ps. falls du interessiert bist an einer iconbasierter me10-oberfläche
mit zusatzfunktionen (popup fenster mit frei definierbaren befehlen)wie mausklick auf element, bemassung, text, etc. melde dich bei mir. werde dir dann einen screenshot zumailen.
DEFINE Show_popup_menu
TOOLBAR DEL_OLD 'tlb_PopupMenu'
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuRedraw' CAPTION (DGETTEXT 'me10lt'
'Redraw') CATEGORY '' ON_ACTION 'WINDOW AS_DISPLAYED' ON_RIGHT_CLICK ''
PERSISTENT OFF ADD_TO_TOOLBAR 1
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuFit' CAPTION (DGETTEXT 'me10lt'
'Fit') CATEGORY '' ON_ACTION 'WINDOW FIT' ON_RIGHT_CLICK '' PERSISTENT OFF
ADD_TO_TOOLBAR 2
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuNew' CAPTION (DGETTEXT 'me10lt'
'New') CATEGORY '' ON_ACTION 'WINDOW TWO_PTS' ON_RIGHT_CLICK '' PERSISTENT
OFF ADD_TO_TOOLBAR 3
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuLast' CAPTION (DGETTEXT 'me10lt'
'Last') CATEGORY '' ON_ACTION 'WINDOW LAST_WINDOWS' ON_RIGHT_CLICK ''
PERSISTENT OFF ADD_TO_TOOLBAR 4
END
TOOLBAR_ITEM OVER_WRITE 'Separator' ADD_TO_TOOLBAR 5
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuZoom' CAPTION (DGETTEXT 'me10lt'
'Zoom') CATEGORY '' ON_ACTION 'WINDOW ZOOM' ON_RIGHT_CLICK '' PERSISTENT
OFF ADD_TO_TOOLBAR 6
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuPan' CAPTION (DGETTEXT 'me10lt'
'Pan') CATEGORY '' ON_ACTION 'WINDOW PAN' ON_RIGHT_CLICK '' PERSISTENT OFF
ADD_TO_TOOLBAR 7
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuCenter' CAPTION (DGETTEXT 'me10lt'
'Center') CATEGORY '' ON_ACTION 'WINDOW CENTER' ON_RIGHT_CLICK ''
PERSISTENT OFF ADD_TO_TOOLBAR 8
END
TOOLBAR_ITEM OVER_WRITE 'Separator' ADD_TO_TOOLBAR 9
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuStore' CAPTION (DGETTEXT 'me10lt'
'Store') CATEGORY '' ON_ACTION 'WINDOW STORE_WINDOWS' ON_RIGHT_CLICK ''
PERSISTENT OFF ADD_TO_TOOLBAR 10
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenuRecall' CAPTION (DGETTEXT 'me10lt'
'Recall') CATEGORY '' ON_ACTION 'WINDOW RECALL_WINDOWS' ON_RIGHT_CLICK ''
PERSISTENT OFF ADD_TO_TOOLBAR 11
END
TOOLBAR_ITEM 'Separator' ADD_TO_TOOLBAR 12
END
TOOLBAR_ITEM OVER_WRITE 'btn_PopupMenucustomize' CAPTION (DGETTEXT
'me10lt' 'Customize Layout...') CATEGORY '' ON_ACTION
'WUI_TOOLS_CUSTOMIZE' ON_RIGHT_CLICK '' PERSISTENT OFF ADD_TO_TOOLBAR 13
END
TOOLBAR CAPTION (DGETTEXT 'me10lt' 'Popup Menu') ON_RIGHT_CLICK ''
PERSISTENT OFF SHOW_AS_POPUP
END
END_DEFINE
------------------
awi
André Weidmann
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP