Текущий архив: 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.46 MB
Время: 0.037 c
