TCheckBox

TCheckBox:TWinControl

 Sheet.MergeCells(9,3,12,3);                                        

 Sheet['I3'].CellComponent:=TCheckBox.Create(Sheet);

 Sheet['I3'].CellComponent.Parent:=Sheet;

 With TCheckBox(Sheet['I3'].CellComponent) do

 begin

   Caption:='Plán: rok do+1';

   Checked:=True;                                

 end;