var Times: array [1 .. 18] of string; begin Times [1] := Time1.text; Times [2] := Time2.text; Times [3] := Time3.text; Times [4] := Time4.text; Times [5] := Time5.text; Times [6] := Time6.text; Times [7] := Time7.text; Times [8] := Time8.text; Times [9] := Time9.text; Times [10] := Time10.text; Times [11] := Time11.text; Times [12] := Time12.text; Times [13] := Time13.text; Times [14] := Time14.text; Times [15] := Time15.text; Times [16] := Time16.text; Times [17] := Time17.text; Times [18] := Time18.text; randomize; Jogo1.Text := Times[random(5)]; Jogo2.Text := Times[random(5)]; Jogo3.Text := Times[random(5)]; Jogo4.Text := Times[random(5)]; Jogo5.Text := Times[random(5)]; Jogo6.Text := Times[random(5)]; Jogo7.Text := Times[random(5)]; Jogo8.Text := Times[random(5)]; Jogo9.Text := Times[random(5)]; Jogo10.Text := Times[random(5)]; Jogo11.Text := Times[random(5)]; Jogo12.Text := Times[random(5)]; Jogo13.Text := Times[random(5)]; Jogo14.Text := Times[random(5)]; Jogo15.Text := Times[random(5)]; Jogo16.Text := Times[random(5)]; Jogo17.Text := Times[random(5)]; Jogo18.Text := Times[random(5)]; Jogo19.Text := Times[random(5)]; Jogo20.Text := Times[random(5)]; Jogo21.Text := Times[random(5)]; Jogo22.Text := Times[random(5)]; Jogo23.Text := Times[random(5)]; Jogo24.Text := Times[random(5)]; Jogo25.Text := Times[random(5)]; Jogo26.Text := Times[random(5)]; Jogo27.Text := Times[random(5)]; Jogo28.Text := Times[random(5)]; end;