KFF (Все сообщения пользователя)

Спасибо Людмила  :)  то что надо !
----------
Анастасия, Вам тоже спасибо за увлекательный диалог  :)

Здравствуйте !
На эту тему у меня было немало дискуссий на форуме Гис-Лаб
Позиция местных специалистов такова - "работаем в QGIS" но если появится что-то подобное у нас - с радостью "пересядем".
Простыми словами - они сами не хотят изучать ГИС Карту, а руководство КБ мягко говоря теряет клиентуру.

п.с. когда то в 2010 году на спор, я показал на вышеуказанном форуме возможность ещё той 9-й ГИС Карты.

[URL=http://delphi-gis.ucoz.ua/Download/Shared/Code/test_pasp.zip]СКАЧАТЬ[/URL]
пояснение
[QUOTE]procedure TForm1.Button1Click(Sender: TObject);
var map : HMap;
  mapreg : TMAPREGISTEREX;
  listreg : TLISTREGISTER;
begin

 map := mapOpenMap('D:\_TEST_ZONE_\-test_pasp\map\testmap.sitx',0);
 mapGetSiteInfoEx(map, map, mapreg, listreg, 1);
[B] // записываем в поле информацию с #0 в 5-1 позиции[/B]
 move('test'#00'data', listreg.sDate[0], 11);
[B] // заносим в паспорт[/B]
 mapUpdateSiteInfoEx(map, map, @mapreg, @listreg, 1, nil, nil, 0);
[B] // закрываем карту[/B]
 mapCloseMap(map);
 fillchar(listreg, SizeOf(TLISTREGISTER),0); //ОЧИЩАЕМ
[B] // открываем карту[/B]
 map := mapOpenMap('D:\_TEST_ZONE_\-test_pasp\map\testmap.sitx',0);
[B] // считывааем и получсем только слово test. data уже нет[/B]
 mapGetSiteInfoEx(map, map, mapreg, listreg, 1);
 mapCloseMap(map);
end;[/QUOTE]

1. меню Задачи - Расчеты по карте - группа задач "Работа с выделенными объектами" - Статистика выделенных объектов.
статистика отрабатывать очень длительное время и периодически зависает
[IMG]http://delphi-gis.ucoz.ua/Images/ForForum/2015/img006.png[/IMG]

[IMG]http://delphi-gis.ucoz.ua/Images/ForForum/2015/img007.png[/IMG]
2. меню Поиск - Поиск и выделение - вкладка "Статистика".
при нажатии на "Выделить" в закладке "Статистика" диалог пропадает


есть ли способ вывода статистики карты без выделения объектов. Интересует вся карта.
п.с есть объекты которые не попадают в Вашу статистику, например те, которые не выделяются (РАМКА ЛИСТА) или
на тех картах, у которых снято выделение в списке карт. Меня интересует полная статистика того, что на карте
по сути, нужно сравнить 2 карты формируемые одинаковым ПО с разными версиями

Здравствуйте !
Собственно вопрос - как посмотреть статистику объектов карт.
Интересует количество по "сортам" (код + локализация)

[CODE]А зачем вы пишите в резервные поля?[/CODE]
с резервный полей вообще нули возвращаются.
Я пишу в поле дата, которое 12 байт перед полем резерв которое 29 байт

Обрезание происходит внтури Вашей функции ядра, которая по каким то таинственным причинам наполняет структуру по полям, а не полностью.

Простыми словами, мы (с коллегой) пишем вот сюда
[CODE]...
 [B] DateAngle : array[0..11] of GTKchar; // Дата склонения "ГГГГММДД" 06/11/2010 [/B]
   Reserve     : array [0..27] of GTKCHAR; // = 0
...[/CODE]
информацию в виде набора байт , в С++ (char * DateAngle = "XXX\nYYY\0ZZ")
считываем и получаем
"XXX"
всё что после \n исчезает

Здравствуйте господа разработчики !
Просьба пояснить каким образом работают функции


[code]function mapGetSiteInfoEx(Map : HMap;Site : HSite; var mapreg: TMAPREGISTEREX;
 var listreg : TLISTREGISTER; sheetnumber: integer) : integer;
{$IFNDEF LINUXAPI} stdcall {$ELSE} cdecl {$ENDIF}
external sGisAcces;

function mapUpdateSiteInfoEx(aMap : HMAP; aSite : HSITE;
map : PMAPREGISTEREX;
sheet : PLISTREGISTER;
sheetnumber : integer;
datum : PDATUMPARAM;
ellparm : PELLIPSOIDPARAM;
transform : integer) : integer;
[/code]

Ожидается что структура TLISTREGISTER которая подаётся  через mapUpdateSiteInfoEx  будет получена при mapGetSiteInfoEx
В результате, при записи в резервные и текстовые поля символов с кодами \4 \0 \8 \2 , при чтении, обрезаются до указанного символа.

Вопрос:
Как возвращаются структурі  используя memcpy струкутры, или используя strncpy по каждому полю?

[QUOTE]Andrey Gheleznyakov пишет:
а пока можете изменить текст исходного кода[/QUOTE]
Тексты я менять не стану потому что всё будет мигать жирным (и там где не надо)
Сделал проще - дописал обработчик на таймере , работает =)

п.с вопрос задал потому что, думал что, можно без обработчика

[QUOTE]Andrey Gheleznyakov пишет:
ObjectFind.StyleSelect := SEL_USERFUNC;[/QUOTE]
а нужно
[QUOTE]ObjectFind.StyleSelect := SEL_BLINK2;[/QUOTE]

[QUOTE]Елена Кузнецова пишет:
Рекомендуем поставить другой антивирус.[/QUOTE]
или включить папку с ГТК в исключение...
или переписать коды в gisuacces касающийся ввода/вывода на диск  :)