Multi RV in a TForm
Posted: Thu Oct 31, 2013 3:26 pm
Hi,
I have a TForm with my richview and preperty (bold, italic, ..)
I use it in Frame on a other TForm.
I need to have 2 Richview on the same TForm.
Here is my code
- Only the first create works.
- If I let "DefaultControl" of RVAControlPanel empty the 2 works but, when I write on RV1 and I click on bold button of RV2 it's change in RV1.
Can you help me ?
Thanks
I have a TForm with my richview and preperty (bold, italic, ..)
I use it in Frame on a other TForm.
I need to have 2 Richview on the same TForm.
Here is my code
Code: Select all
FrameMessage : TfcRichDocument;
FrameMessage2 : TfcRichDocument;
//-----
// on create form
FrameMessage := TfcRichDocument.Create(nil);
FrameMessage2 := TfcRichDocument.Create(nil);
//-----
// on form show
FrameMessage.Parent := pMessageBas;
FrameMessage.BorderStyle := bsNone;
FrameMessage.Align := alClient;
FrameMessage2.Parent := Panel1;
FrameMessage2.BorderStyle := bsNone;
FrameMessage2.Align := alClient;
- If I let "DefaultControl" of RVAControlPanel empty the 2 works but, when I write on RV1 and I click on bold button of RV2 it's change in RV1.
Can you help me ?
Thanks