Autor Beitrag
galagher
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 2510
Erhaltene Danke: 44

Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
BeitragVerfasst: Fr 15.09.17 10:25 
Hallo!

Wie kann man per Code feststellen, ob Windows-Themes aktiviert sind? Geht das überhaupt?

_________________
gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Fr 15.09.17 11:24 
- Nachträglich durch die Entwickler-Ecke gelöscht -

Für diesen Beitrag haben gedankt: galagher
galagher Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 2510
Erhaltene Danke: 44

Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
BeitragVerfasst: Fr 15.09.17 12:39 
user profile iconFrühlingsrolle hat folgendes geschrieben Zum zitierten Posting springen:
die bestehende Anwendung fragen, ob bei ihr das Theme aktiv ist.
Dann weiss ich zwar, ob die Anwendung das Theme hat oder nicht, ich möchte aber feststellen, ob in Windows selbst ein Theme oder die Standarddarstellung aktiv ist!

_________________
gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
galagher Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 2510
Erhaltene Danke: 44

Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
BeitragVerfasst: Fr 15.09.17 19:36 
user profile icongalagher hat folgendes geschrieben Zum zitierten Posting springen:
Dann weiss ich zwar, ob die Anwendung das Theme hat oder nicht, ich möchte aber feststellen, ob in Windows selbst ein Theme oder die Standarddarstellung aktiv ist!
Seltsamerweise wird mein Programm nach Ausschalten der Laufzeitthemes zwar wie erwartet im Windows-Standard dargestellt (sieht furchtbar aus!), aber der Code if IsThemeActive() then close; funktioniert immer noch! Oder verstehe ich da etwas nicht? Möchte jetzt nicht das Windows-Theme ausschalten.

Werde mal googlen!

//Edit: Funktioniert: www.swissdelphicente...showcode.php?id=1639

_________________
gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
Frühlingsrolle
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Sa 16.09.17 02:33 
- Nachträglich durch die Entwickler-Ecke gelöscht -
galagher Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 2510
Erhaltene Danke: 44

Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
BeitragVerfasst: Sa 16.09.17 09:10 
user profile iconFrühlingsrolle hat folgendes geschrieben Zum zitierten Posting springen:
In deinem verlinkten Beitrag wird genau diese Funktion importiert. Einen Unterschied dürfte es garnicht geben. :D

Da habe ich offenbar etwas missverstanden:
user profile iconFrühlingsrolle hat folgendes geschrieben Zum zitierten Posting springen:
du kannst mit IsThemeActive() die bestehende Anwendung fragen, ob bei ihr das Theme aktiv ist.
Also dachte ich an das Laufzeit-Theme meiner Anwendung und habe dieses deaktiviert. IsThemeActive bezieht sich aber auf Windows-Themes, also: Ja, es funktioniert beides! :zustimm:

_________________
gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!