Создание карты

Паук Пользователь Сообщений: 83 Регистрация: 05.11.2018	#1 09.12.2018 00:05:18 При создании карты в ГИС "Operator" есть вот такая форма, а при создании с помощью GTK есть такая же форма? если да то как ее открыть? а если нет то значит буду стряпать сам. Прикрепленные файлы Shot001.png (14.26 КБ)

Паук

Пользователь

Сообщений: 83 Регистрация: 05.11.2018

09.12.2018 00:58:33

и еще я создал кнопку для создания карты *.sit почему не одно свойство кроме масштаба не работает? где можно почитать как делать паспорт карты?
procedure TfrmFind.Button2Click(Sender: TObject);
var
createsite : TMAPREGISTER;
mapfilename : string;
path : string;
frame : TMAPDFRAME;
sss: AnsiString;
Ang : TLISTREGISTER;
begin
// path := ExtractFilePath(Application.ExeName);
// Заполним паспортные данные плана
// mapfilename := path + 'new1.sit';
// sss := 'Метеообстановка.Ногинский район';
// StrPlCopy(@createsite.MapName, sss, 31);
createsite.Scale := 100000; // Знаменатель масштаба карты
// createsite.EPSGCode := 4284; //код EPSG
// createsite.EllipsoideKind := 1;
// createsite.MapType := 0; // Обобщенный тип карты
// createsite.MaterialProjection := 0; // Проекция исх. материала
// createsite.FirstMainParallel := 0; // Первая главная параллель
// createsite.SecondMainParallel := 0; // Вторая главная параллель
// createsite.AxisMeridian := 39; // Осевой меридиан
// createsite.MainPointParallel := 0; // Параллель главной точки
// createsite.
//
// Ang.Nomenclature := '0';
// Ang.ListName := '0';
// Ang.FileName := '0';

mvMap.CreateMapPro('DEMO.sit', 'operator.rsc', createsite, Ang, 'demo', '123');
mvMap.MapOpen('DEMO.sit', True);
SetBtn;
end;

Изменено: Паук - 09.12.2018 00:58:59 (дописал код)

Oleg Belenkov

Администратор

Сообщений: 4114 Регистрация: 05.06.2008

10.12.2018 18:40:38

Почитать про создание карты можно тут -

http://gistoolkit.ru/download/doc/mapapi.pdf

4.2.2 Создание новой карты и плана

Стандартные диалоги для паспортов карт описаны в paspapi.h

Например:

// Диалог создания карты
// hmap - идентификатор открытой карты или 0
// mapname - указатель на строку, содержащую имя карты (файла паспорта)
// После вызова функции значение строки может измениться!
// size - длина строки, содержащей имя карты (не меньше 260)
// parm - структура параметров для диалога (см. maptype.h)
// Help вызывается из mappasp.chm, топик CREATE_MAP
// При ошибке возвращает ноль

_PASPIMP long int _PASPAPI paspCreateMapUn(HMAP hmap,WCHAR *mapname, long int size, TASKPARMEX * parm);

Паук

Пользователь

Сообщений: 83 Регистрация: 05.11.2018

10.12.2018 23:07:21

Цитата
Oleg Belenkov написал: Почитать про создание карты можно тут - http://gistoolkit.ru/download/doc/mapapi.pdf

спасибо большое оченьполезная информация.
Но ответ на мой вопрос получается что паспорт надо делать форму и писать самому .

Денис Вицко

Администратор

Сообщений: 1413 Регистрация: 10.06.2008

11.12.2018 10:12:30

Цитата
Паук написал: Но ответ на мой вопрос получается что паспорт надо делать форму и писать самому .

нет.

функция, которую Вам посоветовали, как раз и выводит диалог паспорта (hmap = 0 - новая карта, не 0 - паспорт существующей указанной карты).

Цитата

Oleg Belenkov написал:
// Диалог создания карты
// hmap - идентификатор открытой карты или 0
// mapname - указатель на строку, содержащую имя карты (файла паспорта)
// После вызова функции значение строки может измениться!
// size - длина строки, содержащей имя карты (не меньше 260)
// parm - структура параметров для диалога (см. maptype.h)
// Help вызывается из mappasp.chm, топик CREATE_MAP
// При ошибке возвращает ноль
_PASPIMP long int _PASPAPI paspCreateMapUn(HMAP hmap,WCHAR *mapname, long int size, TASKPARMEX * parm);

Денис Вицко

Администратор

Сообщений: 1413 Регистрация: 10.06.2008

11.12.2018 10:18:38

Кроме того в GIS ToolKit есть аналогичная функция в maputil.pas, которая сама загружает нужную библиотеку и вызывает диалог:

Код

//============================================================
// Диалог создания карты
// hmap     - идентификатор открытой карты
// mapname  - имя карты (файла паспорта)
//            После вызова функции значение строки может измениться
// parm     - структура параметров для диалога (см. maptype.h)
// При ошибке возвращает ноль
//============================================================
function CreateMapDialog(var mapname : string; hmap : HMAP =0; parm : PTASKPARMEX =nil): integer;

Паук Пользователь Сообщений: 83 Регистрация: 05.11.2018	#7 11.12.2018 17:58:19 Спасибо