TPanel transparent

[silent vapor]

Wie mache ich einen TPanel zur Laufzeit transparent?
Dachte es würde mit XPManifest funktionieren, klappt aber nicht!

mfg
silent vapor

[SirThornberry]

willst du es Transparent haben (50%, 70% etc.) oder durchsichtig?
für durchsichtig sollte es genügen die CreateParams zu überschreiben

Delphi-Quellcode:

procedure TTranPanel.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  Params.ExStyle := Params.ExStyle + WS_EX_Transparent;
end;

funktioniert aber nicht zu 100%, hat also leichte Einschränkungen...

[Stevie]

Hast du ParentColor auf True gestellt?

[silent vapor]

Ich habe Das XPManifest einfach auf die Form gezogen und mal mit beiden werten für ParentColor versucht, also mit true und false, jedesmal ist es sichtbar.
Es reicht wenn es durchsichtig ist, also wenn man mein Hintergrundbild sieht :D

[Stevie]

Hast du die Luna-Oberfläche von XP aktiviert? Ich bin mir nicht sicher, aber es dürfte nur in diesem Fall funktionieren.

[silent vapor]

Mhhh,
hätte gerne ne Komponente mit der ich mein Layout mache, wie die Panels, aber die muss ich 100% transparent haben, damit man das hintergrundbild sieht.
Gibt es da nicht noch ne andere Lösung oder ne andere Komponente die ich mir nach installieren kann ?

[Stevie]

Guck mal bei den Jedi-Komponenten, dort gab's - mein ich - ne Kompo, die einen Bereich transparent machen konnte.