Редактирование текста в Memo

intaari

Добрый день!!!

Не сохраняется результат редактирования Memo готового отчете в окне предварительного просмотра. Сохраняю отчет frxReport1.SaveToFile, загружаю frxReport1.LoadFromFile и в том поле где делал изменения их нет.
Код на событие OnPreviewClick, здесь вроде все правильно:

procedure Memo12OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
var
  s: String;
begin
  s := TfrxMemoView(Sender).Text;
  SetLength(s, Length(s) - 2); // cut off #13#10
  TfrxMemoView(Sender).Text := InputBox('Редактирование поля','', s);
  Modified := True;
end;

AlexTZ

Этот код меняет только готовый отчет, в шаблоне отчета изменений быть и не должно.

intaari

А как всетаки реалзовать то, что мне необходимо

AlexTZ

А непонятно, что же именно необходимо. Сохранять готовый отчет? Это TfrxReport.PreviewPages.SaveToFile.

intaari

Совершенно верно, необходимо сохранить готовый отчет в котором в окне предварительного просмотра, в объекте Memo, был изменен текст.

intaari

Заменил frxReport.SaveToFile на frxReport.PreviewPages.SaveToFile, стал ругаться, что не видет класс PrepareReport. Что то я похоже недопонимаю.

AlexTZ

Чтобы открыть готовый отчет, надо вызывать TfrxReport.PreviewPages.LoadFromFile.

intaari

Как правильно вызывать frxReport.PreviewPages.LoadFromFile, до построения отчета frxReport1.ShowReport или после

AlexTZ

См. programmer manual, стр. 19