Тип события, возникающего перед поиском объектов на карте
TStartSearchMapObjectsEvent = procedure(Sender: TObject; aMapControlMode: Integer; Shift: TShiftState; var flLoadMOS: boolean) of object;