Vcl.Forms.TCustomActiveForm.CreateParams
Delphi
procedure CreateParams(var Params: TCreateParams); override;
C++
virtual void __fastcall CreateParams(Vcl::Controls::TCreateParams &Params);
Properties
Type | Visibility | Source | Unit | Parent |
---|---|---|---|---|
procedure function |
protected | Vcl.Forms.pas Vcl.Forms.hpp |
Vcl.Forms | TCustomActiveForm |
Description
Updates the active form's creation parameters according to the value of the AxBorderStyle property.
CreateParams performs the following tasks:
- Calls the inherited CreateParams method.
- Removes the WS_CAPTION flag from the Style property of Params.
- Adds flags to the Style and ExStyle properties of Params according to the value of the AxBorderStyle property, as shown in the following table.
AxBorderStyle | Style | ExStyle |
---|---|---|
afbNone |
Nothing |
Nothing |
afbSingle |
WS_BORDER |
Nothing |
afbSunken |
Nothing |
WS_EX_CLIENTEDGE |
afbRaised |
WS_DLGFRAME |
WS_EX_WINDOWEDGE |
Note: The creation parameters are not updated when the form is in design mode.