Delphi-Quellcode:
var
i1:integer;
status:boolean;
begin
for i:=0 to 85 do begin
status:=TTimer(FindComponent('timer'+inttostr(i1)).enabled;
if status then showmessage('Timer'+inttostr(i1)+': aktiv')
else showmessage('Timer'+inttostr(i1)+': inaktiv');
end;
hm die status:= zeile mag er nicht
was kannd a net stimmen?