XProfan

- Page 2 -

[quote:4db6906a53]
Ist zwar leider offtopic - aber ...
[/quote:4db6906a53]
Es ist nicht ironisch oder abwertend gemeint:

Ich liebe noch heute mein DOS 5.0 - Das stabilste und schnellste System aus Redmont. Aber dann wollten die User ja auch so eine schöne Oberfläche wie beim MAC - Schon ging der Ärger und das ewige Aufmotzen los

Schönes Wochenende !

Frank
Abbing

[quote:abf3b0a5af]Klicke ich neben die Buttons oder auf den dritten, zeigen beide Icon und Text. Es hat sich opposto der Version, die Du mir geschickt hattest, nichts geändert (außer der Anordnung der Buttons).[/quote:abf3b0a5af]
Gut danke. Dann ist da noch irgendein anderer Bock drin. Ich muss mal sehen, woran das wohl liegt. Eigentlich hat der reine Textbutton nichts mit den beiden anderen Buttons zu tun. Jedenfalls subclasse ich ihn nicht. Seltsam.

Diese Methode hat opposto der Methode Static-Control-mit-Bild-als-Child-von-Button den Vorteil, dass die Icons transparent auf die Buttons gesetzt werden. Und der Text ist positionierbar und einfärbbar.

---

Roland, du warst gestern zu der Zeit nicht online, sonst hätte ich dir den Code zuerst geschickt.

Matthias
Arlt

Da die erzeugte DLL (und damit die XP-Buttons) z.B. auch im Zusammenspiel mit Profan7 einwandfrei funktioniert, stellt sich die Frage, was man damit evtl. sonst noch machen kann.
Es bleibt bspw. ohne jede Auswirkung, wenn Io l' Parameter 2 (Icon&) auf NULL setze. Was genau macht die enthaltene Funktion bzw. welche Parameter sind possibile/zwingend nötig?

Matthias

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

Frank
Abbing

Ah, stimmt. Der Iconbutton ist jetzt überflüssig, da ich eine Iconliste benutze. Hatte vorher mit Icons experimentiert.
Die Buttons werden von der Dll-Funktion subgeclasst, die anderen Parameter werden an die Funktion zur weiteren Verarbeitung weiter gegeben.
Die Dll wird übrigens vom XProfan Inline Assembler (XPIA) automatisch generiert und müsste ab Profan 5 einzubinden sein. Den completten Quellcode gebe ich hier weiter, sobald er auch auf den kleineren Windows-Versionen funktioniert, 98 eingeschlossen

.

Die weiteren Möglichkeiten sind ebenfalls vielfältig. So können durchaus Animationen auf den Buttons stattfinden, oder mehrere Icons darauf verwendet werden. Sowie mehrzeilige, frei positionierbare Texte.

Matthias
Arlt

Aha, Danke ! Feine Sache...

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

Frank
Abbing

So, diese Version sollte ab Windows95 funktionieren. Testet ihr mal bitte?

Buttontest.zip	30 kB

Hochgeladen:	17.12.2006

Downloadcounter:
		Download

17.12.2006 ▲

Matthias
Arlt

Funktioniert bei mir fehlerfrei, wie gehabt... (XP-Pro ohne SPs)

WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia

17.12.2006 ▲

Frank
Abbing

So, hier mit leichten Erweiterungen der ab XProfan lauffähige Qellcode und der originale Quellcode + InlineAssembler. Sind echt verrückte Sachen mit machbar...

[img:e8fc3a8367]https://frabbing.de/Screenshot.jpg[/img:e8fc3a8367]
Als Anregung: Wie wäre es, wenn ihr auch noch andere Control-Arten derart einpinselt?

Icon-Buttons.zip	44 kB

Hochgeladen:	18.12.2006

Downloadcounter:
		Download

18.12.2006 ▲

Dietmar
Horn

Ich habs gerade unter Windows 95 mit XProfan 8.0a getestet:

Wenn man $DEFINE XPSE als Kommentar ausklammert, dann funktioniert alles bestens. In diesem Code ist das $Define doch gar nicht erforderlich, oder?

Saluto
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: [...]

Frank
Abbing

Nein, das kann gelöscht werden. Hat meine Betaversion (?) von XPSE wohl dazwischen gefriemelt...

Kompilieren Markieren Separieren

Rolf
Koch

Sorry Frank, entweder bin ich zu blöd?
Ich bekomms nicht zum laufen:

last.asm(133) : error A2008: syntax error : (
last.asm(135) : error A2012: PROC, MACRO, or macro repeat dir
ective must precede LOCAL
last.asm(143) : error A2006: undefined symbol : subclass
last.asm(143) : error A2114: INVOKE argument type mismatch :
argument : 3
last.asm(145) : error A2006: undefined symbol : subclass
last.asm(145) : error A2114: INVOKE argument type mismatch :
argument : 3
last.asm(147) : error A2006: undefined symbol : subclass
last.asm(147) : error A2114: INVOKE argument type mismatch :
argument : 3
last.asm(150) : error A2008: syntax error : (
last.asm(139) : error A2006: undefined symbol : font
m2m(2): Macro Called From
last.asm(139): Main Line Code
last.asm(140) : error A2006: undefined symbol : icon
m2m(2): Macro Called From
last.asm(140): Main Line Code
last.asm(141) : error A2006: undefined symbol : ilist
m2m(2): Macro Called From
last.asm(141): Main Line Code
last.asm(142) : error A2006: undefined symbol : blist
m2m(2): Macro Called From
last.asm(142): Main Line Code
133    StartSubclassing(font&,icon&,ilist&,blist&,button&,but
ton2&,button4&) proc
135 LOCAL xyzdummyxyz:DWORD   ;Nicht entfernen!
143 invoke SetWindowLong,para5,GWL_WNDPROC,addr subclass
143 invoke SetWindowLong,para5,GWL_WNDPROC,addr subclass
145 invoke SetWindowLong,para6,GWL_WNDPROC,addr subclass
145 invoke SetWindowLong,para6,GWL_WNDPROC,addr subclass
147 invoke SetWindowLong,para7,GWL_WNDPROC,addr subclass
147 invoke SetWindowLong,para7,GWL_WNDPROC,addr subclass
150 retStartSubclassing(font&,icon&,ilist&,blist&,button&,but
ton2&,button4&) endp
139 m2m font,para1
139 m2m font,para1
140 m2m icon,para2
140 m2m icon,para2
141 m2m ilist,para3
141 m2m ilist,para3
142 m2m blist,para4
142 m2m blist,para4
Programm abgebrochen!

Frank
Abbing

Hast du XPSE, XPIA und MASM32 installiert und XPIA den MASM-Pfad mitgeteilt? Alles neue Versionen? Scheint bei dir Probleme mit der Installation zu geben...