Показать сообщение отдельно

  #7  
Старый 25.07.2009, 11:08
SkyLine32
Участник форума
Регистрация: 01.03.2009
Сообщений: 121
С нами: 9050197

Репутация: 38
По умолчанию

Привет!
Пишу на Delphi 7 довольно мало времени...
Кто может дать такой пример.
На форме есть 2 компонента TSpinEdit и TEdit.
TSpinEdit будет иметь Value от 1 до 10.
Как сделать чтобы при значении Value, рандомно генерировались числа в форме TSpinEdit...но главное чтобы если при значении к примеру 1 - генерировались числа именно в диапазоне от 0 до 9...а допустим при значении 6...была генерация в диапазоне от 000000 до 999999 ?
Вот код который делает всё что надо только кроме заданного диапазона...
Цитата:
if SpinEdit1.Value = 2 then randomize;
Edit1.Text:=inttostr(random(99));
Тесть random(99) будет колебаться и от 0 до 9, что мне и не надо...
Уже кучу времени убил и так и не смог сделать сам

Последний раз редактировалось SkyLine32; 25.07.2009 в 11:25..
 
Ответить с цитированием