TRichView.com

Hi all, if zCurrent<>'' then begin zResult_RVF:=zCurrent; zStream:=TStringStream.Create(zCurrent); zStream.Position := 0; RichViewEdit1.Clear; if not RichViewEdit1.LoadRVFFromStream(zStream) then ShowMessage('load failed');//it always fails RichViewEdit1.Format; zStream.Free; end; What is zCurrent?...

bswift wrote:I am using this

Code: Select all

RichViewEdit1.LoadRTF(s);

RichViewEdit1.Clear;
RichViewEdit1.LoadRTF(s);
RichViewEdit1.Format;

RichEnjoyer wrote:Hallo,

how become all chars in one string?

best wishes, Frank

function AllText(MyRV: TCustomRichView): string;
begin
MyRV.SelectAll;
Result := Trim(MyRV.GetSelText);
end;

yes, this is a problem.

see InplaceEditor

in my opinion, newgroups are better.

use OnSaveRTFExtra event