Random

[Namenloser]

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.