Re: Multiple lines in one RVData.SetItemText(i, value)

Author

Message

Anderson Wilson

Posted: 06/16/2005 18:19:33

Hi Jim,

I believe I found your problem.

You create a Stream containing a string not a RVF file and then you use

RichView2.InsertRVFFromStream method that EXPECTS an RVF format not a

string.

I hope this help you

Anderson

extracted from MemoMergeProblem.zip

StringStream := TStringStream.Create('This is the first line');

StringStream.Position := 0;

RichEdit1.Lines.LoadFromStream( StringStream); // load stream

contents into memorich

Result.LoadFromStream(StringStream);

//TBlobField(Table1.FieldByName('Data')).SaveToStream(Result);

Result.Position := 0;

RichView2.Clear;

RichView2.InsertRVFFromStream(Result, 0); // inserting will merge styles;

// RichView1 and RichView2 have the same collections of styles

Jim Maguire wrote:

> I run into exactly the same error (Abort) I get in prior posts when I use

> TMemoryStream as follows in the LoadData of Sample I attached in prior post:

> Result := TMemoryStream.Create;

> str := 'Insert this text in RVE';

> Result.WriteBuffer(PChar(str)^, Length(str));

> Result.Position := 0;

> I load it into a RichEdit just fine:

> RichEdit1.Lines.LoadFromStream( Result );

> When I use the Paradox TTable and your code:

> TBlobField(Table1.FieldByName('Data')).SaveToStream(Result), it works fine.

> If I could get an example of loading a string into a memory stream and then

> into RichView I could take it from there.

> Thanks, this is the only problem I'm having with RichView.

> There is something the Paradox SaveToStream is doing that's different from

> the TMemoryStream becausethe DB unit's TBlobField.SaveToStream.

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

> news:42ad8ae2$1@support.torry.net...

>>Do not use TStringStream, it damages binary data.

>>Use TMemoryStream instead