[BLACKFIRE69]

Originally Posted by audiofeel

#BLACKFIRE69
You have added a check for "OnClick" in "FToggleCheckBox". I guess it doesn't work properly. I want to create a "FToggleCheckBox" as a "FRadioButton" (so that each time I don't pick up a style file, but just paint "FToggleCheckBox"). I can not. In my opinion, the check for "OnClick" does not work.

sorry, my mistake.

furthermore, comment out the following lines.

procedure CommonOnClick(Sender: TObject);
begin
  case Sender of
    TObject(Chck[1].GetObject):
    if Chck[1].IsChecked then
    begin
      //Chck[1].SetChecked(False);
      Chck[2].SetChecked(True);
    end else
    begin
      //Chck[1].SetChecked(True);
      Chck[2].SetChecked(False);
    end;

    TObject(Chck[2].GetObject):
    if Chck[2].IsChecked then
    begin
      //Chck[2].SetChecked(False);
      Chck[1].SetChecked(True);
    end else
    begin
      //Chck[2].SetChecked(True);
      Chck[1].SetChecked(False);
    end;
  end;
end;

.