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

Вниз

Мне нужен GUID в виде числа, как опьсать?   Найти похожие ветки 

 
Kolan ©   (2007-04-16 11:14) [0]

Мне надо написать функции принимающи/возвращающие GUID в виде числа.
Если бы это был Integer, то я написал бы так:
function GetGUID: Integer;

А как быть в этом случае? GUID же 128 битный&#133


 
Сергей М. ©   (2007-04-16 11:21) [1]

function GetGUID: TGUID;


 
Johnmen ©   (2007-04-16 11:22) [2]


> А как быть в этом случае? GUID же 128 битный…

64-битный. Если мы говорим о TGUID.


 
Kolan ©   (2007-04-16 11:24) [3]

64-битный. Если мы говорим о TGUID.
Вот вроде бы так:
The CoCreateGuid function calls the RPC function UuidCreate, which creates a GUID, a globally unique 128-bit integer


> TGUID

Где описан? В правке нет :(


 
Johnmen ©   (2007-04-16 11:28) [4]

Вот F1
 TGUID = packed record
   D1: Longword;
   D2: Word;
   D3: Word;
   D4: array[0..7] of Byte;


 
Johnmen ©   (2007-04-16 11:29) [5]

Виноват.. :( Неправ... Сыплю на голову пепел...


 
Johnmen ©   (2007-04-16 11:30) [6]

Посмотрел у себя. 128 приводится к 64.


 
Сергей М. ©   (2007-04-16 11:31) [7]


> Где описан?


В system.pas


 
Kolan ©   (2007-04-16 11:32) [8]

TGUID = packed record
  D1: Longword;
  D2: Word;
  D3: Word;
  D4: array[0&#1337] of Byte;


Разве подходит для: ?

["{0C229F3E-18FE-4772-A85D-A3DEA31AABFC}"]

Упрощю. Как правильно вызвать?:
HRESULT CoCreateGuid(
 GUID * pguid
);


 
Сергей М. ©   (2007-04-16 11:34) [9]


> Как правильно вызвать?


var
 GUID: TGUID;

CreateGuid(GUID);


 
Johnmen ©   (2007-04-16 11:35) [10]

uses ActiveX;
var ClassID: TGUID;
CoCreateGuid(ClassID);


 
Kolan ©   (2007-04-16 11:40) [11]

Все, я понял. Благодарю.


 
Игорь Шевченко ©   (2007-04-16 16:49) [12]


> Посмотрел у себя. 128 приводится к 64.


Делением на 2 без остатка


 
clickmaker ©   (2007-04-16 17:10) [13]


> > Посмотрел у себя. 128 приводится к 64.
>
>
> Делением на 2 без остатка

GUID Light?


 
Johnmen ©   (2007-04-16 17:15) [14]


> Игорь Шевченко ©   (16.04.07 16:49) [12]
> Делением на 2 без остатка

Это вопрос? Или ты подглядывал в мои сырцы? :)


 
Игорь Шевченко ©   (2007-04-16 17:23) [15]

Johnmen ©   (16.04.07 17:15) [14]


> Это вопрос?


Нет, это арифметика :)


 
Johnmen ©   (2007-04-16 17:34) [16]


> Игорь Шевченко ©   (16.04.07 17:23) [15]

Чё-то калькулятор при делении 128 на 2 без остатка показывает 127.
:)


 
clickmaker ©   (2007-04-16 17:38) [17]


> калькулятор при делении 128 на 2 без остатка показывает
> 127

Гдэ брал такой калкулaтор, дарагой?


 
Johnmen ©   (2007-04-16 17:43) [18]


> Гдэ брал такой калкулaтор, дарагой?

Пуск - Все программы - Стандартные - Калькулятор


 
TUser ©   (2007-04-17 08:42) [19]

Это пиратский калькулятор, а говорят не отличимо от настоящего :)



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

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

Наверх




Память: 0.5 MB
Время: 0.027 c
2-1176732810
mahab
2007-04-16 18:13
2007.05.06
Timage


15-1176187069
Calibr
2007-04-10 10:37
2007.05.06
Температура ЦПУ


3-1171613465
RomanH
2007-02-16 11:11
2007.05.06
Конструкция в ХП


15-1175973230
McSimm
2007-04-07 23:13
2007.05.06
новости Fast Reports - FastReport 4.02 c поддержкой Delphi 2007


2-1176788211
Ega23
2007-04-17 09:36
2007.05.06
PlaySound - просветите