A set of mutually exclusive check boxes
Hi.
I've got a FAST report with a series of YES/NO checkboxes, and I'm trying to write a method that will uncheck the second the corresponding checkbox if the other one is clicked.
I know that something like
can be used to check or uncheck a single checkbox.
But the method I've written doesn't work. I've written 8 methods. One for each checkbox.
Any idea what I'm doing wrong here?
I've got a FAST report with a series of YES/NO checkboxes, and I'm trying to write a method that will uncheck the second the corresponding checkbox if the other one is clicked.
I know that something like
procedure ChkboxScannedVerifiedOnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
begin
    TfrxCheckboxView(Sender).Checked := not TfrxCheckboxView(Sender).Checked;                                                                                                   Â
  Modified := True; Â
end;
can be used to check or uncheck a single checkbox.
But the method I've written doesn't work. I've written 8 methods. One for each checkbox.
procedure ChkboxScannedVerifiedOnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
begin
    CheckBox24.Checked := not CheckBox24.Checked;
    if CheckBox25.Checked then
      CheckBox25.Checked := False;
    end;                     Â
  Modified := True; Â
end;
Any idea what I'm doing wrong here?
Comments
I can change properties of other objects for an event like OnAfterData, but I'm unable to make any changes for anything except Sender for OnPreviewClick.