TdxVisualRefinements.UsePaddingForStandaloneEditors Property

Specifies if global cell padding adjustments affect standalone DevExpress editors.

Declaration

class property UsePaddingForStandaloneEditors: Boolean read; write;

Property Value

Type	Description
Boolean	If True, global cell padding adjustments are applied both to in-place cell editors in container controls and standalone editors. If False, global cell padding adjustments affect only in-place cell editors.

Remarks

Set the UsePaddingForStandaloneEditors property to True in the initialization section of the main application unit to apply cell padding adjustments to standalone editors.

Example

The Padding property affects in-place cell editors when the UsePaddingForStandaloneEditors property is set to False.

The following code example adds 5 pixels to left and right paddings and 2 pixels to top and bottom paddings:

Delphi

uses
  Forms,
  cxLookAndFeels, // Adds the cxLookAndFeels unit to use the TdxVisualRefinements class
// ...
begin
  TdxVisualRefinements.BeginUpdate;  // Initiates the following batch change
  try
    TdxVisualRefinements.Padding := Rect(5, 2, 5, 2);
    TdxVisualRefinements.UsePaddingForStandaloneEditors := True;
  finally
    TdxVisualRefinements.EndUpdate;  // Calls EndUpdate regardless of the batch operation's success
  end;
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TMyForm, MyForm);
  Application.Run;
end.

C++

#include <vcl.h>
#include "cxLookAndFeels.hpp"  // Adds the cxLookAndFeels unit to use the TdxVisualRefinements class
#pragma hdrstop
#include <tchar.h>
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
{
  TdxPadding APadding;

  APadding.Left = 5;
  APadding.Top = 2;
  APadding.Right = 5;
  APadding.Bottom = 2;

    try
    {
      TdxVisualRefinements::BeginUpdate();  // Initiates the following batch change
      try
      {
        TdxVisualRefinements::Padding = APadding;
        TdxVisualRefinements::UsePaddingForStandaloneEditors = true;
      }
      __finally
      {
        TdxVisualRefinements::EndUpdate();  // Calls EndUpdate regardless of the batch operation's success
      }

      Application->Initialize();
      Application->MainFormOnTaskBar = true;
      Application->CreateForm(__classid(TMyForm), &MyForm);
      Application->Run();
    }
    // ...

Note

You can pass True as a parameter to the ApplyLightStyle class procedure to set the UsePaddingForStandaloneEditors property to True.

The UsePaddingForStandaloneEditors property’s default value is False.