EasyMap VCL
TEasyMap.OnBeforeDelLayer
property OnBeforeDelLayer: TDelLayerEvent;
Description
Event occurs when layer is about to be deleted.

procedure TForm1.EasyMap1BeforeDelLayer(Sender: TEasyMap; Layer: TMapLayer;
  ConfirmDelete: Boolean; var AllowDelete: Boolean);
begin
 if not ConfirmDelete then Exit;    //Эту строчку можно закомментировать и 
                //тогда вы будете обрабатывать все случаю 
                //удаления слоя, в том числе и закрытии всех слоев в деструкторе объекта TEasyMap
 AllowDelete := MessageDlg(Format('Would you like to close layer %S', [Layer.Name]), mtConfirmation, [mbYes    , mbNo]    , 0) = mrYes;
end;