![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как получить Globally Unique Identifier (GUID)? [D6, WinXP]
galexis © (2003-12-17 13:35:00)
Уважаемые мастера!
Подскажите пожалуйста, как получить GUID. Выгружаю в файл XML. Организация для которой производится выгрузка отчетов в xml, требует наличие ID=GUID для каждого файла.
спасибо
Ihor Osov'yak (2003-12-17 14:34:00) [1]
см. также
function CreateClassID: string; в unit ComObj;
galexis (2003-12-17 13:54:00) [2]
Я нашел. Может кому пригодится из help"а:
uses ActiveX, ComObj;
procedure TForm1.Button1Click(Sender: TObject);
var
G: TGUID;
begin
OleCheck(CoCreateGuid(G));
ShowMessage(GuidToString(G));
end;