Аналитика http://geosystema.net/forum/ |
|
Формирорвание отчета в Reports http://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), що дозволяє контролювати це "розтягування".
|
Автор: | Николай С. [ 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/ |