Solved

Formatted text with RichText component

Posted on 1998-09-11
2
244 Views
Last Modified: 2010-04-03
I have got some formatted text in a RichEdit1. And I have got a QRRichText1 box in a QRListForm.
I want to transfer the formatted text from the RichEdit1 to QRRichText1.
But how?
0
Comment
Question by:rainbowsoftware
2 Comments
 
LVL 2

Accepted Solution

by:
rene100 earned 50 total points
ID: 1339498
try this:

procedure CopyStream();
var
Stream: TStream;
begin
Stream:=TMemoryStream.Create;
RichEdit1.Lines.SaveToStream(Stream);
Stream.Position:=0;
RichEdit2.lines.LoadFromStream(Stream);
Stream.free;
end;
0
 

Author Comment

by:rainbowsoftware
ID: 1339499
Thanks a lot!
Sometimes the solution is stumbeling (or whatever it's called) close to your brain.
Mine obviously had an offday.

0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Hello everybody This Article will show you how to validate number with TEdit control, What's the TEdit control? TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text. Usua…
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Video by: Mark
This lesson goes over how to construct ordered and unordered lists and how to create hyperlinks.

910 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now