Курсовая работа: Моделирование системы массового обслуживания

n3. Enabled: =false;

n2. Enabled: =true;

timer1. Enabled: =false;

button2. Enabled: =false;

button1. Enabled: =true;

trackbar1. Enabled: =true;

trackbar2. Enabled: =true;

trackbar3. Enabled: =true;

trackbar5. Enabled: =true;

trackbar6. Enabled: =true;

edit1. Enabled: =true;

edit7. Enabled: =true;

edit8. Enabled: =true;

edit9. Enabled: =true;

edit10. Enabled: =true;

edit11. Enabled: =true;

edit12. Enabled: =true;

end;

procedure TForm1. TrackBar1Change (Sender: TObject);

begin

edit4. Text: =inttostr (TrackBar1. position);

end;

procedure TForm1. TrackBar2Change (Sender: TObject);

begin

edit5. Text: =inttostr (TrackBar2. position);

end;

procedure TForm1. TrackBar3Change (Sender: TObject);

begin

edit6. Text: =inttostr (TrackBar3. position);