Der Quellcode da liefert aber auch nicht das wahre: Delphi meint, dass
comp := FindComponent('CheckBox' + IntToStr(c3));
gefälligst mit einer Klammer statt ':=' (Zuweisungsoperator) geschrieben werden soll.
Assigned(comp)
liefert auch einen Fehler (nein, nein, es liegt nicht am fehlenden Semikolon).
Bei 'as' gibts auch ein Fehler.
Also ich habs insgesamt so angewendet (Vorher natürlich auch lokal die Variablen deklariert):
Delphi-Quellcode:
while c3 < 29 do begin
comp := FindComponent('CheckBox' + IntToStr(c3));
if Assigned(comp) then begin
cb := comp as TCheckbox;
if cb.CHecked = true then a.Add(cb.Caption + ' hat abgegeben!') else
na.Add(cb.Caption + ' hat nicht abgegeben!');
end;
end;