Create a form with a client edge

韩冰

Answer: You can create a form with a client edge overriding the CreateParams function and adding the WS_EX_CLIENTEDGE style to Params.ExStyle.

1 A) D& e2 q, z

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

( i/ p+ p6 I! b T

private: void __fastcall CreateParams(TCreateParams &arams);

Step 2: Code the function.

void __fastcall TForm1::CreateParams(TCreateParams &arams) { 1 q0 d) k5 o. H6 T) R5 ~6 ]* Z TForm::CreateParams(Params); // call base class first Params.ExStyle |= WS_EX_CLIENTEDGE; // then add the style T4 s; V+ N( C! }+ Q }

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.