AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TStyleManager.ActiveStyle ermitteln?

Ein Thema von HCB · begonnen am 1. Jan 2025 · letzter Beitrag vom 3. Jan 2025
Antwort Antwort
HCB

Registriert seit: 12. Feb 2020
188 Beiträge
 
Delphi 12 Athens
 
#1

TStyleManager.ActiveStyle ermitteln?

  Alt 1. Jan 2025, 13:41
Hallo alle zusammen,
ich wünsche Euch allen ein gesundes und friedliches Neues Jahr!

Auch jetzt am ersten Tag suche ich nach einer Lösung. Mir ist es bis jetzt nicht gelungen, den aktuell aktiv gesetzten Design-Style zu ermitteln.
Was ich gefunden habe ist das hier:
TStyleManager.ActiveStyle (class property ActiveStyle: TCustomStyleServices read GetActiveStyle)

Ich möchte auslesen, welcher Stil gerade aktiv ist.
Mit if IsCustomStyleActive then showMessage('Kunde') else showMessage('Standard'); kann ich nur feststellen, oder der Standard Windows Stil oder ein benutzergesetzter Stil verwendet wird, eben aber nicht welcher genau.

Kann mir jemand bitte sagen wie ich das gelöst bekomme?
Vielen Dank.

LG Harry
  Mit Zitat antworten Zitat
Benutzerbild von Olli73
Olli73

Registriert seit: 25. Apr 2008
Ort: Neunkirchen
758 Beiträge
 
#2

AW: TStyleManager.ActiveStyle ermitteln?

  Alt 1. Jan 2025, 14:10
Geht denn TStyleManager.ActiveStyle.Name nicht?
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
188 Beiträge
 
Delphi 12 Athens
 
#3

AW: TStyleManager.ActiveStyle ermitteln?

  Alt 1. Jan 2025, 16:39
Ich versuche nur auf ein DBGrid einen Style zur Laufzeit anzuwenden. So in etwa, was aber nicht funktioniert. In der Entwurfansicht kann man den Stylename zu weisen, aber zur Laufzeit bleibt es beim 'alten'.
if TStyleManager.ActiveStyle.name ='windowsthen dbg_Article.StyleName:='Auric'; Geht das überhaupt??

LG Harry

Geändert von HCB ( 1. Jan 2025 um 17:48 Uhr) Grund: Ergänzt
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
188 Beiträge
 
Delphi 12 Athens
 
#4

AW: TStyleManager.ActiveStyle ermitteln?

  Alt 3. Jan 2025, 10:45
Noch immer versuche ich einem DBGrid zur Laufzeit einen anderen Style zuzuweisen.
 dbGrid1.StyleName:='Auric'; In den Projektoptionen sind im Erscheinungsbild zwei Styles verfügbar: Windows und Auric.
Nun möchte ich nur dem Grid den Style 'Auric' verpassen. Im Entwurfsmodus kann ich das machen und funktioniert, jedoch nicht zur Laufzeit.

Ist es überhaupt möglich den Stil einer Komponente zur Laufzeit zu ändern?
Für Unterstützung wäre ich sehr dankbar.

LG Harry
  Mit Zitat antworten Zitat
HCB

Registriert seit: 12. Feb 2020
188 Beiträge
 
Delphi 12 Athens
 
#5

AW: TStyleManager.ActiveStyle ermitteln?

  Alt 3. Jan 2025, 11:07
Ok, hab selbst was gefunden:
https://blogs.embarcadero.com/vcl-pe...d-studio-10-4/

LG Harry
  Mit Zitat antworten Zitat
hes

Registriert seit: 21. Apr 2024
Ort: Baden Württemberg
15 Beiträge
 
Delphi 12 Athens
 
#6

AW: TStyleManager.ActiveStyle ermitteln?

  Alt 3. Jan 2025, 11:16
Bei mir funktioniert es wenn ich irgend einen Style meiner Hauptanwendung zuweise.

Also ein
DBGrid1.StyleName := 'auric';
reagiert und setzt es den Style. Ist der Hauptstyle (Standardstil) der Andwendung "Windows" passiert nichts.
Rainer

Geändert von hes ( 3. Jan 2025 um 11:29 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:35 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz