Hallo,
um meine eigene Komponente transparent zu machen, nutze ich folgen Code:
Delphi-Quellcode:
procedure TMJGroupBox.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle:=Params.ExStyle + WS_EX_Transparent;
end;
Das funktioniert auch, aber wie kann ich es einstellen, ob ich die Transparenz haben möchte oder nicht?
Ich dachte da an:
Transparent := False;
Nur weiss ich nicht, wie ich das abfragen soll? Muss ich diese CreateParms Prozedur erneut aber mit anderen Parametern aufrufen oder so umstellen das ich sie 2 mal verwenden kann?
Gruß
Mazel