Скачать: CL | DM;

Как получить Globally Unique Identifier (GUID)?   Найти похожие ветки 

← →
galexis ©   (2003-12-17 13:35) [0]

Уважаемые мастера!
Подскажите пожалуйста, как получить GUID. Выгружаю в файл XML. Организация для которой производится выгрузка отчетов в xml, требует наличие ID=GUID для каждого файла.
спасибо

---

← →
galexis ©   (2003-12-17 13:54) [1]

Я нашел. Может кому пригодится из help"а:
uses ActiveX, ComObj;
procedure TForm1.Button1Click(Sender: TObject);

var
G: TGUID;
begin
OleCheck(CoCreateGuid(G));
ShowMessage(GuidToString(G));
end;

---

← →
Ihor Osov'yak ©   (2003-12-17 14:34) [2]

см. также
function CreateClassID: string; в unit ComObj;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c