![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Уникальный код [D5, Win95/98]
Sergio4 © (2004-07-23 00:46:00)Здравствуйте Товарищи.
У меня такая проблема: Надо такая функция(или процедура) в результате которой получалась бы строка определённой длинны(напр. 8 символов) типа String состоящая из цифр и букв в произвольном порядке - при этом надо чтобы строка всегда была разной(уникальной), при каждом выполнении функции(процедуры). Я чегото думал и никак не придумал. Цифры - понятно, буквы латинские нижнего регистра(вообще подойдёт лубого регистра) от "а" до "z".
Sandman25 (2004-07-23 09:41:00) [1]function RandomString(const Len: Integer): String;
const
Value: Int64 = 0;
begin
Result := IntToHex(Value, Len);
Inc(Value);
end;
:)
Гаврила (2004-07-23 09:40:00) [2]Смотри ответ [3] и не изобретай велосипед
Керик (2004-07-23 09:32:00) [3]Перед тем как юзать Random, надо ставить Randomize при запуске проги один раз!
Gero (2004-07-23 01:42:00) [4]
> Я чегото думал и никак не придумал
Плохо думал.
Если подумаешь лучше, то Random, for, Chr тебе помогут.
Sergey Kaminski (2004-07-23 01:12:00) [5]CreateGUID
GUIDToString
:)
riddare (2004-07-23 00:59:00) [6]используй текущее время с секундами и дату как уникальный элемент строки
DVM (2004-07-23 00:49:00) [7]А сгенерировать подряд несколько случайных чисел и от 0 до 255 и взять символы с этими кодами не судьба? Диапазон можно (и нужно) и другой естественно.