TPanel.BevelInner Property

Determines the style of the inner bevel of a panel.

Pascal

property BevelInner: TBevelCut;

C++

__property TPanelBevel BevelInner;__property TBevelCut BevelInner;

Description

Use BevelInner to provide the panel with a three-dimensional beveled look. A panel component has two bevels, an outer bevel drawn next to the border of the control, and an inner bevel drawn inside the outer bevel, separated by the number of pixels specified in the BorderWidth property. The width of the bevels, if they are drawn, is the BevelWidth property.

C++ Examples:

Copy Code

/*
This example uses a panel component and a button named 
CreateStatusLine on a form. The code moves the panel to the 
bottom of the form when the user clicks the button and gives
the panel the appearance of a status line by changing the 
value of the BevelInner, BevelOuter, BevelWidth, and 
BorderWidth properties.
*/
void __fastcall TForm1::CreateStatusLineClick(TObject *Sender)
{
  Panel1->Align = alBottom;
  Panel1->BevelInner = bvLowered;
  Panel1->BevelOuter = bvRaised;
  Panel1->BorderWidth = 1;
  Panel1->BevelWidth = 1;
}

Delphi Examples:

Copy Code

{
This example uses a panel component and a button named 
CreateStatusLine on a form. The code moves the panel to the 
bottom of the form when the user clicks the button and gives
the panel the appearance of a status line by changing the 
value of the BevelInner, BevelOuter, BevelWidth, and 
BorderWidth properties.
} 
procedure TForm1.CreateStatusLineClick(Sender: TObject);
begin
  with Panel1 do
  begin
    Align := alBottom;
    BevelInner := bvLowered;
    BevelOuter := bvRaised;
    BorderWidth := 1;
    BevelWidth := 1;
  end;
end;