RVE Border Color

[smot22]

Hi

How can I change the RVE border color?
Is there any property to do so?

[smot22]

*push*

[Pieter E.]

Hi,

You could try this (C++):

Code: Select all

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if( RichViewEdit1->Parent->InheritsFrom(__classid(TForm)))
        {
          RichViewEdit1->BorderStyle = bsNone;
          ((TForm *)RichViewEdit1->Parent)->Canvas->Pen->Color = clBlack;
          ((TForm *)RichViewEdit1->Parent)->Canvas->Rectangle(TRect(RichViewEdit1->Left - 1,
            RichViewEdit1->Top - 1, RichViewEdit1->Left + RichViewEdit1->Width + 1,
            RichViewEdit1->Top + RichViewEdit1->Height + 1));
        }
}
//---------------------------------------------------------------------------

Above source sets the 'BorderStyle' of the TRichViewEdit to 'None' and draws a black rectangle.

Good luck,

Pieter E.

[Sergey Tkachenko]

Yes, border cannot be modified but can be hidden.