Source position: dialogs.inc line 597
procedure TCommandIcon.HandleEvent(
var Event: TEvent
); virtual;