Class TMColumn (unit MyDbgrids)

Inherits from

TCollectionItem

Constructors


constructor Create(Collection: TCollection);

TColumn


Functions

procedure Assign(Source: TPersistent);


function DefaultAlignment: TAlignment;


function DefaultColor: TColor;


function DefaultFont: TFont;


function DefaultReadOnly: Boolean;


function DefaultWidth: Integer;


destructor Destroy;


procedure RestoreDefaults;


function CreateTitle: TMColumnTitle;


function GetGrid: TMCustomDBGrid;


procedure RefreshDefaultFont;


procedure FontChanged(Sender: TObject);


function GetAlignment: TAlignment;


function GetColor: TColor;


function GetField: TField;


function GetFont: TFont;

Returns Nil if FieldName can't be found in dataset

function GetPickList: TStrings;


function GetReadOnly: Boolean;


function GetWidth: Integer;


function IsAlignmentStored: Boolean;


function IsColorStored: Boolean;


function IsFontStored: Boolean;


function IsReadOnlyStored: Boolean;


function IsWidthStored: Boolean;


procedure SetAlignment(Value: TAlignment);


procedure SetButtonStyle(Value: TMColumnButtonStyle);


procedure SetColor(Value: TColor);


procedure SetField(Value: TField);


procedure SetFieldName(const Value: String);


procedure SetFont(Value: TFont);

no exceptions

procedure SetPickList(Value: TStrings);


procedure SetReadOnly(Value: Boolean);


procedure SetTitle(Value: TMColumnTitle);


procedure SetWidth(Value: Integer);


Properties

property Alignment : TAlignment


property ButtonStyle : TMColumnButtonStyle


property Color : TColor


property DropDownRows : Integer


property FieldName : String


property Font : TFont


property PickList : TStrings


property ReadOnly : Boolean


property Title : TMColumnTitle


property Width : Integer


property AssignedValues : TColumnValues


property Field : TField


Events

Variables

FAlignment : TAlignment;


FAssignedValues : TColumnValues;


FButtonStyle : TMColumnButtonStyle;


FColor : TColor;


FDropDownRows : Integer;


FField : TField;


FFieldName : string;


FFont : TFont;


FPickList : TStrings;


FReadonly : Boolean;


FTitle : TMColumnTitle;


FWidth : Integer;



Constructors


constructor Create(Collection: TCollection);

TColumn


Functions


procedure Assign(Source: TPersistent);


function DefaultAlignment: TAlignment;


function DefaultColor: TColor;


function DefaultFont: TFont;


function DefaultReadOnly: Boolean;


function DefaultWidth: Integer;


destructor Destroy;


procedure RestoreDefaults;


function CreateTitle: TMColumnTitle;


function GetGrid: TMCustomDBGrid;


procedure RefreshDefaultFont;


procedure FontChanged(Sender: TObject);


function GetAlignment: TAlignment;


function GetColor: TColor;


function GetField: TField;


function GetFont: TFont;

Returns Nil if FieldName can't be found in dataset


function GetPickList: TStrings;


function GetReadOnly: Boolean;


function GetWidth: Integer;


function IsAlignmentStored: Boolean;


function IsColorStored: Boolean;


function IsFontStored: Boolean;


function IsReadOnlyStored: Boolean;


function IsWidthStored: Boolean;


procedure SetAlignment(Value: TAlignment);


procedure SetButtonStyle(Value: TMColumnButtonStyle);


procedure SetColor(Value: TColor);


procedure SetField(Value: TField);


procedure SetFieldName(const Value: String);


procedure SetFont(Value: TFont);

no exceptions


procedure SetPickList(Value: TStrings);


procedure SetReadOnly(Value: Boolean);


procedure SetTitle(Value: TMColumnTitle);


procedure SetWidth(Value: Integer);


Properties


property Alignment : TAlignment


property ButtonStyle : TMColumnButtonStyle


property Color : TColor


property DropDownRows : Integer


property FieldName : String


property Font : TFont


property PickList : TStrings


property ReadOnly : Boolean


property Title : TMColumnTitle


property Width : Integer


property AssignedValues : TColumnValues


property Field : TField


Events


Variables


FAlignment : TAlignment;


FAssignedValues : TColumnValues;


FButtonStyle : TMColumnButtonStyle;


FColor : TColor;


FDropDownRows : Integer;


FField : TField;


FFieldName : string;


FFont : TFont;


FPickList : TStrings;


FReadonly : Boolean;


FTitle : TMColumnTitle;


FWidth : Integer;