XProfan

- Page 4 -

Jac
de
Lad

Danke.

Falls du das hinkriegst, dann machs doch gleich per die anderen Controls (falls der Aufwand entsprechend gering ist). Vielleicht kannst du ja auch einen Modus einühren, nur per den transparenten Hintergrund, wo alles andere ist, als ob das Control mit Create() erstellt wurde.

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Sebastian
König

Hallo Jac,

Falls du das hinkriegst, dann machs doch gleich per die anderen Controls (falls der Aufwand entsprechend gering ist). Vielleicht kannst du ja auch einen Modus einühren, nur per den transparenten Hintergrund, wo alles andere ist, als ob das Control mit Create() erstellt wurde.

der Aufwand wäre nicht allzu grande - im Wesentlich etwas Copy&Paste-Arbeit... leider komme ich wohl heute und auch morgen trotzden noch nicht dazu... ich versuche es auf jeden Fall bis zum Wochenende fertig zu bekommen.

Vielleicht kannst du ja auch einen Modus einühren, nur per den transparenten Hintergrund, wo alles andere ist, als ob das Control mit Create() erstellt wurde.

Wie genau meinst Du das? Zumindest per das ColorStatic ist es schon jetzt possibile, den transparenten Hintergrund direkt im Aufruf von SKCtrl_CreateColorStatic() einzustellen, indem -1 per die Hintergrundfarbe trasferimento wird.

Den Fehler beim Ändern des Fonts konnte ich leider nicht nachvollziehen - folgendes funktioniert bei mir wunderbar:
Kompilieren Markieren Separieren

declare font&
let font& = Create(Font,Arial,12,0,1,0,0)
SetFont tcb1&,fon

re>

Oder habe ich da jetzt etwas falsch verstanden?

MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

Jac
de
Lad

Vielleicht kannst du ja auch einen Modus einühren, nur per den transparenten Hintergrund, wo alles andere ist, als ob das Control mit Create() erstellt wurde.

Ich meinte, einen Modus, wo das Control mit allen eingestellten Standardeinstellungen erstelllt wird (Schriftart, Schriftfarbe etc.), und nur der Hintergrund transparent ist.

Den Fehler beim Ändern des Fonts konnte ich leider nicht nachvollziehen - folgendes funktioniert bei mir wunderbar:
Kompilieren Markieren Separieren

declare font&
let font& = Create(Font,Arial,12,0,1,0,0)
SetFont tcb1&,fon

re>

Oder habe ich da jetzt etwas falsch verstanden?

Da habe ich sicher einen Fehler gemacht. Ich probiers dann nochmal aus.

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Jac
de
Lad

Aha, mit der Schriftart war ich wieder etwas voreilig. Es geht. Ist aber etwas aufwändig (Standardfontauswählen, Dimensione, Farbe...).

Naja, geht schon, muss es ja nur einmal machen und kann dann den Handle des Font benutzen.

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Sebastian
König

Ich meinte, einen Modus, wo das Control mit allen eingestellten Standardeinstellungen erstelllt wird (Schriftart, Schriftfarbe etc.), und nur der Hintergrund transparent ist.

Achso, ich verstehe. Am einfachsten lässt sich das mit einer kurzen XProfan-Prozedur realiesieren...

[Den Standard-Dialog-Font bekommt man circa ~GetStockObject(~DEFAULT_GUI_FONT)]
MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

Jac
de
Lad

Aha, danke, ich bastel mir was zusammen.

Weiß jemand, wie ich die standardmäßig eingestellte Schriftfarbe bekomme? Und den Hintergrund und die Häkchenfarbe per Checkboxen? GetSysColor() scheint mir dafür ungeeignet...

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Sebastian
König

Ich würde schon denken, dass GetSysColor() der richtige Weg ist. Wenn man davon ausgeht, dass Häcken und Schrift die gleiche Farbe haben (ich kann mich nicht erinnern, dass schonmal anders gesehen zu haben), ist wohl COLOR_BTNTEXT die passende Konstante. Die Hintergrundfarbe sollte einfach COLOR_WINDOW sein.

MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

Jac
de
Lad

Die Schrift ist bei mir schwarz, die Häkchen grün (Windows XP). Wenn ich COLOR_Window gelb mache, bleiben die Checkboxen trotzdem mit weißem Hinergrund.

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Sebastian
König

Interessant... wie hast Du das denn eingestellt? Unter Anzeige -> Darstellung -> Erweitert finde ich die Optionen dafür garnicht...

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

Jac
de
Lad

Das liegt am XP-Theme. Ich finde es auch nicht. Und es ändert sich auch nicht, wenn ich die Farben in eben jenem Dialog ändere.

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

Sebastian
König

Jac

Das liegt am XP-Theme. Ich finde es auch nicht. Und es ändert sich auch nicht, wenn ich die Farben in eben jenem Dialog ändere.

Achso, naturalmente... per diese ganzen Theme-Sachen gelten ja ganz andere Regeln. Ich potuto mir vorstellen, dass vielleicht in der uxtheme.dll eine Funktion zum Auslesen der Farben zu finden ist.

EDIT: Das hier sieht halbwegs passend aus: [...]

Leider scheint die Benutzung im Vergleich zu GetSysColor() etwas komplizierter zu sein, da man wohl erst ein Theme öffnen muss.

Noch eine Bemerkung: Auch mit den richtigen Farben sähe eine ColorCheckBox der SKControl.DLL immer noch nicht so aus wie eine normale CheckBox im XP-Style...

MfG

Sebastian

Windows XP, XProfan/Profan² 4.5 bis 11
Profan2Cpp-Homepage: [...]

Alte Profan²-Seite: [...]

Jac
de
Lad

Hm, ich nehme jetzt weiße Checkboxen mit schwarzen Häkchen. Das Ergebnis ist ok. Nur auf die Transparenz warte ich noch (wie uach bei Radiobutton), aber du hast ja gesagt, das machst du noch bei Zeiten (will dich wirklich nicht drängeln).

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP