Forum: Neuen Beitrag zur Code-Library hinzufügen
by Sir Rufo,
27. Sep 2013
Ich kommentiere mal das Beispiel von DeddyH
type
(* Mögliche Stati *)
TLEDState = (lsOff, lsActive, lsInactive);
TLED = class(TGraphicControl)
private
FState: TLEDState;
procedure SetState(const Value: TLEDState);
Forum: Neuen Beitrag zur Code-Library hinzufügen
by Sir Rufo,
27. Sep 2013
Bei einer "visuellen" Komponente, muss ja auch etwas visualisiert werden.
Dieses erreicht man, indem etwas gezeichnet wird. Folglich muss die Paint-Methode entsprechend angepasst (überschrieben) werden, denn genau diese ist für das Zeichnen zuständig.
Das ist so eigentlich das große Geheimnis bei dieser Art von Komponente die du haben willst.
Wie und was du da zeichnest und warum...