Source position: stdctrls.pp line 256
type TDrawItemEvent = procedure(
Control: TWinControl;
Index: Integer;
ARect: TRect;
State: TOwnerDrawState
) of object;