Delphi-PRAXiS
Seite 4 von 4   « Erste     234   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TPanel transparent ? (https://www.delphipraxis.net/39165-tpanel-transparent.html)

DeddyH 30. Sep 2007 13:55

Re: TPanel transparent ?
 
Zitat:

Zitat von taktaky
Weil sie nicht free sind

Wo stand denn das? Bloß, weil ein Copyright-Hinweis drin ist, heißt das doch nicht, dass Du sie nicht verwenden darfst. Wäre ja auch ein bisschen dämlich, eine Shareware-Kompo im Quelltext zu veröffentlichen, oder? :zwinker:
Zur Not frag doch mal den Autor.

[edit]Die Kompo ist vom selben Autor, da steht auch derselbe Copyright-Hinweis drin[/edit]

taktaky 22. Okt 2007 10:47

Re: TPanel transparent ?
 
Wie installiere ich die Package TrsPanels.dpk ?
jedes mal bekomme ich einen enden error !

Vielleicht da ich vorher falsch installiert habe

Das ist das beste Demo, was ich hier in DP gefunden habe.

inherited 25. Okt 2007 00:23

Re: TPanel transparent ?
 
Zitat:

Zitat von taktaky
jedes mal bekomme ich einen enden error !

enden???

taktaky 25. Okt 2007 17:27

Re: TPanel transparent ?
 
Zitat:

Zitat von inherited

enden???

Leider ist meine Tastatur ist per Funk. Einige Buchstaben gehen in die Luft verloren :mrgreen:

DeddyH 25. Okt 2007 18:18

Re: TPanel transparent ?
 
Und was hat das mit dem Package zu tun? :gruebel:

Pichel 5. Mai 2008 14:17

Re: TPanel transparent ?
 
Zitat:

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"


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:55 Uhr.
Seite 4 von 4   « Erste     234   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz