如何用程序生成类似GUID那样的唯一序列号(50分)

K

kim_fu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-08

• #1

如何用程序生成唯一的序列号呢？就好象在DELPHI的IDE环境里 按 Ctrl+Shift+G<br>生成的GUID。我不想要太长。有个10位就可以。<br>但是要保证唯一。或重复的几率将到最底。<br>

 

K

kim_fu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-09

• #2

up

 

K

kim_fu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-10

• #3

up,没人会吗？

 

W

www

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-10

• #4

uses activex<br>function GetGUID:string;<br>var id:tguid;<br>begin<br>&nbsp;if CoCreateGuid(id)=s_ok then<br>&nbsp; result:=guidtostring(id);<br>end;<br>

 

Y

yangxiao_jiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-10

• #5

可以根据时间来生成到秒，微妙的话，从复的几率就很小了。

 

S

shakehand

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-10

• #6

gz

 

K

kim_fu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-10

• #7

多人接受答案了。