Аналитика
http://www.geosystema.net/forum/

Формирорвание отчета в Reports
http://www.geosystema.net/forum/viewtopic.php?f=1&t=295
Страница 49 из 49

Автор:  Руслан Пархуць [ 08 фев 2022 21:15 ]
Заголовок сообщения:  Re: Формирорвание отчета в Reports

ТОВ Аспект писал(а):
Доброго дня. Прошу допомогти розібратися, в файлі XML коли більше одного власника, мемо3 становиться вище,
тоді Мемо1 та 2 підіймаю на Height Memo3, під Мемо1,2,3 є аналогічні мемо4,5,6:ShiftMode=smAlways які в такому випадку зміщується нижче, але одне мемо, мемо4 не зміщується. Підкажіть будь ласко що ще треба зробити.

Доброго дня. Я б робив це за допомогою Блоків (Band), що дозволяє контролювати це "розтягування".

Вложения:
NMLists.fr3 [5.56 Кб]
Скачиваний: 219

Автор:  Николай С. [ 14 фев 2022 10:49 ]
Заголовок сообщения:  Re: Формирорвание отчета в Reports

Руслан Пархуць писал(а):
потрiбно визначити змiнну AS а також додати саму нумерацiю ну i StringPart - для отримання першого значення зi стрiчки ЦВ
Код:
AS:='';
AS:=AS+'діл. № '+IntToStr(I) + ' ' + XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Area') + ' га '+ StringPart(XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Purpose'),1,' ') + #13#10;


Доброго дня.
Підкажіть будь-ласка, чому формує тільки останню ділянку.
діл. №2 0.2244 га 01.03
Дякую.

Код:
var
I,N: Integer;
AS: String;

begin
N:=NodesCount('./Parcels','ParcelInfo');
I:=0;
if N=1
then begin
ShowMessage('Однієї ділянки не достатньо для поділу, формування звіту зупинено');
Engine.StopReport;
end;
begin
for I:=1 to N do
AS:='';
AS:=AS+'діл. №'+IntToStr(I) + ' ' + XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Area') + ' га '+ StringPart(XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Purpose'),1,' ') + #13#10;
end;
end.

Автор:  ТОВ Аспект [ 14 фев 2022 11:41 ]
Заголовок сообщения:  Re: Формирорвание отчета в Reports

Приберіть AS:='';

Автор:  Dmitry_Zolotar [ 14 фев 2022 13:56 ]
Заголовок сообщения:  Re: Формирорвание отчета в Reports

замість
Код:
for I:=1 to N do
AS:='';
AS:=AS+'діл. №'+IntToStr(I) + ' ' + XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Area') + ' га '+ StringPart(XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Purpose'),1,' ') + #13#10;


зробіть
Код:
AS:='';
for I:=1 to N do
AS:=AS+'діл. №'+IntToStr(I) + ' ' + XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Area') + ' га '+ StringPart(XPath('/Parcels/ParcelInfo['+IntToStr(I)+']/Purpose'),1,' ') + #13#10;

Автор:  shyrko [ 06 фев 2024 07:33 ]
Заголовок сообщения:  Re: Формирорвание отчета в Reports

Доброго дня. Виникло таке питання.
В пояснювальній записці потрібно присвоїти значення перемінній
Шматок Коду
kadn:=param id20010;
if kadn<>'' then Geo:='Топографо-геодезичні роботи на даній території не проводились'
else Geo:=??????

Необхідно підгрузити з текстового файлу інформацію, наприклад "d:\Digitals\Lists\Geodesy.txt"
Можна як варіант використати обробник події, у якомусь CheckBox поставити галочку, а далі мета та сама.

Страница 49 из 49 Часовой пояс: UTC + 2 часа
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/