Français
Source/ Codesnippets

Erstellen Menüpunkt Popup à droite

 

KompilierenMarqueSéparation
Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Menüpunkt (PopUp) ganz rechts erstellen
DEF SetMenuItemInfo(4) ! User32,SetMenuItemInfoA
DEF DrawMenuBar(1) ! User32,DrawMenuBar
DEF &MIIM_TYPE $010
DEF &MFT_RIGHTJUSTIFY $04000
Declare Ende&,MenuItemInfo#,MenuHelp$,MenuHelp#
WindowStyle 27
cls
PopUp DateiIndex 0
AppendMenu 100,Ende
PopUp BearbeitenIndex 1
AppendMenu 101,hier gibt es nichts zu bearbeiten
PopUp DummyIndex 2
AppendMenu 102,Hilfe
MenuHelp$ = Hilfe
Dim MenuHelp#,Len(MenuHelp$) + 1
String MenuHelp#,0 = MenuHelp$
Dim MenuItemInfo#,44
Long MenuItemInfo#,0 = 44------------------SizeOf(..)
Long MenuItemInfo#,4 = &MIIM_TYPE----------Mask
Long MenuItemInfo#,8 = &MFT_RIGHTJUSTIFY---fType
Long MenuItemInfo#,36 = MenuHelp#----------dwTypeData
SetMenuItemInfo(&hMenu,2,1,MenuItemInfo#)Menüpun kt 3 (Index 2) neu setzen
Dispose MenuItemInfo#
Dispose MenuHelp#
DrawMenuBar(%hwnd)
SetFocus(%hwnd)

Whilenot Ende&

    Waitinput

    If MenuItem(100)

        End

    Endif

EndWhile

Fin
 
16.07.2007  
 



Zum Quelltext


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

1.739 Views

Untitledvor 0 min.
Thomas Freier30.01.2024
H.Brill05.02.2022
Manfred Barei29.02.2020
Hans Hermann09.07.2014
plus...

Themeninformationen

cet Thema hat 1 participant:

unbekannt (1x)


Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie