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

Вниз

Уникальный код   Найти похожие ветки 

 
Sergio4   (2004-07-23 00:46) [0]

Здравствуйте Товарищи.
У меня такая проблема: Надо такая функция(или процедура) в результате которой получалась бы строка определённой длинны(напр. 8 символов) типа String состоящая из цифр и букв в произвольном порядке - при этом надо чтобы строка всегда была разной(уникальной), при каждом выполнении функции(процедуры). Я чегото думал и никак не придумал. Цифры - понятно, буквы латинские нижнего регистра(вообще подойдёт лубого регистра) от "а" до "z".


 
DVM ©   (2004-07-23 00:49) [1]

А сгенерировать подряд несколько случайных чисел и от 0 до 255 и взять символы с этими кодами не судьба? Диапазон можно (и нужно) и другой естественно.


 
riddare   (2004-07-23 00:59) [2]

используй текущее время с секундами и дату как уникальный элемент строки


 
Sergey Kaminski ©   (2004-07-23 01:12) [3]

CreateGUID
GUIDToString
:)


 
Gero ©   (2004-07-23 01:42) [4]


> Я чегото думал и никак не придумал

Плохо думал.
Если подумаешь лучше, то Random, for, Chr тебе помогут.


 
Керик   (2004-07-23 09:32) [5]

Перед тем как юзать Random, надо ставить Randomize при запуске проги один раз!


 
Гаврила ©   (2004-07-23 09:40) [6]

Смотри ответ [3] и не изобретай велосипед


 
Sandman25 ©   (2004-07-23 09:41) [7]

function RandomString(const Len: Integer): String;
const
 Value: Int64 = 0;
begin
 Result := IntToHex(Value, Len);
 Inc(Value);
end;

:)



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

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

Наверх




Память: 0.45 MB
Время: 0.051 c
3-1089634284
infom
2004-07-12 16:11
2004.08.08
.dbf -> MSSQL


3-1089714731
Dmitriy O.
2004-07-13 14:32
2004.08.08
Интербазе "INTERNAL ERROR"


1-1090510591
glGLU
2004-07-22 19:36
2004.08.08
Timer


14-1090326801
<skipped>
2004-07-20 16:33
2004.08.08
Кому Delphi 7 Professional за 120 у.е.?


4-1088157926
AleXqwq
2004-06-25 14:05
2004.08.08
number o drives





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский