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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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