Скачать: CL | DM;

Как сгенерировать случайные Числа?? Буквы???   Найти похожие ветки 

← →
RoLeX   (2003-10-20 16:17) [0]

Надо чтобы при нажатии кнопку, в Едит1.текст слчайно генерировалось 3 буквы. Как это сделать???

---

← →
Skier ©   (2003-10-20 16:19) [1]

> в Едит1.текст слчайно генерировалось 3 буквы

Можно даже угадать какие...

---

← →
[lamer]Barmaglot ©   (2003-10-20 16:23) [2]

Random + Chr?

---

← →
Slavian ©   (2003-10-20 16:30) [3]

randomize;
edit1.text:=edit1.text+chr(random(255));

---

← →
Юрий Федоров ©   (2003-10-20 16:31) [4]

>>Skier © (20.10.03 16:19) [1]
По закону подлости именно они на презентации и сгенеряться )))

---

← →
Palladin ©   (2003-10-20 16:32) [5]

:)))

---

← →
RoLeX   (2003-10-20 16:35) [6]

1) Сначала будем генерировать числа.
2) Нада только трехзначное число!
Как сделать??

---

← →
Юрий Федоров ©   (2003-10-20 16:37) [7]

randomize;
edit1.text:=IntToStr(random(999)));

---

← →
Skier ©   (2003-10-20 16:38) [8]

>Юрий Федоров © (20.10.03 16:31) [4]
:)))

---

← →
Palladin ©   (2003-10-20 16:56) [9]

точнее random(899)+100

---

← →
Anatoly Podgoretsky ©   (2003-10-20 16:58) [10]

А одно число для себя припас?

---

← →
RoLeX   (2003-10-20 17:38) [11]

Хорошо, а как сделать случайный набор 3 букв. (А не символов, как это было в примере "chr(random(255))")

---

← →
Плохиш_   (2003-10-20 17:50) [12]

>RoLeX (20.10.03 17:38) [11]

А чё, мозги не включаются что-ли?

---

← →
RoLeX   (2003-10-20 18:05) [13]

> Плохиш_ (20.10.03 17:50) [12]
> >RoLeX (20.10.03 17:38) [11]
>
> А чё, мозги не включаются что-ли?

Ну каз у тебя включаются, то напиши как сделать случайный набор 3 букв. (А у меня мозги перезагружаются!)

---

← →
default ©   (2003-10-20 18:08) [14]

точнее Random(900) + 100
(100..999)

---

← →
Sandman25 ©   (2003-10-20 18:10) [15]

[13] RoLeX (20.10.03 18:05)

генерация_одной_буквы;
генерация_одной_буквы;
генерация_одной_буквы

---

← →
default ©   (2003-10-20 18:18) [16]

Chr(Ord("А") + Random(Ord("я") - Ord("А") + 1))
вот так для кириллицы

---

← →
Verg ©   (2003-10-20 18:21) [17]

> default © (20.10.03 18:18) [16]
> Chr(Ord("А") + Random(Ord("я") - Ord("А") + 1))
> вот так для кириллицы


А с "Ё" получится?

---

← →
default ©   (2003-10-20 18:22) [18]

Verg © (20.10.03 18:21) [17]
и "е" хватит

---

← →
Sandman25 ©   (2003-10-20 18:26) [19]

if random(33)=0 then
// Ё
else
[16] default © (20.10.03 18:18)

:)

---

← →
Verg ©   (2003-10-20 18:28) [20]

> default © (20.10.03 18:22) [18]
> Verg © (20.10.03 18:21) [17]
> и "е" хватит


Е-Моё имя, как думаешь? Хватит?

---

← →
default ©   (2003-10-20 18:32) [21]

RoLeX (20.10.03 16:17)
без буквы "ё" твоё счастье будет полным?а то почтальёнов радости позовём...

---

← →
Кулюкин Олег ©   (2003-10-20 19:05) [22]

А как сгенерировать случайный текст вида
три цифры - точка - три цифры - точка - три цифры?

Для курсовика надо

---

← →
Anatoly Podgoretsky ©   (2003-10-20 19:08) [23]

три точки три тире три точки

---

← →
Кулюкин Олег ©   (2003-10-20 19:09) [24]

> Anatoly Podgoretsky © (20.10.03 19:08) [23]
> три точки три тире три точки

Кто служил во флоте? :))

---

← →
Anatoly Podgoretsky ©   (2003-10-20 19:15) [25]

Это сигналы точного времени

---

← →
Кулюкин Олег ©   (2003-10-20 19:18) [26]

> Anatoly Podgoretsky © (20.10.03 19:15) [25]
> Это сигналы точного времени

Сверим часы.
Приступим к сканированию портов

---

← →
Е-Моё имя ©   (2003-10-20 19:23) [27]

> [20] Verg © (20.10.03 18:28)
>
> > default © (20.10.03 18:22) [18]
> > Verg © (20.10.03 18:21) [17]
> > и "е" хватит
>
>
> Е-Моё имя, как думаешь? Хватит?

канеш хватит!
ЗЫ лутшэе поздно чем никада ;)

---

← →
Sergp ©   (2003-10-20 19:25) [28]

> Приступим к сканированию портов


Что? Опять? А разве их в прошлый раз недосканировали?

---

← →
Anatoly Podgoretsky ©   (2003-10-20 19:27) [29]

Появились новые

---

← →
Е-Моё имя ©   (2003-10-20 19:28) [30]

> Появились новые

ночью прикрутили?

---

← →
Кулюкин Олег ©   (2003-10-20 19:29) [31]

> Sergp © (20.10.03 19:25) [28]
> Что? Опять? А разве их в прошлый раз недосканировали?

На выходных подарили новые

---

← →
Е-Моё имя ©   (2003-10-20 19:30) [32]

> На выходных подарили новые

порты или портки?

---

← →
Кулюкин Олег ©   (2003-10-20 19:43) [33]

> Е-Моё имя © (20.10.03 19:30) [32]
> порты или портки?

Хоботки

---

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

Скачать: CL | DM;



Память: 0.51 MB
Время: 0.022 c