[devochka]

ребята нужна ваша помощь!!!есть четыре формы!!первая- это главная на ней кнопка, нужно что бы при нажатии на эту кнопку случайным образом открывалась одна из трех (оставшихся) форм!!

[Electronic_Arts]

Вот так попробуй - должно помочь

Код:

var
x:integer;
f: TForm;
begin
randomize;
x:=2+random(2);
f:= Screen.Forms[x];
f.Show;
end;

[v1s2222]

Есть момент, 3 оставшиеся формы надо создавать в ран тайме, или они уже есть.
Если они уже есть, то:

Код:

var
n: integer;
begin
randomize;
n:=random(3)+1;
Case n of
1: Form2.ShowModal; // или просто Show;
2: Form3.ShowModal;
3: Form4.ShowModal;
end;

[devochka]

спасибо большое!!!!!очень помогло