Vcl.Forms.TCustomActiveForm.CreateParams
Delphi
procedure CreateParams(var Params: TCreateParams); override;
C++
virtual void __fastcall CreateParams(Vcl::Controls::TCreateParams &Params);
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
procedure function |
protected | Vcl.Forms.pas Vcl.Forms.hpp |
Vcl.Forms | TCustomActiveForm |
Description
Actualise les paramètres de création de la fiche active en fonction de la valeur de la propriété AxBorderStyle.
CreateParams exécute les tâches suivantes :
- Appelle la méthode héritée CreateParams.
- Retire l'indicateur WS_CAPTION de la propriété Style de Params.
- Ajoute des indicateurs aux propriétés Style et ExStyle properties de Params selon la valeur de la propriété AxBorderStyle de la manière indiquée dans le tableau suivant.
AxBorderStyle | Style | ExStyle |
---|---|---|
afbNone |
rien |
rien |
afbSingle |
WS_BORDER |
rien |
afbSunken |
rien |
WS_EX_CLIENTEDGE |
afbRaised |
WS_DLGFRAME |
WS_EX_CLIENTEDGE |
Remarque : Les paramètres de création ne sont pas actualisés quand la fiche est en mode conception.