Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.16;
Скачать: CL | DM;

Вниз

Random Form Show   Найти похожие ветки 

 
AmazdDexter   (2004-04-29 12:31) [0]

Привет! Подскажите, плиз, как сделать, чтобы в случайное время (допустим, от 10 до 60 секунд) выскакивала случайная форма:) А то я никак не могу врубицца!


 
Locker   (2004-04-29 13:06) [1]

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 RandomForm.Jump(Application); // :)
 Timer1.Interval := Random(50000) + 10000;
end;


 
AmazdDexter   (2004-04-29 17:04) [2]

Спасиб! А как сделать, чтобы выскакивали, допустим, только формы Shraf или Bolezn или Turma и т.п.???


 
Anatoly Podgoretsky ©   (2004-04-29 17:12) [3]

RandomForm.Jump(Application, Random(3));


 
AmazdDexter   (2004-04-29 17:16) [4]

RandomForm.Jump(Application, Random(3));

Anatoly, что значит "3";?


 
MU   (2004-04-29 17:20) [5]

3 - это высота прыжка


 
Gero ©   (2004-04-29 17:20) [6]


> что значит "3";?

3 - это число.
Если Вы про Random(3) то это случайное число в диапазоне 0..2.


 
AmazdDexter   (2004-04-29 17:29) [7]

RandomForm.Jump(Application); // :)
Здесь ведь программа будет сама "прыгать" на ЛЮБУЮ форму. А мне ведь не надо, например, на сплэш-скрин, мне надо только на заданные три формы.


 
AmazdDexter   (2004-04-29 17:33) [8]

Кстати, что такое RandomForm ???


 
Sandman25+1   (2004-04-29 17:40) [9]

>Кстати, что такое RandomForm ???

1. Имя unit
2. Имя class
3. Имя переменной.

Выбирайте, можно сделать по-любому.



Страницы: 1 вся ветка

Текущий архив: 2004.05.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.03 c
3-1082474947
Koba
2004-04-20 19:29
2004.05.16
Результат запроса


3-1081418073
ev
2004-04-08 13:54
2004.05.16
Как через SQL запрос найти вложенную страку в поле БД, без учета


1-1082987982
Alex Bakulin
2004-04-26 17:59
2004.05.16
TXMLDocument


14-1082719868
ИМХО
2004-04-23 15:31
2004.05.16
Netscape и Mozilla


14-1082859005
Думкин
2004-04-25 06:10
2004.05.16
С днем рождения! 25 апреля.