Guten Abend,
ich möchte eine eigene Klasse schreiben, welche von TListbox ableite.
Hier möchte ich das "OnDrawItem"-Ereignis überschreiben...
Innerhalb des Ereignis nutze ich den Befehl "Canvas". Das möchte Delphi augescheinlich nicht, da der Compiler meldet:
Zitat:
Instance member 'Canvas' inaccessible here
Delphi-Quellcode:
procedure TCustomListbox.DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
inherited;
with TCustomListbox.Canvas do
begin
Pen.Color := clWhite;
[...]
end;
end;