В колледже МГКИП...
а если вот так условия поставить...это для фильма и времени
if not ( Seans[ComboBox1.ItemIndex][r][m].State ) and
( time_Seans[ComboBox2.ItemIndex][r][m].State_time ) then
begin
Seans[ComboBox1.ItemIndex][r][m].State := true;
time_Seans[ComboBox2.ItemIndex][r][m].State_time := true;
( Sender as TPanel ).Color := clRed;
end
else
begin
Seans[ComboBox1.ItemIndex][r][m].State := false;
time_Seans[ComboBox2.ItemIndex][r][m].State_time := false;
( Sender as TPanel ).Color := clBtnFace;
end;
я имею ввиду обьеденить все три условия...в одно с помощью AND . чтобы учитывались все три...
|