Legion
Legion
Подробная информация
- Имя пользователя
- Legion
- Присоединился
- Посещений
- 0
- Был на сайте
- Группы
- Members
Комментарии
-
Получил ответ от ТП: if TfrxPreview(frxReport1.Preview).PageNo <> 0 then begin TfrxPreview(frxReport1.Preview).Clear; TfrxPreview(frxReport1.Preview).Lock; end; Работает. Догадаться самому в жизни не получится, т.к. про процедуру Lock …
-
gpi написал: » Да, полностью очистить превью не удаётся Это я и так знаю Хтелось бы услышать что-нибудь конкретное от ТП
-
procedure TForm1.TreeChange(Sender: TObject; Node: TTreeNode); begin if Node.StateIndex = -1 then begin Tree.FullCollapse; Node[0].Selected := True; end else begin if TfrxPreview(frxReport1.Preview) <> nil then begin …
-
gpi написал: » А куда вставляете приведенный код? А какая разница?