Редактирование Preview
После редактирования выведеного на экран отчёта
на печать отправляется изменённый документ, но затем все изменения сбрасывабтся в первичное состояние.
Как победить эту проблемму?
всё реализованно примерно так:
procedure TfrReport.frReportClickObject(Sender: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
if Sender.Restrictions <> [rfDontModify] then (Sender as TfrxCustomMemoView).Text:='Hello Word';
end;
на печать отправляется изменённый документ, но затем все изменения сбрасывабтся в первичное состояние.
Как победить эту проблемму?
всё реализованно примерно так:
procedure TfrReport.frReportClickObject(Sender: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
if Sender.Restrictions <> [rfDontModify] then (Sender as TfrxCustomMemoView).Text:='Hello Word';
end;
Комментарии