С сохранением масштаба в этом случае возникают проблемы, т.к. заранее неизвестен размер формируемого растра.
Можно формировать картинку кадплана предварительно используя DMT-шаблон определенных размеров(таких же как у Image в fr3-шаблоне), пример во вложении. И подгружать картинку уже не из файла GetProgramDir+‘\Pictures\Report’+IntToStr()+‘.bmp’ а из файла GetProgramDir+‘\Pictures\CP’+CadNumber+‘.bmp’, где CadNumber - полный кадастровый номер(19 цифр без двоеточий).
Во избежание стирания всех файлов в папке Pictures перед вызовом генератора отчетов установите(Сервис-Настройки-Главная-Константы) константу ReportPictures=0.
CP.dmt (18.9 KB)
Решил проблему заменой формата с bmp на WMF.
FileName:=GetProgramDir+‘\Pictures\Report’+IntToStr()+‘.WMF’
Работает отлично… масштаб не теряется и качество картинки получше. Одна проблема, файл WMF в папку Pictures нужно вкидывать вручную. Есть ли функция выбора формата картинки, который формирует сам Report в папку Pictures? Спасибо за ответ.
;Скрипт формирует для помеченного объекта кадплан из Digitals\CP.dmt и сохраняет его
;в Digitals\Pictures\CPXXXXXXXXXXXXXXXXXXX.wmf где XXXXXXXXXXXXXXXXXXX - кадастровый номер
$PP=@ProgramPath
$IN4Map=@ActivateMap
@CreateFolder $PP\Documents
Документы | CP
$CPMap=@ActivateMap
@Dialog.WaitBox Отредактируйте кадастровый план и нажмите кнопку “Продолжить”
@ActivateMap $CPMap
Файл | Сохранить
$FN=@Map.ClearShortFilename
@CreateFolder $PP\Pictures
$FN=$PP\Pictures$FN.wmf
@Map.SaveToTIF 300 24 $FN
@CloseMap $CPMap
@ActivateMap $IN4Map
возможно целесообразно еще добавить вызов генератора отчетов в конце скрипта
файл сохраняет нормально, но в названии файла выносится ошибка CP2320986601060220220051.wmf , 2 раза выводит квартал. Может что не так сделал? В общем создал переменную сadnumber что бы совпадал с названием файла.
Генерирую отчет и:
Были обнаружены следующие ошибки:Metafile is not valid
Но когда делаю вручную экспорт wmf с таким же названием CP2320986601060220220051.wmf все работает. только не wmf а WMF.
я так понял что то с форматом? или Report старенький?
Извините, это я не так сделал. В свойствах карты CP.dmt в поле “Имя” вместо Parent[DS]Parent[SD]Parent[BC]P[SC] нужно поставить Parent[DS]Parent[SD]P[SC] либо Parent[DS]Parent[SD]Parent[BC]CUT(4,4,P[SC])
Теперь сохраняет отлично!
Но все равно что то с форматом
Были обнаружены следующие ошибки:Metafile is not valid
если вручную то работает.
Файл-экспорт в-WMF-…Piktures-CP0000000000000000000.WMF
А если экспортировать через bmp и выбрать Windows Metafile, результат тот же с ошибкой. хотя формат один и тот же ![]()
Помогите пожалуйста я не знаю почему при генерировании отчета на 2 участка , не получается разные целевые назначения, а идет повтор одного, в зависимости какой участок был выделен первым. Спасибо.
документація на 2 ділянки.fr3 (178 KB)
в тексте скрипта строки
BudSR:=GetSRByCV('02.01');
SilSR:=GetSRByCV('01.03');
определяют номера участков с нужным кодом целевого назначения.
Если такие участки не найдены, то переменные BudSR и SilSR будут равны нулю и все обращения к функции Param(‘название дескриптора’,BudSR) и Param(‘название дескриптора’,SilSR) будут возвращать значения для первого участка. Избежать этого можно проверяя значения переменных BudSR и SilSR сразу после инициализации, останавливая построение отчета в случае если хоть одна из этих переменных равна нулю.
BudSR:=GetSRByCV('02.01');
SilSR:=GetSRByCV('01.03');
if (BudSR=0) or (SilSR=0)
then begin
ShowMessage('Не найден(ы) участок(ки) с заданным кодом целевого назначения');
Engine.StopReport;
end;
Ув. Дмитрий Золотар, подскажите как сделать , чтоб обнаруживал такие участки?
документація на 2 ділянки.fr3 (178 KB)
Как обнаруживать я уже писал, вот что делать с ними? В примере я останавливал генерирование отчета.
Может расширить критерии поиска? Допустим участки для "будівництва"искать с кодом 1.8 или 02.01, а для ОСГ искать с кодом 1.2 или 01.03 и только если не найден ни один из кодов, то … останавливать отчет?
Не стал заморачиваться и вернул старые значения СV, все работает
нужна помощь как, сформировать отчет на 3 или 4 участка для одного человека. Может есть шаблоны
Спасибо.
Помогите создать скрипт
Файл/Экспорт в/Wmf/ путь
В новой версии Ged.exe изменена работа команды @Map.SaveToTIF, теперь сохранять можно и в WMF.
P.S. Ранее при указании расширения, отличного от BMP и JPG, сохранение происходило в TIF-формат. При этом на некоторых компьютерах (в частности на том, где скрипт был создан) генератор отчетов загружал картинку без проблем, что вызывало иллюзию корректности метафайла.
Есть шаблон дмт чтобы формировалась экспликация?
Актуально. Ответов нету…
Подскажите, есть ли шаблон акта “на право постійного користування”
Сервис-Документы-Госакт (пост.користування) обратная
Сервис-Документы-Госакт (пост.користування) лицевая
А что по новому классификатору угодий? Есть у кого txt с списком новых кодов угодий, что бы поправить свой in4.dmf ?