I have this feature working, but the accordion is now "sticky". When the screen renders and the user clicks on an accordion button, nothing happens. The user must click on an unwanted button to make that one expand. Then the user must click on the wanted button to make it expand.
Note that the accordion works properly until I change some buttons.
What Delphi steps must I take to make the accordion responsive after an update? I have zero Java experience, so I hope there is a Delphi/CGDevTools solution
Here is my accordion code:
- Code: Select all
PROCEDURE TMainFrm.UpdateSecurity(ValidLogin : Boolean);
BEGIN
at_ApplyForMembership.Visible := NOT UserSession.IsMember; // existing members don't need to reapply
IF ValidLogin THEN BEGIN
{TODO -oKevin -cToDo : enable secure accordion tabs}
pnllstEvents.Enabled := TRUE;
plApplication.Enabled := FALSE;
at_ContactInfo.Enabled := TRUE;
pnllstSecurity.Items[0].Visible := FALSE; // login
pnllstSecurity.Items[1].Visible := TRUE; // log out
pnllstSecurity.Items[2].Visible := FALSE; // pw recover
pnllstSecurity.Items[3].Visible := FALSE; // request guest account/password
END
ELSE BEGIN
{TODO -oKevin -cToDo : disable secure accordion tabs}
pnllstEvents.Enabled := FALSE;
plApplication.Enabled := TRUE;
at_ContactInfo.Enabled := FALSE;
pnllstSecurity.Items[0].Visible := TRUE; // login
pnllstSecurity.Items[1].Visible := FALSE; // log out
pnllstSecurity.Items[2].Visible := TRUE; // pw recover
pnllstSecurity.Items[3].Visible := TRUE; // request guest account/password
END;
END;
Below is the form when a user (me) has logged in correctly - not that the membership application button is not visible: