TsCellEdit

type TsCellEdit = class(TMemo,IsSpreadsheetControl)

protected

  FEditText: string;

  function CanEditCell();

  procedure DoEnter; override;

  procedure DoExit; override;

  function DoValidText(); virtual;

  function ValidFormula();

  procedure KeyDown(); override;

  procedure KeyUp(); override;

  procedure Notification(); override;

  procedure ShowCell(); virtual;

  procedure WriteToCell;

public

  constructor Create(); override;

  destructor Destroy; override;

  procedure EditingDone; override;

  procedure ListenerNotification();

  procedure RemoveWorkbookSource;

  property SelectedCell: PCell; [r]

  property Workbook: TsWorkbook; [r]

  property Worksheet: TsWorksheet; [r]

published

  property ShowHTMLText: Boolean; [rw]

  property WorkbookSource: TsWorkbookSource; [rw]

  property WantReturns;

end;

TsCellEdit

TObject,IsSpreadsheetControl