Re: Merging data from one TDBRichViewEdit To TRichViewEdit

Return to index

Author

Message

Fredrik Larsson

Posted: 02/25/2003 3:10:11

Well, I ment that I loop through all items in the document. I just replaced

my index variable with 0. A side note, if I access the last item I get an

access violation. That's why I go to itemcount - 2. But anyway, the main

issue is that line breaks isn't maintained. I thought that linebreaks

(#13#10) was part of the text but maby there is some property? I can't find

it or figure it out though.

var

  lIndex: Integer;

begin

  PreviewEdit.Clear;

  for lIndex := 0 to DesignEdit.ItemCount - 2 do

  begin

    PreviewEdit.CurTextStyleNo := 0;

    if DesignEdit.RVData.GetItemStyle(lIndex)>=0 then

    begin

      if string(DesignEdit.GetItemTag(lIndex)) <> '' then

        PreviewEdit.InsertText('<REPLACE THIS>')

      else

        PreviewEdit.InsertText(DesignEdit.GetItemText(lIndex));

    end;

  end;

  previewedit.Format;

"Sergey Tkachenko" <svt@trichview.com> wrote in message

news:3e5a8524$3@support.torry.net...

> GetItemText(0) returns only a text of the first text line.

>

> Use function GetAllText from

> http://www.trichview.com/support/files/rvgettext.zip

> to retrieve all text in the document.

>

>

> > PreviewEdit.InsertText(DesignEdit.GetItemText(0));

> > PreviewEdit is the template (in database) and DesignEdit (edit view) is

> the

> > filled richview. The problem is that linebreaks isn't copied. Kind of

> this:

>

>

>