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

Вниз

Уникальная строка   Найти похожие ветки 

 
DMX   (2008-09-11 15:29) [0]

Как можно сгенерировать уникальную строку.


 
Ega23 ©   (2008-09-11 15:32) [1]

uses ComObj;

function UniqueString : string;
var
 id : TGUID;
begin
 CreateGUID(id);
 Result := GUIDToString(id);
end;


 
Palladin ©   (2008-09-11 15:32) [2]

Function vtAlmostUnique:String;
Var
h:TGUID;
Begin
CreateGUID(h);
Result:=GUIDToString(h);
End;


 
Ega23 ©   (2008-09-11 15:35) [3]


> Palladin ©   (11.09.08 15:32) [2]


У меня форматирование кода лучше. И ComObj...  :о)


 
Правильный$Вася   (2008-09-11 15:36) [4]

уникальную в каком контексте?


 
Поросенок Винни-Пух ©   (2008-09-11 15:38) [5]

function KozirnayaAlmostUnique(Ncount : integer):String;
var i : integer;
begin
for i := 0 to NCount do Result := Result + vtAlmostUnique;
end;


 
Правильный$Вася   (2008-09-11 15:41) [6]

"войну и мир" тоже можно считать уникальной строкой
и даже при желании сгенерировать


 
DMX   (2008-09-11 15:42) [7]

Строка будет идентифицировать определенные записи в таблице


 
Palladin ©   (2008-09-11 15:43) [8]

Угу, типа у слова "уникальная" так много значений :)


 
Правильный$Вася   (2008-09-11 15:45) [9]


> Строка будет идентифицировать определенные записи в таблице

так хочется иметь именно строки?

> Угу, типа у слова "уникальная" так много значений

контекстов много


 
Правильный$Вася   (2008-09-11 15:46) [10]


> Строка будет идентифицировать определенные записи в таблице

одна на несколько записей?


 
Ega23 ©   (2008-09-11 15:47) [11]


> Строка будет идентифицировать определенные записи в таблице


СУБД?


 
MsGuns ©   (2008-09-11 16:18) [12]

>DMX   (11.09.08 15:42) [7]
>Строка будет идентифицировать определенные записи в таблице

Закат солнца вручную ?


 
Jeer ©   (2008-09-11 17:15) [13]


> Закат солнца вручную ?


С небольшим участием пинка от балшой ноги.



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

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

Наверх




Память: 0.49 MB
Время: 0.017 c
15-1219920689
Tricky
2008-08-28 14:51
2008.10.19
Todo List не работает в D7


3-1208278127
Вопрос
2008-04-15 20:48
2008.10.19
как найти 10 "последних записей" в sql ?


15-1219927083
md10
2008-08-28 16:38
2008.10.19
не видится ntfs диск


2-1221418384
Drowsy
2008-09-14 22:53
2008.10.19
Const как var.


2-1221417830
Johnnnn
2008-09-14 22:43
2008.10.19
Как присвоить свою процедуру к TInternetExplorer.OnDocumentComple