[inf-45]

Имеется форма. На форме - TabControl, содержащий несколько закладок, в каждой из которых - 20-30 чекбоксов.
Задача: каждый чекбокс имеет определенный "вес", определяемый в баллах. После отметки нужных чекбоксов по нажатию кнопки должен высчитываться суммарный балл и передаваться на другую форму. При повторном открытии формы с чекбоксами балл должен быть равен нулю.
Пока у меня реализовано это вот так:

PHP код:

procedure TForm1.CheckBox2Click(Sender: TObject);
begin
if TCheckBox(Sender).Checked then  sum3:=sum3+TCheckBox(Sender).Tag/100 else
sum3:=sum3-TCheckBox(Sender).Tag/100;
end; 


Поскольку значения есть дробные, то используется округление. Значение каждого чекбокса лежит в tag.
Но, видимо, это не лучший вариант, поскольку, порой, эта система глючит и у меня оказывается отрицательный результат. Посоветуйте, как лучше это реализовать?

[Aristarh Dark]

Эпиграф:
"Стою на асфальте я в лыжи обутый,
Толи лыжи не едут, толи я неправильно обут...."
Если "вес" чекбокса задан свойствойм Tag то подсчитать общий вес не очень сложно - сложим значения Tag отмеченных чекбоксов. Если на момент "некоего начала" надо обнулять все - так обнуляйте Checked у чекбоксов... ну или лыжЫ... не едут %)