Скачать: CL | DM;

Как скрыть бэнд в FastReport e?   Найти похожие ветки 

← →
KIR ©   (2002-10-11 01:04) [0]

Народ, что-то не могу разобраться. Мне нужно, чтобы в зависимости от того, что вернет запрос, который является ДатаСетом для отчета FastReport MasterData1 в самом отчете был либо Visible/True, либо Visible.False. Вот как мне в событии OnBeforePrint добраться до моего MasterData1?

---

← →
KIR ©   (2002-10-11 11:50) [1]

Может кто хотя бы знает что за параметры получает FastReport в событии OnBeforePrint? А то я в хелпе толкового разъяснения не нашел...

---

← →
Johnmen ©   (2002-10-11 11:56) [2]

А как выглядит OnBeforePrint ?

---

← →
KIR ©   (2002-10-11 12:06) [3]

procedure TZurnForm.frReport1BeforePrint(Memo: TStringList; View: TfrView);

---

← →
Johnmen ©   (2002-10-11 12:12) [4]

Так-так...
frReport1.MasterData ?
А вообще, неясно, какой объект надо скрывать или показывать...

---

← →
KIR ©   (2002-10-11 12:17) [5]

Дело в том, что мне кто-то уже ответил на этот вопрос. Я страничку сохранил до лучших времен, а потом format c:, а про страничку-то я и забыл... Но я точно помню, что это делается (скрытие бэнда) через OnBeforePrint, а параметр Memo (это я уже в процессе написания сообщения допераю) - это скорее всего список всех объектов находящихся на ркпорте, но вот только как добраться до конкретного объекта...

---

← →
KIR ©   (2002-10-11 12:18) [6]

Скрвть надо все то, что лежит на MasterData

---

← →
KIR ©   (2002-10-14 08:05) [7]

люди, ау... оч. надо, а то отчет кривой получактся

---

← →
KA_   (2002-10-14 10:12) [8]

Не очень понятно, что необходимо сделать. Если не печатать мастердата для некоторых записей запроса - то можно просто отфильтровать запрос.
В OnBeforePrint компонента репорт параметры должны содержать:
Memo - текст конкретного компонента на отчете (т.е. то что ты увидишь на бумаге/экране), а View - ссылка на этот компонент.
Я делал так так:
procedure ShowMasterData(show: Boolean; MasterDataName: String = "MasterData");
var
MasterData: TfrView;
begin
with frReport do
begin
MasterData := FindObject(MasterDataName);
if (MasterData <> nil) and (MasterData is TfrBandView) then
MasterData.Visible := show;
end;

Либо можно делать это в самом отчете, в OnBeforePrint бэнда - передавать в отчет переменную или вычислять ее в этом самом OnBeforePrint и в зависимости от ее значения изменять свойство бэнда Visible.

---

← →
KIR ©   (2002-10-16 00:06) [9]

спас!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.013 c