powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Частичная печать данных отчёта в FastReport
2 сообщений из 2, страница 1 из 1
Частичная печать данных отчёта в FastReport
    #35365369
Hastur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем привет!

В общем надо печатать бланк медицинского обследования но в нём печатать только то что было заполнено в базе. Т.е. целые куски отчёта не должны попасть на лист и при этом не должно остаться пустоты на месте этих кусков. Как это можно сделать?

Для примера

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
   Ф.И.О. ___________________________________________________________Пол - м./ж. Возраст:____________
    1 .	Правое предсердие	мм.   _________________________     
        Вены: НПВ _______________  мм,  реакция на вдох ___________Коронарный синус_____________________
   2 .Левое предсердие_________________________мм. ________________________
     Легочные вены: скорость S	  см/сек, D __________см/сек 
   3 .Межпредсердная перегородка _______________. Овальное окно ______мм.  Аневризма ________________.     
      Дефект _______мм,  локализация __________________, диаметр шунта ________мм, сброс ______________ 
      Максимальная скорость потока _______см/сек, максимальный градиент давления ____________ мм.рт.ст.    

допустим что мы не исследовали предсердия тогда должно получиться вот так

Код: plaintext
1.
2.
3.
4.
   Ф.И.О. ___________________________________________________________Пол - м./ж. Возраст:____________
   3 .Межпредсердная перегородка _______________. Овальное окно ______мм.  Аневризма ________________.     
      Дефект _______мм,  локализация __________________, диаметр шунта ________мм, сброс ______________ 
      Максимальная скорость потока _______см/сек, максимальный градиент давления ____________ мм.рт.ст.    
...
Рейтинг: 0 / 0
Частичная печать данных отчёта в FastReport
    #35404613
Anna Yu.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если каждый блок либо есть, либо нет:
Каждый блок положить на отдельный бенд(данные). Всем полученным бендам не ставить в соотвествие набор данных, лишь указать кол-во строк=1

Запустить запрос(ы) для получения данных
Sql1.SQL:= "select '5' a1, '-' a2, '000' a3 , '1' контрольное_число1 from dual"

в скрипте пишем
begin
Sql1.close;
Sql1.open;

if <Sql1."контрольное_число1">=1 then
MasterData1.visible:=true
else
MasterData1.visible:=false;

end.

Еще вариант, если надо опускать куски текста, можно для каждого блока на бенд положить
только один объект текст такого содержания:

[IIF(<Sql1."A1"><>'','Измерение1 '+<Sql1."A1">+' ', '')][IIF(<Sql1."A2"><>'','Измерение2'+<Sql1."A1">, '')]

данное условие повторить столько раз, сколько изменений
в бенде указываем свойство растягиваемый
в объекте текст растягиваемый и смещаемый при перекрытии
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / Частичная печать данных отчёта в FastReport
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]