TRadioButton

Top  Previous  Next

TRadioButton:TWinControl

 

 Sheet['A1'].CellComponent:=TRadioButton.Create(Sheet);

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

 With TRadioButton(Sheet['A1'].CellComponent) do

 begin

   Caption:='Loni';

   Checked:=True;                                

 end;

 

 Sheet['A2'].CellComponent:=TRadioButton.Create(Sheet);

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

 With TRadioButton(Sheet['A2'].CellComponent) do

 begin

   Caption:='Letos';                                

 end;