| |
| |
|
Normann
Strübli | Mit Xprofan Ownerdraw-Menüs erstellen...
X-Menü ver. 1.2 ist fertig...
 Jedem Menüpunkt kann eine eigene Schriftart / Formatierung zugewiesen werden.
Icons oder Checkboxen sind kein Problem
Funktion zum abfragen / setzen der Checkboxen
Alle Farben sind jetzt Komplett! anpassbar
Eine Tabelle mit Abkürzungstasten wird automatisch erstellt
Dem Menü kann ein Hintergrundbild zugewiesen werden
Viel Spaß damit  |
|
| |
| |
| |
|
|
 | Hallo Normann...
Deine Demos du dieser INC (bin zufällig darüber gestolpert) sehen KLASSE aus! Das könnte ich sehr gut gebrauchen, leider arbeite ich aber mit Profan² 7.5 und finde keinen passenden Ersatz für SIZEOF  und kann deshalb im Augenblick auch nicht beim Weiterentwickeln mithelfen . Um ganz von vorne anzufangen und SIZEOF einfach rauszuschmeißen fehlt mir auch die Zeit.... son Mist!
Bitte arbeite weiter dran! Finde ich einfach nur gut! |
|
| |
| |
| |
|
|
| | Das Teil ist phantastisch! Ich habs mal aufstruktoriert, keine Ahnung warum: |
|
| |
| |
| |
|
|
| So, nochmal ich. 
Folgendes, ich würde das X-Menü gerne, weil es so gernial ist, in den Funktionsumfang des XPSE mit einbringen.
Das hieße, das der Progger die X-Menü INC haben muß, mit XPSE jedoch nur statt
appendmenu
z.B.
xappendmenu
und statt
popup
halt
xpopup
zu Verfügung hat.
XPSE müsste dann aus dem xappendmenu, xpopup etc. die entsprechenden Passagen aus dem X-Menü einsetzen.
Weist was ich meine? Ich brauch da natürlich Deine Hilfe.
Im Ergebnis sollte es möglich sein, z.B. folgendes schreiben zu können:
KompilierenMarkierenSeparieren
Ist nur ein Beispiel wie XPSE die Sonderattribute parsen könnte, vielleicht gibt es da auch noch etwas eleganteres.
iF |
|
| |
| |
| |
|
|
Rolf
Koch | |
| |
| |
| |
|
|
Normann
Strübli | danke für Euer positives Feedback 
hatte leider vergessen zu erwähnen das ich von letzten Freitag bis heute
unterwegs war und so leider nicht antworten konnte.
Das Teil ist phantastisch! Ich habs mal aufstruktoriert, keine Ahnung warum:
Weils halt ein wenig unübersichtlich war... danke iF.
Das mit dem XPSE können wir auch gerne in Angriff nehmen aber hab
noch (nicht ganz) verstanden wie ich Dir da am besten helfen kann...
Gruß Normann |
|
| |
| |
| |
|
|
| Ok, lez begin 
Also, das Einfachste was der Profaner ja anstellen kann ist doch eigendlich ein:
KompilierenMarkierenSeparieren
Dieser 2-Zeiler öffnet ein Fensterchen und wartet einen Klick ab. 
Jetzt weiter:
KompilierenMarkierenSeparieren
Nun, das is ja noch klar, aber könntest du ne INC bauen, welche folgendes Ermöglicht (erstmal ohne jeglichen Schnickschnak):
KompilierenMarkierenSeparieren
So, wenn deine INC also nen XPopup und nen Xappendmenue hätte, dann sollte in diesem Beispiel kein Unterschied zum Popup und Appendmenu von XProfan sichtbar sein!
Die Erweiterungen machen wir später, ok?
So können wir dem XProfan Step by Step beibringen, ownerdraw-menüs darzustellen. Aber alles nach dem freiwillig Motto. Das heißt wenn jemand sein Prog compiliert, und (dann ja später) die XMenu.inc mit eincompiliert, dann sollte zunächst kein Unterschied zu merken sein. Aber dann, wenn er z.B. (und das müssen wir uns dann untereinander ausmachen) Xappendmenu 101,men2:disabled:pic=pic.bmp bla bla bla hatt der Progger die Möglichkeit mit einfacher Syntax seine Menüs ordentlich aufzupeppen!
Aber erstmal zu Schritt 1.
Bis denne, iF |
|
| |
| |
| |
|
|
Normann
Strübli | Hi,
jaja die Zeit... (die mir augenblicklich fehlt) :|
gibt leider nicht viel neues allerdings solltet Ihr die neue Version runterladen
die zwar keine neuen Funktionen bereitstellt dafür aber einen Fehler weniger enthält.
Wenn man das Menü mit ALT+? aufgerufen hat wurde der markierte Menüpunkt
fehlerhaft dargestellt. (Hat das noch keiner bemerkt???)
@iF:
Sei mir nicht böse aber ich denke doch ich werde erst an den noch fehlenden Funktionen
arbeiten und wenn dann alles Fertig ist können wir uns um eine Integration im XPSE kümmern... 
Ich hab da zwar mit angefangen aber wenn ich an der INC noch was ändere
müsstest Du ja auch immer mitändern und das ist ja irgendwie doppelte Arbeit...
Gruß
Normann |
|
| |
| |
| |
|
|
Normann
Strübli | ein Update kommt selten allein...
hab jetzt mal einfache Checkboxen im Menü realisiert die mit
XgetChecked / XsetChecked abgefragt und gesetzt werden können.
Außerdem enthält die Zip jetzt eine neue Datei für die verwendeten Icons.
Desweiteren wurde die Optik der Icons durch eine angepasste größe stark verbessert.
Ausführliche Doku folgt später.
Bitte Testen!!
Ach und nebenbei:
Weiß irgendjemand zufällig wie ich ein Icon nicht in 2-bit SW sondern in
Graustufen umwandeln kann???
Gruß
Normann |
|
| |
| |
| |
|
|
Normann
Strübli | Mist hab was vergessen:
IF kannst Du BÜDDE mal dein Posting soweit editieren das man hier kein
SCROLLKRAMPF beim Lesen bekommt  |
|
| |
| |
| |
|
|
| Das mit den Scrollkrampf, gg, habs erledigt. 
^^
Normann Strübli
Weiß irgendjemand zufällig wie ich ein Icon nicht in 2-bit SW sondern in Graustufen umwandeln kann???
Gruß Normann
Meinst jetzt selber rechnen PixByPix, oder Apileierei?
Bis denne, iF |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
Icons grau färben aus meiner Buddelkiste (hier im Zusammenhang mit Buttonsimages).
KompilierenMarkierenSeparierenEine 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&
End
Hab auch noch eine ProSpeed-Variante, die sehr viel schneller arbeitet, aber bitte... |
|
| |
| |
| |
|
(848)
Deutsch
English
Français
Español
Italia