diff options
| author | George Hazan <george.hazan@gmail.com> | 2016-09-06 17:32:37 +0000 |
|---|---|---|
| committer | George Hazan <george.hazan@gmail.com> | 2016-09-06 17:32:37 +0000 |
| commit | a609a99eebd89fca7955c8957fc0f2e99c8ededb (patch) | |
| tree | fe7d50e1fc61d19ce8f8f6d4dccdb6a88ef957d6 /include/delphi | |
| parent | 5e49edfe66308d79bd8095acb1c89d0e987c7aa4 (diff) | |
minus MS_CLIST_RETRIEVE_INTERFACE
git-svn-id: http://svn.miranda-ng.org/main/trunk@17267 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'include/delphi')
| -rw-r--r-- | include/delphi/m_clistint.inc | 10 | ||||
| -rw-r--r-- | include/delphi/m_helpers.inc | 2 |
2 files changed, 3 insertions, 9 deletions
diff --git a/include/delphi/m_clistint.inc b/include/delphi/m_clistint.inc index 2568903f6c..f472cd2775 100644 --- a/include/delphi/m_clistint.inc +++ b/include/delphi/m_clistint.inc @@ -256,14 +256,6 @@ const TIM_CALLBACK = WM_USER+1857;
TIM_CREATE = WM_USER+1858;
-const
-{
- Miranda 0.4.3.0+
- retrieves the pointer to a CLIST_INTERFACE structure
- NOTE: valid only for the clist clone building, not for the regular use
-}
- MS_CLIST_RETRIEVE_INTERFACE:PansiChar = 'CList/RetrieveInterface';
-
{**************************************************************************
* CLIST_INTERFACE structure definition
************************************************************************** }
@@ -525,6 +517,8 @@ type pfnSetContactCheckboxes:procedure(cc:PClcContact; checked:int); cdecl;
end;
+function Clist_GetInterface : PCLIST_INTERFACE; stdcall; external AppDll;
+
var
cli : PCLIST_INTERFACE;
diff --git a/include/delphi/m_helpers.inc b/include/delphi/m_helpers.inc index 98173a3242..0e51727d89 100644 --- a/include/delphi/m_helpers.inc +++ b/include/delphi/m_helpers.inc @@ -542,6 +542,6 @@ begin end;
initialization
- cli:=PCLIST_INTERFACE(CallService(MS_CLIST_RETRIEVE_INTERFACE,0,0));
+ cli := Clist_GetInterface();
{$ENDIF}
|