TOvcfrmColEditor

type TOvcfrmColEditor = class(TForm)

  ctlColNumber: TOvcSimpleField;

  ctlDefaultCell: TComboBox;

  ctlHidden: TCheckBox;

  ctlWidth: TOvcSimpleField;

  Panel1: TPanel;

  SpeedButton1: TSpeedButton;

  SpeedButton2: TSpeedButton;

  SpeedButton3: TSpeedButton;

  SpeedButton4: TSpeedButton;

  SpeedButton5: TSpeedButton;

  SpeedButton6: TSpeedButton;

  Label1: TLabel;

  Label2: TLabel;

  Label3: TLabel;

  Label4: TLabel;

  GroupBox1: TGroupBox;

  DoneButton: TBitBtn;

  ApplyButton: TBitBtn;

  DefaultController: TOvcController;

  OvcSpinner1: TOvcSpinner;

  OvcSpinner2: TOvcSpinner;

  procedure ctlColNumberExit();

  procedure ApplyButtonClick();

  procedure SpeedButton1Click();

  procedure SpeedButton2Click();

  procedure SpeedButton3Click();

  procedure SpeedButton4Click();

  procedure SpeedButton5Click();

  procedure SpeedButton6Click();

  procedure FormShow();

  procedure DoneButtonClick();

  procedure ctlColNumberChange();

protected

  procedure GetCells;

  procedure RefreshColData;

  procedure SetColNum();

  procedure AddCellComponentName();

public

  Editor: TObject;

  procedure SetCols();

  property Cols: TOvcTableColumns; [rw]

  property ColNum: TColNum; [rw]

end;

TOvcfrmColEditor

TObject