DelphiでもGUIDを生成する関数が用意されています。
XE2からはSystem.SysUtilsにまとめられました。
Delphiヘルプから引用
System.SysUtils.CreateGUID | グローバル一意識別子(GUID)を生成します。 |
System.SysUtils.GUIDToString | クラス識別子の GUID を文字列に変換します。 |
System.SysUtils.IsEqualGUID | 2 つの TGUID 値が同じかどうかを示します。 |
System.SysUtils.StringToGUID |
文字列を GUID に変換します。 |
詳しくはエンバカデロ・テクノロジーズのDelphiヘルプページを。