Аналитика
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.fr3 [3.33 Кб]
Скачиваний: 812

Автор:  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-файла.
Вложение:
(А4) .jpg [249.13 Кб]
Скачиваний: 0

Автор:  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/