[lmikle]

Естесвенно, это можно сделать только во время выполнения программы.
Я бы советовал убрать формы из автокриэйта и создавать их руками в OnCreate главной формы:

Код:

type
  TMainForm = class(TForm)
  ...
  private
    AForms : TObjectList;
  end;

procedure TMainForm.Create(...);
begin
  // создаем и заполняем список
  AForms := TObjectList.Create;
  AForms.Add(TForm1.Create(Application));
  AForms.Add(TForm2.Create(Application));
  ...
  AForms.Add(TForm20.Create(Application));

  // Показываем случайную форму
  (AForms[Random(AForms.Count)] As TForm).Show;
end;