Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

не мог ли ты б мне помочь с Random om [D6, WinME]


LocalMan ©   (2002-11-27 20:28:00) 

Плиз напишите код который бы бсгенерировал бы число от 1 до 3 и присвоил получившееся значение label.caption?
Кто может помогите...


Ru   (2002-11-28 13:24:00) [1]

label1.caption:=inttostr(random(100) mod 3);

в конце файла:
initialization
randomize;

при использовании маленьких чисел идут почти одинаковые последовательности.


SPeller   (2002-11-28 01:39:00) [2]


> А причем тут API??????

А так всегда, если что-то непонятно - то надо спрашивать в ВинАПИ. Жалко модератор отдыхает, эту ветку в Общие Вопросы надо.


LongIsland   (2002-11-27 20:32:00) [3]

A:=Random(2)+1;
Label.Caption:=IntToStr(A);

А причем тут API??????


Наверх

Титульная страница Поиск, карта сайта Написать письмо