Здравия всем!
Подскажите, можно ли (и как) управлять большим количеством полей типа Label одновременно. Хочу по таймеру имитировать показания датчиков (делаю Random) одновременно в нескольких десятках полей Label.
Вот мой бред
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var
T: integer;
z: integer;
i: integer;
begin
z := Random(80);
if z>33 then
begin
for i:=2 to 6 do
Labelinttostr(i).Caption:= IntToStr(z);
//Label4.Caption:= IntToStr(z) ;
//Label5.Caption:= IntToStr(z) ;
end
else
begin
Labeli.Caption:= '27' ;
Спасибо небезразличным.