DBMemo.Lines in a PRtext.Lines with CR [Partially solved]

[arwen]

I have a field in a tdbf table as below

Add('NOTE',ftString,160,False);

I wont to write it in a PRText.lines of powerPDF .

I try to do this

PRText1.Lines := FRM_EditData.DBMemo1.Lines;

but seem that the CR (carriage return) don't works.

Some idea .

Thanks to all .

[arwen]

TPRText object will have some bug and don't work .
I have solved replacing the TPRText object with some TPRLabel
and using the code below :

Code: [Select]


      For Linee := 0 to FRM_EditData.DBMemo1.Lines.Count-1 do
      begin

          if Linee = 0 then
          Note1sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];

          if Linee = 1 then
          Note2sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];
         
          if Linee = 2 then
          Note3sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];
         
          if Linee = 3 then
          Note4sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];

          if Linee = 4 then
          Note5sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];

          if Linee = 5 then
          Note6sc.Caption := FRM_EditData.DBMemo1.Lines.Strings[Linee];


      end;


The NoteXsc are TPRLabel .

Some other idea ?

Thanks to all