![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
КАК СГЕНЕРИРОВАТЬ [D6, Win95/98, WinME, NT4, Win2k, WinXP]
Beginer1 © (2002-10-01 18:46:00)Привета МАСТАКИ!!!
Может это тупой вопрос(я только недавно занялся кодингом), но всё же помогите
КАК СГЕНЕРИРОВАТЬ СТРОКУ ИЗ N-ЧИСЛА ПРОИЗВОЛЬНЫХ ЛАТИНСКИХ БУКВ
Beginer1 (2002-10-02 15:38:00) [1]ВСЁ ПОНЯТНО.
СПАСИБОВО!!!!!!
Sharik_212 (2002-10-01 19:40:00) [2]function RandomString(Count: Integer):String;
Var
Jx: Integer;
Ts: String;
Begin
Ts:="";
For Jx:=1 To Count Do
Ts:=Ts+Chr(Random(26)+65);
Result:=Ts;
End;
Если надо маленькие то
Ts:=Ts+Chr(Random(26)+97);
abcdefg (2002-10-01 19:25:00) [3]random
chr
ascii 63+
Xemax (2002-10-01 18:53:00) [4]Иди на форум посвященый криптографии - а этот форум называется WinAPI.