Merging documents

Return to index

Author

Message

Lee.Bambury

Posted: 10/06/2004 13:51:47

Hi

  Is there any correct way of doing this, we current have templates which

are saved out in rvf format and when a user selects one of these templates

they are asked if they would like to merge them with what they have already

loaded,  I can get this working to a fashion using the clipboard, I have

also tried saving the contents to string streams &  merging them together,

then loading the rvf stream back up,  but doing these methods seem to be

unstable and the control will access violate.

I am constantly merging them as this is something a user is likly to do,

when messing around with them opening them in different orders this is when

it seems to have a problem, one of my templates has a background and the

other has some images and the

3rd just has some plain old text in.

This is currently how I am doing this

  If bMerge Then

    begin

      TfrmRichEmail1.txtBody.Format;

      TfrmRichEmail1.txtBody.SelectAll;

      TfrmRichEmail1.txtBody.Copy;

    end;

  {EnDIF}

{*** uses rvactions open method then calls richedit.format  ***}

OpenDocument(psDataLocation + 'Templates\' + PadZero(siThisUser, 4) + '\' +

sCaption + '.rvf');

  If bMerge Then

    begin

      If TfrmRichEmail1.txtBody.CanPaste Then

        begin

          TfrmRichEmail1.txtBody.Paste;

          TfrmRichEmail1.txtBody.Format;

        end;

      {EnDIF}

    end;

  {EnDIF}

Kind regards

Lee