FR-310 экспорт в XML

Alex_Gol

Хорошо бы процедуру TfrxIEMatrix.AddObject дополнить одной строчкой
(иначе свойство DisplayFormat.Kind при экспорте всегда будет fkText)

procedure TfrxIEMatrix.AddObject(Obj: TfrxView);
............
if IsMemo(Obj) then
begin
// Memo
if FDeleteHTMLTags and TfrxCustomMemoView(Obj).AllowHTMLTags then
FObj.Memo.Text := TfrxCustomMemoView(Obj).WrapText(False)
else
FObj.Memo := TfrxCustomMemoView(Obj).Memo;
FObj.IsText := True;
FObj.IsRichText := False;
// add !!
FObj.DisplayFormat := TfrxCustomMemoView(Obj).DisplayFormat;
// add !!
end
............
end;