Открывает окно сохранения файла с заданным фильтром.
Visual Basic:
Function ShowSave(dwFilters As Long) As Boolean
dwFilters
маска открываемого файла
1
карты (*.zmp)
2 слои (*.b00, *.zrs, *.zrg) 3 карты (*.zmp) и слои (*.b00, *.zrs, *.zrg) 4 базы данных (*.zb) 5 карты (*.zmp) и базы данных (*.zb) 7 карты (*.zmp) слои (*.b00, *.zrs, *.zrg) и базы данных (*.zb) 8 шаблоны надписей (*.zlb) 9 карты (*.zmp) и шаблоны надписей (*.zlb) 10 слои (*.b00, *.zrs, *.zrg) и шаблоны надписей (*.zlb) 16 шаблоны тематических фильтров (*.ztt) 32 тематические файлы (*.ztm) 64
проекты (*.zpr)
128
все файлы (*.*)
256
"слои WMS, Tile и SRTM3" (*.zww)
512
"любые слои" ( *.b00, *.zrs, *.zrg, *.zl, *.zww, *.ztr, *.gpx, *.plt)
1024
"файлы изображений" ( *.bmp, *.jpg, *.jpeg, *.tif, *.tiff, *.gif, *.png, *.pcx)
0x80000000
запретить просмотр серверов геоданных
Метод возвращает True, если файл выбран, в противном случае метод вернет False. Выбранное имя файла можно получить через свойство FileName.
'Открыть стандартное окно сохранения файла карты If ZuluCommDlg1.ShowSave(1) = True Then 'Сохраняем карту MapCtrl1.Map.SaveAs ZuluCommDlg1.FileName End If