| Class TStringGridEx (unit strgrdex) |
TStringGrid
Written By Tom Lee , Taiwan , Republic of China Ver 1.02 Last modify Date OCT 22 1996 Freeware Component For Delphi 2.0x E-Mail : tom@libra.aaa.hinet.net Home Page : http://www.aaa.hinet.net/delphi
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
function GetSelectRow(RowValue:integer):Boolean;
function GetSelectRowCount:integer;
procedure SetSelectRow(RowValue:integer;Selected:Boolean);
procedure DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState);
procedure KeyUp(var Key: Word; Shift: TShiftState);
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure DeSelectAll;
procedure SetCTL3D(value:Boolean);
procedure SetMultiSelect(value:Boolean);
procedure SetSelectedColor(value:TColor);
procedure SetSelectedTextColor(value:TColor);| Properties |
property CTL3D : boolean
property MultiSelect : Boolean
property SelectedColor : TColor
property SelectedTextColor : TColor| Events |
| Variables |
FCTL3D : boolean;
FLastRow : integer;
FMouseDownRow : integer;
FMultiSelect : Boolean;
FOriginRowCount : integer;
FSelectedColor : TColor;
FSelectedTextColor : TColor;
FSelectRows : TStrings;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
destructor Destroy;
function GetSelectRow(RowValue:integer):Boolean;
function GetSelectRowCount:integer;
procedure SetSelectRow(RowValue:integer;Selected:Boolean);
procedure DrawCell(ACol, ARow: Longint; ARect: TRect; AState: TGridDrawState);Protected declarations
procedure KeyUp(var Key: Word; Shift: TShiftState);Single Select
procedure MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure MouseUp(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
procedure DeSelectAll;
procedure SetCTL3D(value:Boolean);
procedure SetMultiSelect(value:Boolean);
procedure SetSelectedColor(value:TColor);
procedure SetSelectedTextColor(value:TColor);| Properties |
property CTL3D : booleanPublished declarations
property MultiSelect : Boolean
property SelectedColor : TColor
property SelectedTextColor : TColor| Events |
| Variables |
FCTL3D : boolean;Private declarations
FLastRow : integer;
FMouseDownRow : integer;
FMultiSelect : Boolean;
FOriginRowCount : integer;
FSelectedColor : TColor;
FSelectedTextColor : TColor;
FSelectRows : TStrings;