TMVDataDrawGrid

type TMVDataDrawGrid = class(TCustomDrawGrid)

protected

  FUpdateCount: Integer;

  function DataSourceOk;

  function GetCells(); override;

  procedure SizeChanged(); override;

  procedure MeasureCellWidth();

  procedure CalculateAllMinMaxIfNeeded;

  procedure DrawCell(); override;

  procedure CalcAutoSizeColumn(); override;

  procedure AutoAdjustColumn(); override;

  procedure SetDataSourceRow();

  procedure VisualChange; override;

  procedure Paint; override;

public

  procedure LockDatasource;

  procedure UnlockDataSource;

  constructor Create(); override;

  procedure RefreshFromDataSource;

  procedure ShowField();

  procedure CallBeginUpdate;

  procedure CallEndUpdate;

  procedure GetSelections();

  procedure ClearSelection;

published

  property OnMeasureCellWidth: TMeasureCellWidthEvent; [rw]

  property DataSource: TMemDataSet; [rw]

  property OnLockUnlock: TLockUnlockDataSourceEvent; [rw]

  property Align;

  property AlternateColor: TColor;

  property Anchors;

  property AutoAdvance: TAutoAdvance;

  property AutoEdit: Boolean;

  property AutoFillColumns: Boolean;

  property BorderSpacing;

  property BorderStyle: TBorderStyle;

  property Color;

  property ColCount: Integer;

  property ColumnClickSorts: Boolean;

  property Columns: TGridColumns;

  property Constraints;

  property DefaultColWidth: Integer;

  property DefaultDrawing: Boolean;

  property DefaultRowHeight: Integer;

  property DragCursor;

  property DragKind;

  property DragMode;

  property Enabled;

  property ExtendedSelect: Boolean;

  property FixedColor: TColor;

  property FixedCols: Integer;

  property FixedRows: Integer;

  property Flat: Boolean;

  property Font;

  property GridLineWidth: Integer;

  property HeaderHotZones: TGridZoneSet;

  property HeaderPushZones: TGridZoneSet;

  property MouseWheelOption: TMouseWheelOption;

  property Options: TGridOptions;

  property ParentColor;

  property ParentFont;

  property ParentShowHint;

  property PopupMenu;

  property RangeSelectMode: TRangeSelectMode;

  property RowCount: Integer;

  property ScrollBars: TScrollStyle;

  property ShowHint;

  property TabAdvance: TAutoAdvance;

  property TabOrder;

  property TabStop;

  property TitleFont: TFont;

  property TitleImageList: TImageList;

  property TitleStyle: TTitleStyle;

  property UseXORFeatures: Boolean;

  property Visible;

  property VisibleColCount: Integer;

  property VisibleRowCount: Integer;

  property OnBeforeSelection: TOnSelectEvent;

  property OnCheckboxToggled: TToggledCheckboxEvent;

  property OnClick;

  property OnColRowDeleted: TGridOperationEvent;

  property OnColRowExchanged: TGridOperationEvent;

  property OnColRowInserted: TGridOperationEvent;

  property OnColRowMoved: TGridOperationEvent;

  property OnCompareCells: TOnCompareCells;

  property OnContextPopup;

  property OnDblClick;

  property OnDragDrop;

  property OnDragOver;

  property OnDrawCell: TOnDrawCell;

  property OnButtonClick: TOnSelectEvent;

  property OnEditingDone;

  property OnEndDock;

  property OnEndDrag;

  property OnEnter;

  property OnExit;

  property OnGetCheckboxState: TGetCheckboxStateEvent;

  property OnGetEditMask: TGetEditEvent;

  property OnGetEditText: TGetEditEvent;

  property OnHeaderClick: THdrEvent;

  property OnHeaderSized: THdrEvent;

  property OnHeaderSizing: THeaderSizingEvent;

  property OnKeyDown;

  property OnKeyPress;

  property OnKeyUp;

  property OnMouseDown;

  property OnMouseEnter;

  property OnMouseLeave;

  property OnMouseMove;

  property OnMouseUp;

  property OnMouseWheel;

  property OnMouseWheelDown;

  property OnMouseWheelUp;

  property OnPickListSelect: TNotifyEvent;

  property OnPrepareCanvas: TOnPrepareCanvasEvent;

  property OnSelectEditor: TSelectEditorEvent;

  property OnSelection: TOnSelectEvent;

  property OnSelectCell: TOnSelectCellEvent;

  property OnSetCheckboxState: TSetCheckboxStateEvent;

  property OnSetEditText: TSetEditEvent;

  property OnStartDock;

  property OnStartDrag;

  property OnTopleftChanged: TNotifyEvent;

  property OnUserCheckboxBitmap: TUserCheckBoxBitmapEvent;

  property OnUTF8KeyPress;

end;

TMVDataDrawGrid

TCustomDrawGrid

TCustomGrid

TObject