Stack Overflow when Check Box is clicked 1

[CarrahaG]

Hi

Why am I getting a stack overflow situation when I click on a check box called "ChkBoxActive". The "On Click" procedure is below:

procedure TfrmCPInvoices.ChkBoxActiveClick(Sender: TObject);
begin
if (ChkBoxActive.Checked = True) then
ChkBoxActive.Checked := False
else
ChkBoxActive.Checked := True;
end;

I simply want it to check the box on click and uncheck it when it is clicked again.

Regards,
George

 

[DelphiAaron]

to check or uncheck a checkbox requires no code.

your geting yourself into a loop.
when you set the checkbox by code it triggers an onclick event so your code is causing the box to check & uncheck until the stack cant take it anymore.

if you want to check / uncheck a checkbox via code from a button click its

chkboxActive.checked := not chkboxActive.checked;


Aaron