Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.11;
Скачать: CL | DM;

Вниз

генерация   Найти похожие ветки 

 
greengeneral   (2007-10-19 18:26) [0]

Я хочу узнать есть ли функция генерации случайных букв, символов.


 
Reindeer Moss Eater ©   (2007-10-19 18:27) [1]

и что мешает твоему хотению?


 
korneley ©   (2007-10-19 18:37) [2]

Орешник, пример номер два. "Рандомизатор"


 
Джо ©   (2007-10-19 18:45) [3]

> [0] greengeneral   (19.10.07 18:26)
> Я хочу узнать есть ли функция генерации случайных букв,
> символов.

Random. Будет генерировать, что угодно. Хоть буквы, хоть символы.


 
Правильный_Вася   (2007-10-19 19:08) [4]

Удалено модератором
Примечание: флуд


 
Palladin ©   (2007-10-19 19:09) [5]

есть конечно ее только написать надо

Function RandomChar:Char;
Begin
Result:=Chr(Random(256));
End;


 
Anatoly Podgoretsky ©   (2007-10-19 19:41) [6]

Удалено модератором
Примечание: флуд


 
Джо ©   (2007-10-19 19:43) [7]

Удалено модератором
Примечание: самоцензура


 
TUser ©   (2007-10-19 21:27) [8]


> Function RandomChar:Char;
> Begin
> Result:=Chr(Random(255));
> End;


 
Palladin ©   (2007-10-19 21:30) [9]


> TUser ©   (19.10.07 21:27) [8]

есть конечно ее только написать надо

Function RandomChar:Char;
Begin
Result:=Chr(Random(256));
End;

Random + F1


 
Jump   (2007-10-19 21:34) [10]

И я свои 5 копеек вставлю:

function RandomChar: char;
begin
 Result := 32 + Chr(Random(224));
end;


 
Jump   (2007-10-19 21:35) [11]

Ой:

Result := Chr(32 + Random(224));


 
Pump   (2007-10-19 21:52) [12]


> Ой:

не считается


 
korneley ©   (2007-10-19 22:01) [13]


> Я хочу узнать есть ли функция генерации случайных букв,
> символов.
Ответ: Есть! И букв,  и символов, и символических букв, и буквенных символов, и всего, что не пожелается...



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

Текущий архив: 2007.11.11;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.017 c
9-1162993242
dfsfwe
2006-11-08 16:40
2007.11.11
DelphiX


15-1190797843
Ega23
2007-09-26 13:10
2007.11.11
Бесплатная Embedded-СУБД


2-1192442266
kudatsky
2007-10-15 13:57
2007.11.11
О свойстве TScreen.PixelsPerInch


2-1192625509
Pro100
2007-10-17 16:51
2007.11.11
Импорт из Excel


2-1192606931
ari_9
2007-10-17 11:42
2007.11.11
в run-time расположить отн. друг друга комп. с одинаковым align