Form auf TabSheet wird in falscher Farbe dargestellt
spacer
Autor Nachricht
MisterBum83
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 233
Erhaltene Danke: 1

WIN XP
Delphi 6
BeitragVerfasst: Mo 04.04.11 12:48 
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.

ausblenden Delphi-Quelltext markieren
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
 
Antworten mit Zitat Beitrag melden
Private Nachricht sendenPosting in privater Nachricht zitieren
Werbung ausblenden? Dann registriere Dich kostenlos. Weitere Gründe für eine Registrierung.


Werbung ausblenden? Dann registriere Dich kostenlos. Weitere Gründe für eine Registrierung.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 15840
Erhaltene Danke: 741

XP, W7 x64 (Chrome, IE9, FF), Debian, (OSX 10.7)
RAD XE 2, Java (NB), C++, C# (VS 2010), JS/HTML, PHP, Lazarus
BeitragVerfasst: 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.
 
Antworten mit Zitat Beitrag melden
Private Nachricht sendenPosting in privater Nachricht zitieren
home home