TPanel: OnPaint-Ereignis

jjturbo · Verfasst: Mo 16.05.11 11:12

Moin Forum,

wie kann ich einem TPanel ein OnPaint Ereignis hinzufügen?

Gruß Oliver

_________________
Windows XP: Für die einen nur ein Betriebssystem - für die anderen der längste Virus der Welt...

jaenicke · Verfasst: Mo 16.05.11 11:20

Da hast du etwas falsch verstanden: Ein Panel ist zur Gruppierung von Controls gedacht, mehr nicht. Theoretisch kannst du vermutlich WM_PAINT abfangen oder Paint überschreiben, aber wozu?

Zum Zeichnen in OnPaint eignet sich z.B. eine TPaintBox.

jjturbo · Verfasst: Mo 16.05.11 11:46

Habe ein älteres Projekt, mit einer eigenen Kompo, abgeleitet von TPanel. Wollte da jetzt draufzeichnen, ohne all zu viel ändern zu müssen.

_________________
Windows XP: Für die einen nur ein Betriebssystem - für die anderen der längste Virus der Welt...

jaenicke · Verfasst: Mo 16.05.11 11:54

Das ist zwar ein ungünstiger Vorfahr, aber wenn du davon abgeleitet hast, kannst du einfach wie schon nebenbei erwähnt Paint überschreiben. Das siehst du ja auch in dem Quelltext von TCustomPanel in der ExtCtrls.pas:

markieren

Delphi-Quelltext

1:
2:

  protected
    procedure Paint; override;

jjturbo · Verfasst: Mo 16.05.11 15:11

Ok, danke

_________________
Windows XP: Für die einen nur ein Betriebssystem - für die anderen der längste Virus der Welt...

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme