Class TDlgProps (unit XStringGridRegister)

Inherits from

TForm

Constructors


constructor Create(AOwner: TComponent; Designer: TFormDesigner);

////////////////////////////////////////////////////////////////////////////// private TDlgProps //


Functions

procedure BtnFontClick(Sender: TObject);


procedure BtnHdrFontClick(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure CBColorChange(Sender: TObject);


procedure CBEditorChange(Sender: TObject);


procedure CBHdrColorChange(Sender: TObject);


procedure EditHeaderExit(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure LBColumnsClick(Sender: TObject);

////////////////////////////////////////////////////////////////////////////// EventHandler TDlgProps //

procedure TBWidthChange(Sender: TObject);


procedure AddEditorClass(const S: string);


function GetCellEditor: TCellEditor;


function GetColCaption: TCaption;


function GetColColor: TColor;


function GetColFont: TFont;


function GetColHdrColor: TColor;


function GetColHdrFont: TFont;


function GetColWidth: integer;


procedure SetCellEditor(Value: TCellEditor);


procedure SetColCaption(Value: TCaption);


procedure SetColColor(Value: TColor);


procedure SetColFont(Value: TFont);


procedure SetColHdrColor(Value: TColor);


procedure SetColHdrFont(Value: TFont);


procedure SetColumns(Value: TXStringColumns);


procedure SetColWidth(Value: integer);


Properties

property Columns : TXStringColumns


property CellEditor : TCellEditor


property ColCaption : TCaption


property ColColor : TColor


property ColFont : TFont


property ColHdrColor : TColor


property ColHdrFont : TFont


property ColWidth : integer


Events

Variables

BtnClose : TButton;


BtnFont : TButton;


BtnHdrFont : TButton;


Button1 : TButton;


CBColor : TColorCombo;


CBEditor : TComboBox;


CBHdrColor : TColorCombo;


DlgFont : TFontDialog;


EditHeader : TEdit;


GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


LabelWidth : TLabel;


LBColumns : TListBox;


TBWidth : TTrackBar;


FColumns : TXStringColumns;


FDesigner : TFormDesigner;



Constructors


constructor Create(AOwner: TComponent; Designer: TFormDesigner);

////////////////////////////////////////////////////////////////////////////// private TDlgProps //


Functions


procedure BtnFontClick(Sender: TObject);


procedure BtnHdrFontClick(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure CBColorChange(Sender: TObject);


procedure CBEditorChange(Sender: TObject);


procedure CBHdrColorChange(Sender: TObject);


procedure EditHeaderExit(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure LBColumnsClick(Sender: TObject);

////////////////////////////////////////////////////////////////////////////// EventHandler TDlgProps //


procedure TBWidthChange(Sender: TObject);


procedure AddEditorClass(const S: string);


function GetCellEditor: TCellEditor;


function GetColCaption: TCaption;


function GetColColor: TColor;


function GetColFont: TFont;


function GetColHdrColor: TColor;


function GetColHdrFont: TFont;


function GetColWidth: integer;


procedure SetCellEditor(Value: TCellEditor);


procedure SetColCaption(Value: TCaption);


procedure SetColColor(Value: TColor);


procedure SetColFont(Value: TFont);


procedure SetColHdrColor(Value: TColor);


procedure SetColHdrFont(Value: TFont);


procedure SetColumns(Value: TXStringColumns);


procedure SetColWidth(Value: integer);


Properties


property Columns : TXStringColumns


property CellEditor : TCellEditor


property ColCaption : TCaption


property ColColor : TColor


property ColFont : TFont


property ColHdrColor : TColor


property ColHdrFont : TFont


property ColWidth : integer


Events


Variables


BtnClose : TButton;


BtnFont : TButton;


BtnHdrFont : TButton;


Button1 : TButton;


CBColor : TColorCombo;


CBEditor : TComboBox;


CBHdrColor : TColorCombo;


DlgFont : TFontDialog;


EditHeader : TEdit;


GroupBox1 : TGroupBox;


GroupBox2 : TGroupBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


LabelWidth : TLabel;


LBColumns : TListBox;


TBWidth : TTrackBar;


FColumns : TXStringColumns;


FDesigner : TFormDesigner;