checkbox abfrage, stopp der eigentlichen prozedur

[Patlinet]

Hallo hiroprotagonist

Versuchs mal mit

Delphi-Quellcode:

if
checkbox1.checked=false  then if
checkbox2.checked=false  then if
checkbox3.checked=false  then if
checkbox4.checked=false  then if
checkbox5.checked=false  then begin
  showmessage('Sie haben keine Antwort ausgewählt');
  Exit;
end;

if checkbox1.checked=true then
points[1]:=1; 
...