Hallo,
ich mache das recht oft aber bin mir eigentlich nicht sicher, ob das Nachteile hat.
Als Beispiel für eine ListBox in OnDrawItem:
Delphi-Quellcode:
Procedure ... DrawItem(Control: TWinControl; Index: Integer;...
Var L : TListBox;
Begin
L := TListBox(Control);
If L.Columns = 0 Then...
End;
Auch nach längerem Überlegen fällt mir fast kein Nachteil ein. Es könnte Fälle geben wo jemand motzt weil eine eine MNethod wegen den zwei Zeilen zu lange ist.
Auf jeden Fall: machs
Die Vorteile vor allem wegen der Übersichtlichkeit überwiegen deutlich.