Würde ich zwar normal auch so machen, aber für einen Anfänger ist diese einfachere Variante vielleicht durchschaubarer:
Delphi-Quellcode:
RandomValue := random(10);
case RandomValue of
0: Form1.Show;
1: Form2.Show;
2: Form3.Show;
3: Form4.Show;
4: Form5.Show;
5: Form6.Show;
...
end;
Geht natürlich auch ohne die Variable, indem man random(10) direkt in die Case-Abfrage einsetzt.