Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - [VisualCLX] Form auf TabSheet wird in falscher Farbe dargestellt


MisterBum83 - Mo 04.04.11 12:48
Titel: Form auf TabSheet wird in falscher Farbe dargestellt
Hallo zusammen,

ich habe auf einem Form1 ein Tabsheet TS_1. Auf diesem TabSheet wird zur Laufzeit ein Form2 dargestellt.
Jedoch hat dieses Form2 und auch die Panels darauf nicht die Farbe des TabSheets, d.h. das TabSheet aktualisiert die Farbe durch das Manifest in ein XP-Weiss, jedoch das Form2 bleibt in einem unschönen grau clBtnFace.


Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
 
  if not (assigned(Form2)) then
    begin
      { Formular erzeugen }
      Form2 := TForm2.Create(self);
      { Formular in das TabSheet "einkleben" und anzeigen }
      Form2.Parent := Form1.TS_1;
      Form2.Show;
    end;


Warum passt sich die Farbe des Form2 nicht an die Farbe TabSheet an?

Gruß und Dank
MisterBum


jaenicke - Mo 04.04.11 13:41
Eine solche Frickelei ist so schlicht nicht vorgesehen. ;-)
Wahrscheinlich musst du das Theming für das Formular selbst manuell aktivieren, das müsste SetWindowTheme oder so sein, glaub in der Unit UxTheme oder so.


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!