Аналитика http://www.geosystema.net/forum/ |
|
Формирорвание отчета в Reports http://www.geosystema.net/forum/viewtopic.php?f=1&t=295 |
Страница 41 из 49 |
Автор: | Vlad [ 17 окт 2015 05:14 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Благодарю |
Автор: | Vlad [ 17 окт 2015 07:22 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Чем этот пример открыть? |
Автор: | Dmitry_Zolotar [ 17 окт 2015 19:49 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
В генераторе отчетов в меню Дизайнер-Пакеты документов добавьте документ и свяжите его с шаблоном *.fr3 |
Автор: | GeKo [ 12 ноя 2015 15:31 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Пане Дмитро Золотар є така проблема на компютері при редагуванні FP3 файлу зникає зображення із кадастровими планами і т. д. (зникають саме малюнки коли двічі клацаю мишкою що редагувати (поправити адресу тощо)) |
Автор: | Dmitry_Zolotar [ 12 ноя 2015 18:23 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Надішліть такий fp3-файл. |
Автор: | mixey_dubno [ 07 дек 2015 10:21 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
GeKo писал(а): Пане Дмитро Золотар є така проблема на компютері при редагуванні FP3 файлу зникає зображення із кадастровими планами і т. д. (зникають саме малюнки коли двічі клацаю мишкою що редагувати (поправити адресу тощо)) я теж замітив коли відкриваєш щоб відредагувати наприклад протокол погодження меж то зникає картинка.....
|
Автор: | GeKo [ 09 дек 2015 10:36 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Доброго дня!!! підкажіть як можна зробити так, щоб, якщо в строці є менше ніж 54 символи після цього суміжника ставився ентер (#13#10)???? Є такий код: function PrepareXMLSmejList2: string; var I, N, FoundI: Integer; PPath, NbrPath, Nbr: string; List: TStringList; begin Result:=''; PPath:=XML573Root+'InfoPart/CadastralZoneInfo/CadastralQuarters/CadastralQuarterInfo/Parcels/ParcelInfo/AdjacentUnits'; N:=NodesCount(PPath,'AdjacentUnitInfo'); if N<1 then Exit; List := TStringList.Create; try for I:=1 to N do begin NbrPath := PPath + '/AdjacentUnitInfo['+IntToStr(I)+']/Proprietor'; if IsNodeExists(NbrPath + '/NaturalPerson') then begin FName:=XPath(NbrPath + '/NaturalPerson/FullName/FirstName'); MName:=XPath(NbrPath + '/NaturalPerson/FullName/MiddleName'); Nbr := XPath(NbrPath + '/NaturalPerson/FullName/LastName') + ' ' + Copy(FName,1,1) + '. ' + Copy(MName,1,1) + '.' + end else Nbr := XPath(NbrPath + '/LegalEntity/Name'); List.Add(Nbr); end; for I := 0 to List.Count -1 do begin if Result <> '' then Result := Result + #13#10; Result := Result+'________________ '+List[I]+#13#10; Memo3.Lines.Add('________________ '+List[i]); end; finally List.Free; end; end; Дуже потрібно терміново.... (приклад: ___________ суміжник (менше 54 символи) ___________ суміжник) |
Автор: | Dmitry_Zolotar [ 09 дек 2015 11:02 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Вместо Result := Result+'________________ '+List[I]+#13#10; поставьте Result := Result+'________________ '+IIF(Length(List[I])>54,chr(13)+chr(10),'')+List[I]+#13#10; В этой же функции формируется содержимое Memo3, если там тоже нужен этот перенос то вместо Memo3.Lines.Add('________________ '+List[i]); поставьте Memo3.Lines.Add('________________ '+IIF(Length(List[I])>54,chr(13)+chr(10),'')+List[i]); |
Автор: | GeKo [ 09 дек 2015 11:16 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Dmitry_Zolotar дуже дякую, але я не так висловився мені потрібно, щоб ентер ставився тільки після юридичної особи як суміжника і враховувалася і ця риска (______) в число 54 символів.... |
Автор: | GeKo [ 09 дек 2015 13:07 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Dmitry_Zolotar, а взагалі теке можливо як я задумав??? |
Автор: | Dmitry_Zolotar [ 09 дек 2015 15:42 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Вложение:
|
Автор: | GeKo [ 09 дек 2015 16:26 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Dmitry_Zolotar, нажаль не працює, коли попробував через Ваш шаблон пусте вікно, і як скопіював код в свій шаблон також пусте вікно((( Не знаю напевно я щось роблю не так... мене цікавить як цей код (нижня частина) складає список суміжників, що видати мені його в діалоговому вікні (memo)... |
Автор: | Dmitry_Zolotar [ 09 дек 2015 17:14 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Проблема може бути в цій строчці: XML573Root:=''; В моєму прикладі працює, в ваш шаблон ця строчку не потрібно переносити, ця змінна має інакше ініціалізуватись, її вміст залежить від режиму роботи (Сервіс-Документи-Шаблон чи Сервіс-Генератор звітів). В моєму прикладі результат функції заноситься в текст Memo1: Memo1.Lines.Text:=PrepareXMLSmejList2; В вашому потрібно в Memo3 вносити значення. Якось так begin XML573Root:=..... ... Memo3.Lines.Text:=PrepareXMLSmejList2; .... end; |
Автор: | petrogeo [ 13 дек 2015 01:17 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
Добрий день. допоможіть будь-ласка зробити шаблон для репорта з XML-файла. зразок додаю, того що потібно. Не розумію як добавити таблицю експлікації та прописати її заповнення. Дякую, за допомогу! P.S. цей планчик я створив з IN4-файла. Вложение:
|
Автор: | klaid [ 13 дек 2015 11:39 ] |
Заголовок сообщения: | Re: Формирорвание отчета в Reports |
petrogeo писал(а): Добрий день. допоможіть будь-ласка зробити шаблон для репорта з XML-файла. зразок додаю, того що потібно. Не розумію як добавити таблицю експлікації та прописати її заповнення. Дякую, за допомогу! P.S. цей планчик я створив з IN4-файла. Вложение: (А4) .jpg нашо придумувати велосипед, в шаблонах є кадастровий план "CadPlanA4.dmt" |
Страница 41 из 49 | Часовой пояс: UTC + 2 часа |
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |