| Class Timpgrid (unit dmimpgrd) |
TStringGrid
Renamed from ImpGrid.pas 6/7/1998 Paul Rice to avoid conflict with Harm van Zoest's work.
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure AddCol;
procedure FixedFontChanged(Sender: Tobject);
procedure LoadFromFile(filename: string);
procedure SaveToFile(filename: string);
procedure SetColColor(col: longint; color: string);
destructor Destroy;
procedure DrawCell(ACol, ARow: longint; ARect: TRect;
AState: TGridDrawState);
procedure setColFontColor(value: string);
procedure setDarkColor(value: tcolor);
procedure setFixedFont(value: tfont);
procedure setFixedJustify(value: integer);
procedure setGridLineColor(value: tcolor);
procedure setJustify(value: integer);
procedure setLightColor(value: tcolor);
procedure setoffset(value: integer);
procedure setvertLab(value: boolean);| Properties |
property Align :
property ColCount :
property ColFontColor : string
property DarkColor : tcolor
property DefaultColWidth :
property DefaultRowHeight :
property EditorMode :
property FixedFont : tfont
property FixedJustify : integer
property GridLineColor : tcolor
property Gridlinewidth :
property Justify : integer
property LightColor : tcolor
property offset : integer
property Options :
property RowCount :
property ScrollBars :
property VertLab : boolean| Events |
event OnClick :
event OnColumnMoved :
event OnDblClick :
event OnDragDrop :
event OnDrawCell :
event OnEnter :
event OnExit :
event OnMouseDown :
event OnRowMoved :
event OnTopLeftChanged : | Variables |
FColFontColor : string;
FDarkColor : tcolor;
FFixedFont : tfont;
FFixedJustify : integer;
FGridLineColor : tcolor;
FJustify : integer;
FlightColor : tcolor;
Foffset : integer;
FVertLab : boolean;| Constructors |
constructor Create(AOwner: TComponent);Protected declarations
| Functions |
procedure AddCol;last two lines ignored
procedure FixedFontChanged(Sender: Tobject);
procedure LoadFromFile(filename: string);write in all the grades...
procedure SaveToFile(filename: string);cells[col,fixedrows] := color;
procedure SetColColor(col: longint; color: string);right justify...
destructor Destroy;temporary
procedure DrawCell(ACol, ARow: longint; ARect: TRect;
AState: TGridDrawState);Private declarations
procedure setColFontColor(value: string);
procedure setDarkColor(value: tcolor);
procedure setFixedFont(value: tfont);
procedure setFixedJustify(value: integer);
procedure setGridLineColor(value: tcolor);
procedure setJustify(value: integer);
procedure setLightColor(value: tcolor);
procedure setoffset(value: integer);
procedure setvertLab(value: boolean);set new properties...
| Properties |
property Align :
property ColCount :
property ColFontColor : stringdefault 1;
property DarkColor : tcolordefault $02ffffff;
property DefaultColWidth :
property DefaultRowHeight :
property EditorMode :
property FixedFont : tfontdefault 0;
property FixedJustify : integerdefault $0220ff20;
property GridLineColor : tcolordefault $0280ff80;
property Gridlinewidth :
property Justify : integerdefault 0;
property LightColor : tcolor
property offset : integerdefault 'clblack';
property Options :
property RowCount :
property ScrollBars :
property VertLab : booleandefault parentfont;
| Events |
event OnClick :
event OnColumnMoved :
event OnDblClick :
event OnDragDrop :
event OnDrawCell :
event OnEnter :
event OnExit :
event OnMouseDown :
event OnRowMoved :
event OnTopLeftChanged : | Variables |
FColFontColor : string;
FDarkColor : tcolor;
FFixedFont : tfont;
FFixedJustify : integer;
FGridLineColor : tcolor;
FJustify : integer;
FlightColor : tcolor;
Foffset : integer;
FVertLab : boolean;