Source position: comctrls.pp line 109
type TDrawPanelEvent = procedure(
StatusBar: TStatusBar;
Panel: TStatusPanel;
const Rect: TRect
) of object;