Create a form with a client edge

韩冰

" A8 g; D+ x/ _: IAnswer: You can create a form with a client edge overriding the CreateParams function and adding the WS_EX_CLIENTEDGE style to Params.ExStyle.

1 h5 _! @$ C$ O& N8 l

Step 1: Add the CreateParams prototype to the form class.

0 i V G( @4 v/ I

private: void __fastcall CreateParams(TCreateParams &arams);

Step 2: Code the function.

( B* G: n4 A0 H2 n2 ^

void __fastcall TForm1::CreateParams(TCreateParams &arams) { TForm::CreateParams(Params); // call base class first 4 G2 T* M: d1 {. ^ Params.ExStyle |= WS_EX_CLIENTEDGE; // then add the style }

# n) }# S) b' C, |" d( P5 N

If you would rather not bother with CreateParams, you can achieve identical results by placing a panel on your form. Set the Aligment property of the panel to alClient, set both BevelInner and BevelOuter to bvNone, and set the panel's BorderStyle property to bsSingle.