Class TkjStringGrid (unit Kjsgrid)

Inherits from

TStringGrid

Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions

procedure ColumnMoved(FromIndex, ToIndex: Longint);


procedure DeleteRow(DIndex: LongInt);


destructor Destroy;


function GetColumnTitle(C: Integer): string;


procedure InsertRow(ToIndex: LongInt);


procedure KeyDown(var Key: Word; Shift: TShiftState);


procedure Load;

try

procedure Loaded;


procedure LoadFromFile(FileName: string);

if

procedure RowMoved(FromIndex, ToIndex: Longint);

with SList

procedure Save;


procedure SaveToFile(FileName: string);


procedure SetColumnTitle(C: Integer; Title: string);

case

procedure WriteHTML(SList: TStrings);


procedure SetFileName(F: string);

when the component is loaded, it will try to read its contents from this file.

Properties

property AutoBackup : Boolean

Published declarations

property AutoSave : Boolean


property Caption1 : string


property Caption2 : string


property Caption2Placement : TCaption2Placement


property CellDelimiter : char


property FileName : string


Events

Variables

FAutoBackup : Boolean;


FAutoSave : Boolean;


FCaption1 : string;

If TRUE, saves grid info before destroying self

FCaption2 : string;

Top title used for top of HTML tables

FCellDelimiter : char;

Private declarations

FInitialFile : string;


FPlacement : TCaption2Placement;

Second HTML table title; its position can be either underneath Caption1 at the top of the HTML table, or underneath the entire HTML table as a footer.


Constructors


constructor Create(AOwner: TComponent);

Public declarations


Functions


procedure ColumnMoved(FromIndex, ToIndex: Longint);


procedure DeleteRow(DIndex: LongInt);


destructor Destroy;


function GetColumnTitle(C: Integer): string;


procedure InsertRow(ToIndex: LongInt);


procedure KeyDown(var Key: Word; Shift: TShiftState);


procedure Load;

try


procedure Loaded;


procedure LoadFromFile(FileName: string);

if


procedure RowMoved(FromIndex, ToIndex: Longint);

with SList


procedure Save;


procedure SaveToFile(FileName: string);


procedure SetColumnTitle(C: Integer; Title: string);

case


procedure WriteHTML(SList: TStrings);


procedure SetFileName(F: string);

when the component is loaded, it will try to read its contents from this file. If the file is empty, the grid will come up empty.


Properties


property AutoBackup : Boolean

Published declarations


property AutoSave : Boolean


property Caption1 : string


property Caption2 : string


property Caption2Placement : TCaption2Placement


property CellDelimiter : char


property FileName : string


Events


Variables


FAutoBackup : Boolean;


FAutoSave : Boolean;


FCaption1 : string;

If TRUE, saves grid info before destroying self


FCaption2 : string;

Top title used for top of HTML tables


FCellDelimiter : char;

Private declarations


FInitialFile : string;


FPlacement : TCaption2Placement;

Second HTML table title; its position can be either underneath Caption1 at the top of the HTML table, or underneath the entire HTML table as a footer. This placement is what the Caption2Placement property is for.