diff options
Diffstat (limited to 'include')
| -rw-r--r-- | include/delphi/m_genmenu.inc | 1 | ||||
| -rw-r--r-- | include/delphi/m_helpers.inc | 9 |
2 files changed, 10 insertions, 0 deletions
diff --git a/include/delphi/m_genmenu.inc b/include/delphi/m_genmenu.inc index 009f06d508..14f51f8140 100644 --- a/include/delphi/m_genmenu.inc +++ b/include/delphi/m_genmenu.inc @@ -157,6 +157,7 @@ type flags :integer;
hIcon :HICON; // or hIcolibItem:THANDLE;
hLangpack :int;
+ uid :MUUID;
end;
{
diff --git a/include/delphi/m_helpers.inc b/include/delphi/m_helpers.inc index 21d5570f0a..98173a3242 100644 --- a/include/delphi/m_helpers.inc +++ b/include/delphi/m_helpers.inc @@ -55,6 +55,8 @@ function Menu_AddStatusMenuItem (mi:PMO_MenuItem):HGENMENU; function Menu_AddProtoMenuItem (mi:PMO_MenuItem):HGENMENU;
function Menu_AddTrayMenuItem (mi:PMO_MenuItem):HGENMENU;
+procedure SET_UID(pmi:PMO_MenuItem; strguid:PAnsiChar);
+
function UserInfo_AddPage(wParam:WPARAM; odp:POPTIONSDIALOGPAGE):int_ptr;
function Options_AddPage (wParam:WPARAM; odp:POPTIONSDIALOGPAGE):int_ptr;
function Hotkey_Register(hk:PHOTKEYDESC):int_ptr;
@@ -532,6 +534,13 @@ begin result:=PCRYPTO_PROVIDER(CallService(MS_CRYPTO_GET_PROVIDER, 0, LPARAM(pszName)));
end;
+function UuidFromStringA(StringUuid:PAnsiChar; var Uuid:TGUID) : integer; stdcall; external 'Rpcrt4.dll';
+
+procedure SET_UID(pmi:PMO_MenuItem; strguid:PAnsiChar);
+begin
+ UuidFromStringA(strguid, pmi.uid);
+end;
+
initialization
cli:=PCLIST_INTERFACE(CallService(MS_CLIST_RETRIEVE_INTERFACE,0,0));
|