TOvcBaseTableCell

type TOvcBaseTableCell = class(TOvcTableCellAncestor)

protected

  FColor: TColor;

  FFont: TFont;

  FHint: string;

  FMargin: Integer;

  FReferences: LongInt;

  FTable: TOvcTableAncestor;

  FTextHiColor: TColor;

  FAcceptActivationClick: Boolean;

  FAccess: TOvcTblAccess;

  FAdjust: TOvcTblAdjust;

  FShowHint: Boolean;

  FTableColor: Boolean;

  FTableFont: Boolean;

  FTextStyle: TOvcTextStyle;

  Filler: Byte;

  FOnClick: TNotifyEvent;

  FOnDblClick: TNotifyEvent;

  FOnDragDrop: TDragDropEvent;

  FOnDragOver: TDragOverEvent;

  FOnEndDrag: TEndDragEvent;

  FOnEnter: TNotifyEvent;

  FOnExit: TNotifyEvent;

  FOnKeyDown: TKeyEvent;

  FOnKeyPress: TKeyPressEvent;

  FOnKeyUp: TKeyEvent;

  FOnMouseDown: TMouseEvent;

  FOnMouseMove: TMouseMoveEvent;

  FOnMouseUp: TMouseEvent;

  FOnOwnerDraw: TCellPaintNotifyEvent;

  tcBadColorValue: Boolean;

  tcBadFontValue: Boolean;

  tcNoConfigChange: Boolean;

  function GetColor;

  function GetCellEditor; virtual;

  function GetFont;

  procedure SetAccess();

  procedure SetAdjust();

  procedure SetColor();

  procedure SetFont();

  procedure SetHint();

  procedure SetMargin();

  procedure SetTable();

  procedure SetTableColor();

  procedure SetTableFont();

  procedure SetTextHiColor();

  procedure SetTextStyle();

  function IsColorStored;

  function IsFontStored;

  procedure tcChangeScale(); override;

  procedure tcFontHasChanged();

  procedure tcPaint(); virtual;

  procedure tcRetrieveTableColor;

  function tcRetrieveTableActiveCol;

  function tcRetrieveTableActiveRow;

  procedure tcRetrieveTableFont;

  function tcRetrieveTableLockedCols;

  function tcRetrieveTableLockedRows;

  property Color: TColor; [rws]

  property TextHiColor: TColor; [rw]

  property Font: TFont; [rws]

  property Hint: string; [rw]

  property Margin: Integer; [rw]

  property ShowHint: Boolean; [rw]

  property TableColor: Boolean; [rw]

  property TableFont: Boolean; [rw]

  property TextStyle: TOvcTextStyle; [rw]

  property OnClick: TNotifyEvent; [rw]

  property OnDblClick: TNotifyEvent; [rw]

  property OnDragDrop: TDragDropEvent; [rw]

  property OnDragOver: TDragOverEvent; [rw]

  property OnEndDrag: TEndDragEvent; [rw]

  property OnEnter: TNotifyEvent; [rw]

  property OnExit: TNotifyEvent; [rw]

  property OnKeyDown: TKeyEvent; [rw]

  property OnKeyPress: TKeyPressEvent; [rw]

  property OnKeyUp: TKeyEvent; [rw]

  property OnMouseDown: TMouseEvent; [rw]

  property OnMouseMove: TMouseMoveEvent; [rw]

  property OnMouseUp: TMouseEvent; [rw]

  property OnOwnerDraw: TCellPaintNotifyEvent; [rw]

public

  procedure Notification(); override;

  procedure tcResetTableValues; override;

  function SpecialCellSupported(); virtual;

  function SpecialCellDataSize; virtual;

  procedure SpecialCellDataTransfer(); virtual;

  constructor Create(); override;

  destructor Destroy; override;

  procedure IncRefs;

  procedure DecRefs;

  function EditHandle; virtual;

  procedure EditHide; virtual;

  procedure EditMove(); virtual;

  function CanSaveEditedData(); virtual;

  function CanStopEditing();

  function FilterTableKey(); virtual;

  procedure PostMessageToTable();

  procedure SendKeyToTable();

  procedure SaveEditedData(); virtual;

  procedure StartEditing(); virtual;

  procedure StopEditing(); virtual;

  function TableWantsEnter;

  function TableWantsTab;

  function DoOwnerDraw(); virtual;

  procedure Paint();

  procedure ResolveAttributes(); virtual;

  property AcceptActivationClick: Boolean; [rw]

  property Access: TOvcTblAccess; [rw]

  property Adjust: TOvcTblAdjust; [rw]

  property CellEditor: TControl; [r]

  property References: LongInt; [r]

  property Table: TOvcTableAncestor; [rw]

end;

TOvcBaseTableCell

TOvcTableCellAncestor

TObject