Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

КАК СГЕНЕРИРОВАТЬ [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.


Наверх

Титульная страница Поиск, карта сайта Написать письмо