Быстрые отчеты - маркированный текст

Question

Есть ли способ, которым вы можете иметь маркированный текст в быстрых отчетах 4.13? У меня есть поле memo, которое я хотел бы отобразить с маркировкой. Если в быстрых отчетах нет других компонентов delphi, которые могут это сделать?

Answer 1

Объект RichText (TfrxRichView) поддерживает маркированный текст.

Вопрос, который, естественно, может поднять вверх, как сделать этот маркированный список из кода. Ну, это довольно легко. Вы только что установили свойство Numbering текущего Paragraph для внутреннего RichEdit объекта TfrxRichView на nsBullet. Предполагая, что у вас есть RichText объекта с именем Rich1 помещен на отчете frxReport1, вы можете использовать код, как это сделать три маркированные элементы:

uses 
    frxClass, frxRich, frxRichEdit; 

procedure TForm2.Button1Click(Sender: TObject); 
var 
    Component: TfrxComponent; 
begin 
    Component := frxReport1.FindObject('Rich1'); 
    if Component is TfrxRichView then 
    begin 
    TfrxRichView(Component).RichEdit.Clear; 
    TfrxRichView(Component).RichEdit.Paragraph.Numbering := nsBullet; 

    TfrxRichView(Component).RichEdit.Lines.Add('Item 1'); 
    TfrxRichView(Component).RichEdit.Lines.Add('Item 2'); 
    TfrxRichView(Component).RichEdit.Lines.Add('Item 3'); 

    frxReport1.ShowReport; 
    end; 
end;