| |
|
|
Normann Strübli | avec Xprofan Ownerdraw-Menüs erstellen...
X-menu Ver. 1.2 ist fertig...
Jedem Menüpunkt peux une eigene Schriftart / Formatierung zugewiesen volonté. Icônes ou bien Checkboxen sommes ne...aucune Problem Funktion zum abfragen / mettons qui Checkboxen Alle Farben sommes maintenant Komplett! anpassbar une Tabelle avec Abkürzungstasten wird automatisch erstellt Dem menu peux un Hintergrundbild zugewiesen volonté
Viel Amusement avec cela |
|
|
| |
|
|
|
| allô Normann...
Votre Demos du cette INC (suis zufällig par-dessus gestolpert) voyons KLASSE aus! cela pourrait je très bien gebrauchen, malheureusement arbeite je mais avec Profan² 7.5 et finde keinen passenden Ersatz pour SIZEOF et peux c'est pourquoi im Augenblick aussi pas beim Weiterentwickeln mithelfen . Um entier de vorne anzufangen et SIZEOF simple rauszuschmeißen fehlt mir aussi qui Zeit.... son Mist! s'il te plaît arbeite plus tour! Finde je simple seulement bien! |
|
|
| |
|
|
|
| cela partie ist formidable! je habs la fois aufstruktoriert, je n'en sais rien pourquoi: |
|
|
| |
|
|
|
| So, nochmal je.
Folgendes, je serait cela X-menu volontiers, weil es so gernial ist, dans den Funktionsumfang des XPSE avec einbringen.
cela hieße, cela qui Progger qui X-menu INC avons doit, avec XPSE cependant seulement statt
appendmenu
z.B.
xappendmenu
et statt
popup
arrêt
xpopup
trop Disposition hat.
XPSE devrait ensuite aus dem xappendmenu, xpopup etc. qui entsprechenden Passagen aus dem X-menu einsetzen.
Weist quoi je mon? je coutume là naturellement Votre Aider.
Im Ergebnis sollte es possible son, z.B. folgendes écrivons trop peut: KompilierenMarqueSéparation Ist seulement un Beispiel comment XPSE qui Sonderattribute parsen pourrait, peut-être gibt es là aussi et avec ca eleganteres.
iF |
|
|
| |
|
|
|
Rolf Koch | Si - geile concept!!! Rolf |
|
|
| |
|
|
|
Normann Strübli | merci pour Euer positives Feedback
hatte malheureusement oublier qc trop erwähnen le moi de letzten vendredi jusqu'à aujourd'hui unterwegs était et so malheureusement pas répondre konnte.
cela partie ist formidable! je habs la fois aufstruktoriert, je n'en sais rien pourquoi:
Weils arrêt un peu unübersichtlich était... merci iF.
Relatif à la XPSE peut wir aussi volontiers dans Angriff prendre mais hab encore (pas entier) verstanden comment je Dir là am besten aider peux...
Salut Normann |
|
|
| |
|
|
|
| Ok, lez begin
alors, cela Einfachste quoi qui Profaner oui anstellen peux mais est eigendlich un: KompilierenMarqueSéparation cette 2-Zeiler ouvrez un Fensterchen et wartet une Klick ab.
maintenant plus: KompilierenMarqueSéparation eh bien, cela is oui encore bien sûr, mais könntest du ne INC construire, quelle folgendes Ermöglicht (erstmal sans jeglichen Schnickschnak): KompilierenMarqueSéparation So, si deine INC alors nen XPopup et nen Xappendmenue hätte, ensuite sollte dans diesem Beispiel ne...aucune Unterschied zum Popup et Appendmenu de XProfan sichtbar son!
qui Erweiterungen faisons später, ok?
So peut wir dem XProfan Step by Step beibringen, ownerdraw-menüs darzustellen. mais alles pour dem freiwillig Motto. cela est si quelqu'un son Prog compilé, et (ensuite oui später) qui XMenu.inc avec eincompiliert, ensuite sollte zunächst ne...aucune Unterschied trop merken son. mais ensuite, si il z.B. (et cela doit wir uns ensuite untereinander ausmachen) Xappendmenu 101,men2:disabled:pic=pic.bmp bla bla bla hatt qui Progger qui Possibilité avec einfacher Syntax sa Menüs réglé aufzupeppen!
mais erstmal trop Schritt 1.
jusqu'à denne, iF |
|
|
| |
|
|
|
Normann Strübli | Hi,
jaja qui Zeit... (qui mir actuellement fehlt) :| gibt malheureusement pas viel nouveau allerdings solltet son qui neue Version runterladen qui zwar aucun neuen Funktionen bereitstellt pour mais une faute moins contient.
si on cela menu avec ALT+? aufgerufen hat wurde qui markierte Menüpunkt incorrect dargestellt. (Hat le reste aucun bemerkt???)
@iF: Sei Je ne böse mais je denke doch je werde seulement à den encore fehlenden Funktionen travailler et si ensuite alles Fertig ist peut wir uns um une intégration im XPSE kümmern... je hab là zwar avec angefangen mais si je à qui INC encore quoi ändere müsstest Du oui De toute façon mitändern et c'est oui irgendwie doppelte travail...
Salut Normann |
|
|
| |
|
|
|
Normann Strübli | un Update venez selten seul...
hab maintenant la fois simple Checkboxen im menu realisiert qui avec XgetChecked / XsetChecked abgefragt et gesetzt volonté peut.
Aussi contient qui Zip maintenant une neue Dossier pour qui verwendeten Icônes. Desweiteren wurde qui optique qui Icônes par une angepasste taille stark verbessert.
Ausführliche Doku folgt später.
s'il te plaît Testen!!
ah et nebenbei: sais irgendjemand zufällig comment je un Icon pas dans 2-bit SW mais dans Graustufen transformer peux???
Salut Normann |
|
|
| |
|
|
|
Normann Strübli | Mist hab quoi oublier qc:
IF peux Du BÜDDE la fois dein Posting soweit éditer cela on ici ne...aucune SCROLLKRAMPF beim Lesen bekommt |
|
|
| |
|
|
|
| Avec l' den Scrollkrampf, gg, habs erledigt.
^ ^
Normann Strübli
sais irgendjemand zufällig comment je un Icon pas dans 2-bit SW mais dans Graustufen transformer peux??? Salut Normann
Avez- maintenant selber le calcul PixByPix, ou bien Apileierei?
jusqu'à denne, iF |
|
|
| |
|
|
|
Frank Abbing | Hi,
Icônes gris färben aus meiner Buddelkiste (ici im Zusammenhang avec Buttonsimages). KompilierenMarqueSéparationEine Methode, um Icons grau zu färben.
(C) 2004 Frank Abbing.
Declare bild&,text$,neu&,array&,x&,y&,z&,but&,pseudobitmap&,bitmap&,wert&,x%,y%,z%
Def SelectObject(2) !GDI32,SelectObject
Def CreateCompatibleBitmap(3) !GDI32,CreateCompatibleBitmap
Def GetSysColor(1) !USER32,GetSysColor
SetTrueColor 1
Window 0,0-800,600
Cls GetSysColor(15)
Originales Icon mit Profanmitteln ins Fenster laden.
text$=globus.ico
DrawLibIcon text$,0,40,40
Originales Icon mit Profanmitteln im Hintergrundsspeicher laden.
x&=32
y&=32
MCLS x&,y&
Startpaint -1
Cls GetSysColor(15)
DrawLibIcon text$,0,0,0
Icon grau färben
y%=0
Whileloop 32
x%=0
Whileloop 32
z&=GetPixel(x%,y%)
If z&<>GetSysColor(15)
z%=(GetRValue(z&)+GetGValue(z&)+GetBValue(z&))/3
SetPixel x%,y%,Rgb(z%,z%,z%)
EndIf
Inc x%
EndWhile
Inc y%
EndWhile
Pseudobitmap erstellen. BM_SETIMAGE funktioniert nur mit Bitmaps, die keinem HDC zugeordnet sind.
pseudobitmap&=CreateCompatibleBitmap(%hdc,x&,y&)
Pseudobitmap unserem HDC zuordnen
Als Ergebnis bekommen wir unsere losgelöste Bitmap zurück !
bitmap&=SelectObject(%hdc,pseudobitmap&)
EndPaint
Button erstellen via Control / die Create(Button,...) Methode funktioniert nicht ohne weiteres
Button noch nicht sichtbar !
but&=@Control(Button,,$40000080,40,100,48,48,%hwnd,1001,%Hinstance)
Bitmap dem Button zuordnen
Sendmessage(but&,$F7,0,bitmap&) BM_SETIMAGE
Button sichtbar machen
ShowWindow(but&,1)
WaitKey
- Button zerstören, damit die Bitmap wieder frei wird
- Bitmap löschen
DestroyWindow(but&)
DeleteObject bitmap&
4 href='./../../funcion-referencias/XProfan/end/'>Fin
Hab aussi encore une ProSpeed-variante, qui très viel plus rapide arbeitet, mais s'il te plaît... |
|
|
| |
|
|