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

← →
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 (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]

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

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

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

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

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