TTICustomGrid

type TTICustomGrid = class(TCustomGrid)

protected

  procedure RebuildGridLayout; virtual;

  procedure AddHeaderPropertyEditor();

  procedure BeforeMoveSelection(); override;

  procedure CalcCellExtent(); override;

  procedure DoEditorHide; override;

  procedure DoEditorShow; override;

  procedure DrawCell(); override;

  procedure EditorPosChanged();

  procedure EditorWidthChanged(); override;

  procedure HeaderClick(); override;

  procedure HeaderSized(); override;

  procedure GetAutoFillColumnInfo(); override;

  procedure SelectEditor; override;

  procedure DoEditorControlKeyUp(); virtual;

  procedure WriteCellText();

  procedure UnlinkPropertyEditor();

  procedure SetFixedCols(); override;

  procedure SetFixedRows(); override;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure Loaded; override;

  procedure ReloadTIList;

  procedure ClearProperties;

  procedure DefaultDrawCell(); virtual;

  procedure DrawObjectName();

  procedure GetCellEditor();

  procedure FreeCellEditor();

  function GridStateToPropEditState();

  function GetTIObject();

  procedure MapCell();

  function GetCurrentGridProperty;

  function IndexOfGridProperty();

  function FindGridProperty();

  procedure MoveProperty();

  property AliasPropertyNames: TAliasStrings; [rw]

  property DefaultRowHeight;

  property Filter: TTypeKinds; [rw]

  property HideProperties: TStrings; [rw]

  property ListDirection: TTIListDirection; [rw]

  property ListObject: TObject; [rw]

  property OnCreateCellEditor: TTIGridCreateCellEditor; [rw]

  property OnGetObject: TTIGridGetObject; [rw]

  property OnGetObjectCount: TTIGridGetObjectCount; [rw]

  property OnGetObjectName: TTIGridGetObjectName; [rw]

  property OnHeaderClick: THdrEvent; [rw]

  property OnHeaderSized: THdrEvent; [rw]

  property OnInitCellEditor: TTIGridInitCellEditor; [rw]

  property OnPropertiesCreated: TNotifyEvent; [rw]

  property Properties []: TTIGridProperty; [r]

  property PropertyCount: Integer; [r]

  property PropertyOrder: TStrings; [rw]

  property ShowOnlyProperties: TStrings; [rw]

  property TIObjectCount: Integer; [r]

  property TIOptions: TTIGridOptions; [rw]

end;

TTICustomGrid

TObject