From 690f5e6d29d1c85c4be72638eb22843964c2f512 Mon Sep 17 00:00:00 2001 From: Alexander Lantsev Date: Fri, 24 Apr 2015 08:21:28 +0000 Subject: All non-working stuff moved from trunk git-svn-id: http://svn.miranda-ng.org/main/trunk@13071 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- plugins/!Deprecated/ShlExt/shlc.inc | 144 ------------------------------------ 1 file changed, 144 deletions(-) delete mode 100644 plugins/!Deprecated/ShlExt/shlc.inc (limited to 'plugins/!Deprecated/ShlExt/shlc.inc') diff --git a/plugins/!Deprecated/ShlExt/shlc.inc b/plugins/!Deprecated/ShlExt/shlc.inc deleted file mode 100644 index 2952de8c74..0000000000 --- a/plugins/!Deprecated/ShlExt/shlc.inc +++ /dev/null @@ -1,144 +0,0 @@ -{$IFDEF SHL_IDC} - -const - IDD_SHLOPTS = 101; - IDC_USEGROUPS = 1014; - IDC_CLISTGROUPS = 1015; - // Show "HIT" - IDC_SHOWFULL = 1016; - IDC_NOPROF = 1020; - IDC_SHOWINVISIBLES = 1021; - IDC_HIDEOFFLINE = 1022; - // only in the options dialog - IDC_STATUS = 1023; - IDC_CAPMENUS = 1025; - IDC_CAPSTATUS = 1026; - IDC_CAPSHLSTATUS = 1027; - IDC_REMOVE = 1028; - IDC_USEOWNERDRAW = 1029; -{$ENDIF} -{$IFDEF SHL_KEYS} - -const - SHLExt_Name: PChar = 'shlext15'; - SHLExt_MRU: PChar = 'MRU'; - SHLExt_UseGroups: PChar = 'UseGroups'; - SHLExt_UseCListSetting: PChar = 'UseCLGroups'; - SHLExt_UseHITContacts: PChar = 'UseHITContacts'; - // HIT2 contacts will get your messages but don't know your state - SHLExt_UseHIT2Contacts: PChar = 'UseHIT2Contacts'; - SHLExt_ShowNoProfile: PChar = 'ShowNoProfile'; - SHLExt_ShowNoIcons: PChar = 'ShowNoIcons'; - SHLExt_ShowNoOffline: PChar = 'ShowNoOffline'; -{$ENDIF} -{$IFDEF SHLCOM} - -const - - S_OK = 0; - S_FALSE = 1; - - E_UNEXPECTED = $8000FFFF; - E_NOTIMPL = $80004001; - E_INVALIDARG = $80070057; - - CLASS_E_NOAGGREGATION = $80040110; - CLASS_E_CLASSNOTAVAILABLE = $80040111; - - CLSCTX_INPROC_SERVER = $1; - - { for FORMATETC } - - TYMED_HGLOBAL = 1; - DVASPECT_CONTENT = 1; - -type - - PGUID = ^TGUID; - - TGUID = record - D1: Longword; - D2: Word; - D3: Word; - D4: array [0 .. 7] of Byte; - end; - - TIID = TGUID; - TCLSID = TGUID; - - TStgMedium = record - tymed: Longint; - case Integer of - 0: (hBitmap: hBitmap; unkForRelease: Pointer { IUnknown } ); - 1: (hMetaFilePict: THandle); - 2: (hEnhMetaFile: THandle); - 3: (hGlobal: hGlobal); - 4: (lpszFileName: Pointer { POleStr } ); - 5: (stm: Pointer { IUnknown } ); - 6: (stg: Pointer { IStorage } ); - end; - - PFormatEtc = ^TFormatEtc; - - TFormatEtc = record - cfFormat: Word; { TClipFormat; } - ptd: Pointer; { PDVTargetDevice; } - dwAspect: Longint; - lindex: Longint; - tymed: Longint; - end; - -{$ENDIF} -{$IFDEF COM_STRUCTS} - -const - - IID_IUnknown: TGUID = (D1: $00000000; D2: $0000; D3: $0000; - D4: ($C0, $00, $00, $00, $00, $00, $00, $46)); - - IID_IClassFactory: TGUID = (D1: $00000001; D2: $0000; D3: $0000; - D4: ($C0, $00, $00, $00, $00, $00, $00, $46)); - - IID_IShellExtInit: TGUID = (D1: $000214E8; D2: $0000; D3: $0000; - D4: ($C0, $00, $00, $00, $00, $00, $00, $46)); - - IID_IContextMenu: TGUID = (D1: $000214E4; D2: $0000; D3: $0000; - D4: ($C0, $00, $00, $00, $00, $00, $00, $46)); - - IID_IContextMenu2: TGUID = (D1: $000214F4; D2: $0000; D3: $0000; - D4: ($C0, $00, $00, $00, $00, $00, $00, $46)); - - IID_IContextMenu3: TGUID = (D1: $BCFCE0A0; D2: $EC17; D3: $11D0; - D4: ($8D, $10, $00, $A0, $C9, $0F, $27, $19)); - - IID_WICImagingFactory: TGUID = (D1: $EC5EC8A9; D2: $C395; D3: $4314; - D4: ($9C, $77, $54, $D7, $A9, $35, $FF, $70)); - - - // Vista+ only - - CLSID_WICImagingFactory: TGUID = (D1: $CACAF262; D2: $9370; D3: $4615; - D4: ($A1, $3B, $9F, $55, $39, $DA, $4C, $0A)); - - // anything before 0.0.1.5 was : {A321A032-7976-11d6-A310-ED893982BF28} - // changed to a new GUID to avoid older plugins - // {72013A26-A94C-11d6-8540-A5E62932711D} - // the IPC header now checks the plugin version given anyway. - - CLSID_ISHLCOM: TGUID = (D1: $72013A26; D2: $A94C; D3: $11D6; - D4: ($85, $40, $A5, $E6, $29, $32, $71, $1D);); -{$ENDIF} -{$IFDEF COMAPI} -function CoCreateInstance(const rclsid: TCLSID; pUnkOuter: Pointer; dwClsContext: DWORD; - const riid: TIID; var ppv): HResult; stdcall; external 'ole32.dll' name 'CoCreateInstance'; -procedure ReleaseStgMedium(var medium: TStgMedium); stdcall; - external 'ole32.dll' name 'ReleaseStgMedium'; -function IsEqualGUID(const guid1, guid2: TGUID): Boolean; stdcall; - external 'ole32.dll' name 'IsEqualGUID'; -function IsEqualIID(const iid1, iid2: TIID): Boolean; stdcall; - external 'ole32.dll' name 'IsEqualGUID'; -function IsEqualCLSID(const clsid1, clsid2: TCLSID): Boolean; stdcall; - external 'ole32.dll' name 'IsEqualGUID'; -function QueueUserAPC(pfnAPC: Pointer; hThread: THandle; dwData: DWORD): BOOL; stdcall; - external 'kernel32' name 'QueueUserAPC'; -{$ENDIF} -- cgit v1.2.3