| Class TKeoEGrid (unit Keoegrid) |
TStringGrid
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure AddLine(const Vals: array of string);
procedure Clear;
procedure DelLines(Row, Count: Longint);
destructor Destroy;
procedure DrawCell(Col, Row: Longint; Rect: TRect; State: TGridDrawState);
procedure HideCol(ACol: Longint);
procedure InsertEmptyLines(Behind, Count: Longint);
procedure InsertLine(Behind: Longint; const Vals: array of string);
function IsCellLocked(ACol, ARow: Longint): Boolean;
function IsColHidden(ACol: Longint): Boolean;
function IsColLocked(ACol: Longint): Boolean;
function IsRowLocked(ARow: Longint): Boolean;
procedure KeyDown(var Key: Word; Shift: TShiftState);
function LineEmpty(Row: Integer): Boolean;
procedure LoadFromFile(FileName: string);
procedure LockCell(ACol, ARow: Longint);
procedure LockCol(ACol: Longint);
procedure LockRow(ARow: Longint);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
procedure RePaintCell(ACol, ARow: Longint);
procedure RePaintCol(ACol: Longint);
procedure RePaintRow(ARow: Longint);
procedure ReplaceLine(Line: Longint; const Vals: array of string);
procedure SaveToFile(FileName: string);
function Select1Cell(ACol, ARow: Integer): Boolean;
function SelectACell(ACol, ARow: Integer): Boolean;
function SelectCell(ACol, ARow: Longint): Boolean;
procedure ShowCol(ACol: Longint);
procedure SortAsDate(ACol: Longint);
procedure SortAsDateTime(ACol, AColT: Longint);
procedure SortAsFloat(ACol: Longint; Decs: Integer);
procedure SortAsInteger(ACol: Longint);
procedure SortAsString(ACol: Longint);
procedure SortAsTime(ACol: Longint);
procedure UnLockCell(ACol, ARow: Longint);
procedure UnLockCol(ACol: Longint);
procedure UnLockRow(ARow: Longint);
procedure AssignHints(Col: Integer);
procedure DoGetDrawValues(col, row: integer; var aFont: tFont; var aAlignment: TAlignment;
var bgColor: TColor);
procedure DrawHeader;
procedure Loaded;
procedure SetAlignment(avalue:TAlignment);
procedure SetHeader(Value: TStringList);
procedure SetHints(Value: TStringList);
procedure SkipDownCell(ACol, ARow: Longint);
procedure SkipLeftCell(ACol, ARow: Longint);
procedure SkipRightCell(ACol, ARow: Longint);
procedure SkipUpCell(ACol, ARow: Longint);
procedure Sort(ACol, ACol2: Longint; Mode: TGridSortMode; Decs: Integer);
procedure ValsToCells(Row: Longint; const Vals: array of string);| Properties |
property Alignment : TAlignment
property Header : TStringList
property Hints : TStringList
property SkipToNextRow : Boolean| Events |
event OnGetDrawValues : TGetDrawValues| Variables |
FAlignment : TAlignment;
FGetDrawValues : TGetDrawValues;
FHeader : TStringList;
FHiddenCols : TStringList;
FHints : TStringList;
FLastKey : Word;
FLockedCells : TStringList;
FLockedCols : TStringList;
FLockedRows : TStringList;
FOldCol : Longint;
FOldRow : Longint;
FSkipToNextRow : Boolean;| Constructors |
constructor Create(AOwner: TComponent);========================================================================================} {---------------------------------------TKeoEGrid----------------------------------Create
| Functions |
procedure AddLine(const Vals: array of string);---------------------------------------TKeoEGrid---------------------------------AddLine
procedure Clear;---------------------------------------TKeoEGrid-----------------------------------Clear
procedure DelLines(Row, Count: Longint);---------------------------------------TKeoEGrid--------------------------------DelLines
destructor Destroy;---------------------------------------TKeoEGrid---------------------------------Destroy
procedure DrawCell(Col, Row: Longint; Rect: TRect; State: TGridDrawState);---------------------------------------TKeoEGrid--------------------------------DrawCell
procedure HideCol(ACol: Longint);---------------------------------------TKeoEGrid---------------------------------HideCol
procedure InsertEmptyLines(Behind, Count: Longint);---------------------------------------TKeoEGrid------------------------InsertEmptyLines
procedure InsertLine(Behind: Longint; const Vals: array of string);---------------------------------------TKeoEGrid------------------------------InsertLine
function IsCellLocked(ACol, ARow: Longint): Boolean;---------------------------------------TKeoEGrid----------------------------IsCellLocked
function IsColHidden(ACol: Longint): Boolean;---------------------------------------TKeoEGrid-----------------------------IsColHidden
function IsColLocked(ACol: Longint): Boolean;---------------------------------------TKeoEGrid-----------------------------IsColLocked
function IsRowLocked(ARow: Longint): Boolean;---------------------------------------TKeoEGrid-----------------------------IsRowLocked
procedure KeyDown(var Key: Word; Shift: TShiftState);---------------------------------------TKeoEGrid---------------------------------KeyDown
function LineEmpty(Row: Integer): Boolean;---------------------------------------TKeoEGrid-------------------------------LineEmpty
procedure LoadFromFile(FileName: string);---------------------------------------TKeoEGrid----------------------------LoadFromFile
procedure LockCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid--------------------------------LockCell
procedure LockCol(ACol: Longint);---------------------------------------TKeoEGrid---------------------------------LockCol
procedure LockRow(ARow: Longint);---------------------------------------TKeoEGrid---------------------------------LockRow
procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);---------------------------------------TKeoEGrid-------------------------------MouseDown
procedure RePaintCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid-----------------------------RePaintCell
procedure RePaintCol(ACol: Longint);---------------------------------------TKeoEGrid------------------------------RePaintCol
procedure RePaintRow(ARow: Longint);---------------------------------------TKeoEGrid------------------------------RePaintRow
procedure ReplaceLine(Line: Longint; const Vals: array of string);---------------------------------------TKeoEGrid-----------------------------ReplaceLine
procedure SaveToFile(FileName: string);---------------------------------------TKeoEGrid------------------------------SaveToFile
function Select1Cell(ACol, ARow: Integer): Boolean;---------------------------------------TKeoEGrid-----------------------------Select1Cell
function SelectACell(ACol, ARow: Integer): Boolean;---------------------------------------TKeoEGrid-----------------------------SelectACell
function SelectCell(ACol, ARow: Longint): Boolean;---------------------------------------TKeoEGrid------------------------------SelectCell
procedure ShowCol(ACol: Longint);---------------------------------------TKeoEGrid---------------------------------ShowCol
procedure SortAsDate(ACol: Longint);---------------------------------------TKeoEGrid------------------------------SortAsDate
procedure SortAsDateTime(ACol, AColT: Longint);---------------------------------------TKeoEGrid--------------------------SortAsDateTime
procedure SortAsFloat(ACol: Longint; Decs: Integer);---------------------------------------TKeoEGrid-----------------------------SortAsFloat
procedure SortAsInteger(ACol: Longint);---------------------------------------TKeoEGrid---------------------------SortAsInteger
procedure SortAsString(ACol: Longint);---------------------------------------TKeoEGrid----------------------------SortAsString
procedure SortAsTime(ACol: Longint);---------------------------------------TKeoEGrid------------------------------SortAsTime
procedure UnLockCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid------------------------------UnLockCell
procedure UnLockCol(ACol: Longint);---------------------------------------TKeoEGrid-------------------------------UnLockCol
procedure UnLockRow(ARow: Longint);---------------------------------------TKeoEGrid-------------------------------UnLockRow
procedure AssignHints(Col: Integer);---------------------------------------TKeoEGrid-----------------------------AssignHints
procedure DoGetDrawValues(col, row: integer; var aFont: tFont; var aAlignment: TAlignment;
var bgColor: TColor);---------------------------------------TKeoEGrid-------------------------doGetDrawValues
procedure DrawHeader;---------------------------------------TKeoEGrid------------------------------DrawHeader
procedure Loaded;---------------------------------------TKeoEGrid----------------------------------Loaded
procedure SetAlignment(avalue:TAlignment);---------------------------------------TKeoEGrid----------------------------SetAlignment
procedure SetHeader(Value: TStringList);---------------------------------------TKeoEGrid-------------------------------SetHeader
procedure SetHints(Value: TStringList);---------------------------------------TKeoEGrid--------------------------------SetHints
procedure SkipDownCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid----------------------------SkipDownCell
procedure SkipLeftCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid----------------------------SkipLeftCell
procedure SkipRightCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid---------------------------SkipRightCell
procedure SkipUpCell(ACol, ARow: Longint);---------------------------------------TKeoEGrid------------------------------SkipUpCell
procedure Sort(ACol, ACol2: Longint; Mode: TGridSortMode; Decs: Integer);---------------------------------------TKeoEGrid------------------------------------Sort
procedure ValsToCells(Row: Longint; const Vals: array of string);---------------------------------------TKeoEGrid-----------------------------ValsToCells
| Properties |
property Alignment : TAlignment
property Header : TStringList
property Hints : TStringList
property SkipToNextRow : Boolean| Events |
event OnGetDrawValues : TGetDrawValues| Variables |
FAlignment : TAlignment;
FGetDrawValues : TGetDrawValues;
FHeader : TStringList;
FHiddenCols : TStringList;
FHints : TStringList;
FLastKey : Word;
FLockedCells : TStringList;
FLockedCols : TStringList;
FLockedRows : TStringList;
FOldCol : Longint;
FOldRow : Longint;
FSkipToNextRow : Boolean;