TPanel transparent ?

[Pichel]

Zitat von taktaky:

Gibt es keine andere Möglichkeit um ein Panel transparent zu machen ohne die Komponenten installieren zu müssen?

Dieser Thread ist ja eigentlich schon rum, trotzdem hab ich noch ne kleine Idee.

Wenn es nur um die Panels in einem Projekt geht kannst Du auch einfach das Paint umleiten:

Delphi-Quellcode:

type
  TMyPanel = ExtCtrls.TPanel;
  TPanel = class(TMyPanel)
  private
    procedure Paint; override;
  end;

procedure TPanel.Paint;
begin
  inherited; // Standard Paint ;-)
  with Canvas do begin
    // hier kannst Du nach Herzenswunsch rummahlen ;-)
  end;
end;

Damit sind "alle" Panels nun betroffen.
Wenn es nun transparent sein soll einfach den Hintergrund "reinpinseln"