| |
| |
|
Normann
Strübli | Mit Xprofan Ownerdraw-Menüs redactar...
X-Menü ver. 1.2 es fertig...
 Jedem Menüpunkt kann una propio Schriftart / Formatierung zugewiesen voluntad.
Icons oder Checkboxen son kein Problema
Función para abfragen / conjunto el Checkboxen
Alle Farben son ahora Komplett! anpassbar
Un Tabla con Abkürzungstasten se automáticamente erstellt
Dem Menü kann una Hintergrundbild zugewiesen voluntad
Viel Spaß así  |
|
| |
| |
| |
|
|
 | ¡Hola Normann...
Su Demos du dieser INC (bin zufällig darüber gestolpert) sehen KLASSE de! Das podría Yo muy bien gebrauchen, desafortunadamente arbeite Yo aber con Profano² 7.5 y finde no passenden Ersatz para SIZEOF  y kann deshalb en el Augenblick auch no beim Weiterentwickeln mithelfen . Um bastante de vorne anzufangen y SIZEOF simplemente rauszuschmeißen fehlt me auch el Tiempo.... son Mist!
Bitte arbeite más dran! Finde Yo simplemente sólo bien! |
|
| |
| |
| |
|
|
| | Das Teil es phantastisch! Yo habs veces aufstruktoriert, no sé por qué: |
|
| |
| |
| |
|
|
| So, otra vez Yo. 
Folgendes, Yo sería el X-Menü gerne, porque lo así gernial es, en el Funktionsumfang des XPSE con einbringen.
Das hieße, el el Progger el X-Menü INC haben muß, con XPSE sin embargo sólo en lugar de
appendmenu
por ejemplo
xappendmenu
y en lugar de
popup
sólo
xpopup
a Disposición ha.
XPSE debería entonces de el xappendmenu, xpopup etc. el entsprechenden Passagen de el X-Menü einsetzen.
Weist Yo mi? Yo costumbre como natürlich Su Ayuda.
Im Ergebnis debería lo posible ser, z.B. folgendes escribir a puede:
KompilierenMarcaSeparación
Ist sólo una Ejemplo como XPSE el Sonderattribute parsen podría, tal vez hay como auch todavía algo eleganteres.
IF |
|
| |
| |
| |
|
|
Rolf
Koch | If - geile Concepto!!!
Rolf |
|
| |
| |
| |
|
|
Normann
Strübli | danke para Euer positives Feedback 
hatte desafortunadamente vergessen a erwähnen el Yo de letzten Freitag a heute
unterwegs war y así por desgracia, no antworten podría.
Das Teil es phantastisch! Yo habs veces aufstruktoriert, no sé por qué:
Weils sólo una wenig unübersichtlich war... danke IF.
Relacionado con la XPSE puede wir También me gusta en Angriff nehmen aber tener
todavía (no bastante) verstanden Yo Usted como al besten helfen kann...
Saludo Normann |
|
| |
| |
| |
|
|
| Ok, lez begin 
Also, el Einfachste qué el Profaner sí anstellen kann es doch eigendlich una:
KompilierenMarcaSeparación
Dieser 2-Zeiler öffnet una Fensterchen y wartet una Clic de. 
Jetzt más:
KompilierenMarcaSeparación
Nun, el is sí todavía klar, aber könntest du ne INC bauen, welche folgendes Ermöglicht (primero sin jeglichen Schnickschnak):
KompilierenMarcaSeparación
So, si deine INC also nen XPopup y nen Xappendmenue hätte, entonces debería en diesem Ejemplo kein Diferencia para Popup y Appendmenu de XProfan sichtbar ser!
El Erweiterungen hacer wir später, ok?
So puede wir el XProfan Step by Step beibringen, ownerdraw-menüs darzustellen. Aber alles después de el freiwillig Motto. Das heißt si alguien ser Prog compiliert, y (entonces sí später) el XMenu.inc con eincompiliert, entonces debería primero kein Diferencia a merken ser. Aber entonces, si él z.B. (y el necesario nosotros entonces untereinander ausmachen) Xappendmenu 101,men2:disabled:pic=pic.bmp bla bla bla hatt el Progger el Möglichkeit con einfacher Syntax seine Menüs ordentlich aufzupeppen!
Aber primero a Schritt 1.
Bis denne, IF |
|
| |
| |
| |
|
|
Normann
Strübli | Hi,
jaja el Tiempo... (el me augenblicklich fehlt) :|
son por desgracia, no viel neues allerdings solltet Ihr el neue Versión runterladen
el zwar no neuen Características bereitstellt dafür aber una Fehler weniger enthält.
Wenn al Menü con ALT+? aufgerufen ha wurde el markierte Menüpunkt
fehlerhaft dargestellt. (Sombrero el todavía keiner bemerkt???)
@IF:
Sei No böse pero yo denke doch Yo voluntad sólo a el todavía fehlenden Características
trabajo y si entonces alles Fertig es puede nosotros una Integration en el XPSE kümmern... 
Yo como zwar con angefangen pero si Yo a el INC todavía qué ändere
müsstest Usted en efecto siempre mitändern y el es sí irgendwie doppelte Arbeit...
Saludo
Normann |
|
| |
| |
| |
|
|
Normann
Strübli | una Actualización kommt selten allein...
tener ahora veces einfache Checkboxen en el Menü realisiert el con
XgetChecked / XsetChecked abgefragt y gesetzt voluntad puede.
Außerdem enthält el Zip ahora una neue Expediente para el verwendeten Icons.
Desweiteren wurde el Optik el Icons por una angepasste größe stark mejorado.
Ausführliche Doku folgt später.
Bitte Testen!!
Ach y nebenbei:
Weiß irgendjemand zufällig Yo una Icon no en 2-bit SW pero en
Graustufen umwandeln kann???
Saludo
Normann |
|
| |
| |
| |
|
|
Normann
Strübli | Mist tener qué vergessen:
IF kannst Usted BÜDDE veces dein Posting soweit Editar el uno hier kein
SCROLLKRAMPF beim Lesen bekommt  |
|
| |
| |
| |
|
|
| Con el el Scrollkrampf, gg, habs hecho. 
^ ^
Normann Strübli
Weiß irgendjemand zufällig Yo una Icon no en 2-bit SW pero en Graustufen umwandeln kann???
Saludo Normann
Meinst ahora selber rechnen PixByPix, oder Apileierei?
Bis denne, IF |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
Icons grau färben de meiner Buddelkiste (hier en el Zusammenhang con Buttonsimages).
KompilierenMarcaSeparaciónEine 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/'>End
Hab auch ni ProSpeed-Variante, el muy viel más rápido arbeitet, aber Por favor,... |
|
| |
| |
| |
|
(910)
Deutsch
English
Français
Español
Italia