Français
Source/ Codesnippets

menu Programmdesign

 

Normann
Strübli
:?: :?: :?:

comment important ist Eurer attitude pour cela gute air eines Programmes?
bien sûr, es soll simple trop servir et funktionell son, mais pouvoir es avec quelque chose plus Pep pas ungleich plus Amusement un Programme trop servir?
ou bien lohnt qui Aufwand pas et ist unnütze Spielerei?

avec cela mon je maintenant pas irgendwelche ausgefallenen Fensterformen ou bien bunten Grafiken im Hintergrund.
Schlicht sollte es déjà son et dem Anwender un gewohntes Bild bieten,
schließlich soll il sich oui vite zurechtfinden.

comme mögliches Beispiel hab je la fois un Popupmenü herangezogen.
Soll so comment un menu im XP-Style air - bof.
Ladet Euch cela Beispiel doch la fois runter, ensuite peux on cela peut-être. besser
comprendre

on möge mir verzeihen cela qui Code pas wirklich bien auskommentiert ist, is oui seulement zum essayer.
Aussi pourrait Andreas Miethe qui Grundstruktur bekannt vorkommen, qui hab je de seiner XPRFDEMO geklaut

je veux cela Beispiel aussi encore aufarbeiten et einfacher faire car es manquer encore Elemente comment un Subpopupmenü ou bien un einfacher Séparateur. Verbesserungsvorschläge sommes aussi gerngesehen
Evtl. Packe je cela ganze ensuite dans un Include... mais erstmal Fragen
si sich qui Aufwand lohnt.

Nebenbei serait mich intéresser si cela Beispiel chez chaque fonctionne, peux
es chez mir seulement sous XP testen.

Achja, sans Xprofan fonctionne là malheureusement nix

écrit mir Eure attitude
 
05.06.2004  
 




Rolf
Koch
Hi Normann,
total GEIL!
je personnelle bevorzuge solche grafischen Spielerein. peut-être hat on es dem Roc déjà angemerkt
je suis baff, enfin la fois une Grundlage, quelle qui altbackenen Menüs verwirft - qui finde je, sommes mittlerweile quelque chose comme de fastidieux.
SUPER
malheureusement hab je aussi XP et voilà oui logisch, qui es comment chez Dir fonctionne.
NORMANN MACH WEITER DAMIT
 
05.06.2004  
 




Ragnar
Rehbein
hi

habe la fois une kurzen test sous w2k et win98 gemacht.
w2k -> alles ok oui c'est ca comment chez XP
win98 -> funktioniert grundsätzlich, cependant volonté qui farben qui la ligne dans qui sich qui souris est pas hervorgehoben. seulement qui schrift wird sais.
qui icons avons d'abord alle qui la couleur comment cela hervorgehobene icon.
chez einmaligem herüberfahren wird vous ensuite heller et ändert sich ensuite seulement encore si le souris drüberfährt.

r.r.
 
09.06.2004  
 



c'est super!!! qui kleinen Symbole à gauche sommes aba un paire pixel trop hoch, ou bien? je mon chez mir sommes qui pas mittig.

iF
 
09.06.2004  
 




Dietmar
Horn
Salut,

habe kurz sous ME getestet.

Ergebnis: -> comment chez r.r. sous win98

Dietmar
 
Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V.  [...] 

Windows 95 bis Windows 7
Profan² 6.6 bis XProfan X2 mit XPSE

Das große XProfan-Lehrbuch:  [...] 
10.06.2004  
 




Normann
Strübli
merci erstmal, je hab là wohl encore un peu trop 1faire...

je hoffe je trouve qui Zeit am WE et werde cela ganze la fois
komplett réviser soll oui später aussi simple einzubinden son

Den faute avec den Farben werd je ensuite wohl aussi encore trouver
je denke cela ganze est un Problem avec qui Transparenz
 
10.06.2004  
 




Frank
Abbing
Hi,

alors je trouve, cela sieht encore irgendwie faux aus (siehe Screenshot).

- qui weiße Hintergrundsfarbe stimmt scheinbar pas.
- à gauche près de den Icônes ist zuviel leerer place.
- chez markierte Entrées ist qui Text pas sichtbar.
- Einträge, qui Schonmal markiert étions, volonté à gauche 1-2 Pixel plus large
 
11.06.2004  
 




Normann
Strübli
[quote-part:f4279d66e3] alors je trouve, cela sieht encore irgendwie faux aus (siehe Screenshot). [/quote-part:f4279d66e3]
eh, tu as oui so droite...
[quote-part:f4279d66e3] qui weiße Hintergrundsfarbe stimmt scheinbar pas. [/quote-part:f4279d66e3]
Doch, sais ist eigentlich richtig. Votre anderen Menüs müssten doch aussi
so son ou bien? peux oui la fois dans deiner Systemsteuerung qui la couleur pour Menüs ajuster ensuite ist qui aussi anders
[quote-part:f4279d66e3] à gauche près de den Icônes ist zuviel leerer place. [/quote-part:f4279d66e3]
Yep! , fehlt cela Bild. Sollte eigentlich so air comment unten.
[quote-part:f4279d66e3] chez markierte Entrées ist qui Text pas sichtbar. [/quote-part:f4279d66e3]
cela besagte Problem avec qui Transparenz.
[quote-part:f4279d66e3] Einträge, qui Schonmal markiert étions, volonté à gauche 1-2 Pixel plus large[/quote-part:f4279d66e3]
Frechheit!
mais merci.

comment déjà erwähnt werde je mich bemühen (cela klingt toujours irgendwie négative ) cela ganze am Wochenende trop bereinigen et une vernünftige Include trop bricoler qui aussi ausreichend dokumentiert ist.
 
11.06.2004  
 




Normann
Strübli
Hilfäää,

mannomann is cela compliqué pour une comment mich!
je versuche maintenant depuis Stunden mittels qui API-Funktion
GetMenuItemInfo qui paramètre eines ausgewählten Menüpunktes trop
bestimmen mais qui Funktion liefert mir toujours 0 zurück.

mais la fois lente zum nachvollziehen...

Erstmal Struktur erstellen...
KompilierenMarqueSéparation
cela était Schonmal joli simple...
alors plus:

Aufruf qui Funktion:

BOOL WINAPI GetMenuItemInfo(
HMENU hMenu,
UINT uItem,
BOOL fByPosition,
LPMENUITEMINFO lpmii
);

qui Funktion erwartet comme ersten paramètre cela Handle des Menüs
et comme zweiten qui ID. qui Dritte paramètre gibt seulement à si es sich chez
dem zweiten paramètre um une Positions-ID des Menüeintrages ou bien une
Menu ID négoce.

alors hab je folgendes gemacht:
WM_Menuselect wird gesendet si qui Anwender un Eintrag auswählt hat.
qui eigene Struktur Itemselect contient seulement cela Handle des Menüs
et den gewählten Eintrag.
KompilierenMarqueSéparation
...

IF Message& = ~WM_MENUSELECT

    ItemSelect#.Hmenu& = lParam&                 Handle des gewählten Menüs
    ItemSelect#.uItem& = LOWORD(wParam&)  ID des Eintrages
    Return 0

Endi
...

So maintenant kenne je cela Handle des Menüs et qui ID.
Theoretisch peux je maintenant alors qui Funktion appel.
KompilierenMarqueSéparation
~GetMenuItemInfo(ItemSelect#.Hmenu&,ItemSelect#.uItem&,0,MenuItemInfo#)

maintenant gibt mir qui Funktion allerdings seulement un nüllchen zurück

Hoffe la fois nie gemacht pas trop compliqué et knapp erklärt, mais vous êtes
oui alle entier joli helle
 
11.06.2004  
 




Normann
Strübli
Ok, ensuite aller wir cela la fois anders à
alors maintenant VOLL KONKRET avec mini Beispiel.

qui Funktion GetMenuItemInfo ist weder dans meiner API-BIBLE encore dans
meinem geliebten Petzold dokumentiert, quoique vous déjà depuis Win95
vorhanden ist

oui braucht car ne...aucune homme cet überaus notwendige Funktion???


KompilierenMarqueSéparation
Header-Dateien
 $H windows.ph
 $H structs.ph
Struct MenuItemInfo = ~TMenuItemInfoA
Struktur sieht so aus:
cbSize%, fMask%, fType%, fState%, wID%, hSubMenu&, hbmpChecked&, hbmpUnchecked&, dwItemData&, dwTypeData&, cch%
Declare MenuItemInfo#
Declare hmenu&,Text$,Retval&
DIM MenuItemInfo#,MenuItemInfo
CLS
PopUp "&Datei"                Erstmal Menü erstellen
AppendMenu 100,"irgendwas"
AppendMenu 101,"irgendwie"
hmenu& = ~Getmenu(%hwnd)      her mit dem Menü-Handle
So zwischendurch mal was aus ner VB-Hilfe was den Aufruf von Getmenuiteminfo anbelangt:
Funktions Parameter:
hMenu
Erwartet den Handle eines Existierenden Menüs. (also hmenu&)
uItem
Erwartet einen ID der den Menüeintrag Identifiziert. Dies kann ein Positions-ID oder ein Menü-ID sein,
je nach dem was in "fByPosition" angegeben wird. (also z.B. 100)
fByPosition
Wird hier ein wert "ungleich 0" angegeben so erwartet die Funktion bei "uItem" den Positions-ID des
Menüeintrages, andernfalls muss bei "uItem" der Menü-ID angegeben werden. (also hier 1)
lpmii
Erwartet eine  MENUITEMINFO-Struktur die voreingestellt ist um die Informationen zu Empfangen.
Zu diesem Zweck müssen die "cbSize, fMask, dwTypeData und cch" Optionen der Struktur gesetzt sein
um erfolgreich die Informationen zu ermitteln. (also die Struktur MenuitemInfo#)
Also erstmal cbSize, fMask, dwTypeData und cch mit Werten bestücken:
Text$ = @space$(256)
MenuitemInfo#.cbSize% = @SizeOf(Menuiteminfo#)  Größe der Struktur
MenuitemInfo#.fMask% = ~MIIM_STATE | ~MIIM_TYPE Das was ich an "Info" haben will
MenuitemInfo#.dwTypeData& = @addr(Text$)        Hier bin ich mir nicht sicher wird hier die Adresse der Variablen
erwartet???
MenuitemInfo#.cch% = 256                        Länge des Menü-Item textes
SO JETZT SOLLTE ES DOCH KLAPPEN !?
RETVAL& = ~GetMenuItemInfo(Hmenu&,100,1,Menuiteminfo#)
Print "GetmenuitemInfo Returns:" ,RetVal&

If Retval& = 0

    Print "War wieder nix!"

else

    Print "Ich liebe Dich!"

endif

waitinput
 
13.06.2004  
 




Andreas
Miethe


un kleine Anregung ?
KompilierenMarqueSéparation
 $H windows.ph
 $H structs.ph
Struct MenuItemInfo = cbSize&, fMask&, fType&, fState&, wID&, hSubMenu&, hbmpChecked&, hbmpUnchecked&, dwItemData&, dwTypeData&, cch&
Declare MenuItemInfo#
Declare hmenu&,Text$,Retval&
DIM MenuItemInfo#,MenuItemInfo
CLS
PopUp "&Datei"                Erstmal Menü erstellen
AppendMenu 100,"irgendwas"
AppendMenu 101,"irgendwie"
hmenu& = ~Getmenu(%hwnd)      her mit dem Menü-Handle
Text$ = @space$(256)
MenuitemInfo#.cbSize& = SizeOf(Menuiteminfo#)
MenuitemInfo#.fMask& = ~MIIM_STATE | ~MIIM_TYPE
MenuitemInfo#.fType& = ~MFT_STRING
MenuitemInfo#.dwTypeData& = addr(Text$)
MenuitemInfo#.cch& = 256Buffer-Groesse für Text$
RETVAL& = ~GetMenuItemInfo(Hmenu&,100,0,Menuiteminfo#)
Print "GetmenuitemInfo Returns:" ,RetVal&

If Retval& = 0

    Print "War wieder nix!"

else

    Print "Ich liebe mich!"
    Print Trim$(Text$)

endif

waitinput
 
Gruss
Andreas
________ ________ ________ ________ _
Profan 3.3 - XProfanX2
Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit
ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher
Homepage :  [...] 
13.06.2004  
 




Normann
Strübli
Arrghh!

non, et je Trottel hab mich toujours sur qui Struktur dans qui Windows.ph sortir de!

mais qui einzige Unterschied mais est cela dans qui Headerdatei partiellement integer statt longint. stehen

mais dans qui Profan hilfe steht doch:[quote-part:89b0dfcc1a] Integervariablen peut dans einem 32-Bit-System qui gleichen Werte comment Longint-Variablen avons [/quote-part:89b0dfcc1a]
alors pourquoi funzt cela avec cela pas?
Ist cela un faute dans qui Windows.ph?

aussi seulement nochmal so zum Verständnis...

sur jedenfall Andreas je DANKE DIR!!!

 
13.06.2004  
 




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

26.397 Views

Untitledvor 0 min.
Gast.081525.08.2024
Thomas Freier30.01.2024
RudiB.18.04.2021
Manfred Barei28.03.2020
plus...

Themeninformationen



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