« on: July 02, 2022, 07:30:49 am »
EDIT: ehh, forget this, can't delete it.It allways sets false although some check boxes are checked.
?
for Cnt := 0 to PanelRegexModifiers.ControlCount -1 do
begin
if PanelRegexModifiers.Controls[Cnt].ClassType = TCheckBox then
begin
if (PanelRegexModifiers.Controls[Cnt].Caption = 'S') and
((PanelRegexModifiers.Controls[Cnt] as TCheckBox).Checked = true)
then
re.ModifierS := true
else
re.ModifierS := false;
//....
end;
« Last Edit: July 02, 2022, 07:34:04 am by BubikolRamios »
Logged
lazarus 3.2-fpc-3.2.2-win32/win64