From 3bb087726db613aad9c1e61332fda7300600f60c Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Tue, 6 Sep 2016 16:15:19 +0000
Subject: clist services' extermination continued

git-svn-id: http://svn.miranda-ng.org/main/trunk@17265 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 include/delphi/m_clist.inc | 42 ++----------------------------------------
 include/m_clist.h          | 22 +++-------------------
 2 files changed, 5 insertions(+), 59 deletions(-)

(limited to 'include')

diff --git a/include/delphi/m_clist.inc b/include/delphi/m_clist.inc
index c5366fcf72..13b5a08cda 100644
--- a/include/delphi/m_clist.inc
+++ b/include/delphi/m_clist.inc
@@ -189,47 +189,9 @@ const
 
 function Clist_GroupCreate(hParentGroup:integer; groupName:PWideChar) : integer; stdcall; external AppDll;
 
-const
-  {
-    wParam : TMCONTACT
-    lParam : 0
-    Affect : Do the message processing associated with the double clicking a contact
-    Returns: 0 on success, [non zero] on failure
-    Version: v0.1.1.0+
-  }
-  MS_CLIST_CONTACTDOUBLECLICKED:PAnsiChar = 'CList/ContactDoubleClicked';
-
-  {
-    wParam : TMCONTACT
-    lParam : Pointer to an array of PAnsiChar's containing files/dirs
-    Affect : Do the processing when some files are droppeed on a contact, see notes
-    Returns: 0 on success, [non zero] on failure
-    Notes  : the array is terminated when a NULL(0) entry is found
-    Version: v0.1.2.1+
-  }
-  MS_CLIST_CONTACTFILESDROPPED:PAnsiChar = 'CList/ContactFilesDropped';
-
-  {
-    wParam : TMCONTACT
-    lParam : HGROUP
-    Affect : Change the group a contact belongs to, see notes
-    Returns: 0 on success, [non zero] on failure
-    Notes  : use hGroup=NULL(0) to remove any group association with the contact
-    Version: v0.1.1.0+
-  }
-  MS_CLIST_CONTACTCHANGEGROUP:PAnsiChar = 'CList/ContactChangeGroup';
-
-  {
-    wParam : HCONTACT_1
-    lParam : HCONTACT_2
-    Affect : Determine the ordering of two given contacts
-    Returns: 0 if hContact1 is the same as hContact2
-             1 if hContact1 should be displayed before hContact2
-            -1 if hContact1 should be displayed after hCotnact2
-    Version: v0.1.1.0+
-  }
-  MS_CLIST_CONTACTSCOMPARE:PAnsiChar = 'CList/ContactsCompare';
+procedure Clist_ContactDoubleClicked(hContact:TMCONTACT); stdcall; external AppDll;
 
+const
   {
     wParam=0 (not used)
     lParam=(LPARAM) &MIRANDASYSTRAYNOTIFY
diff --git a/include/m_clist.h b/include/m_clist.h
index 57b2737fc6..89edcc38f9 100644
--- a/include/m_clist.h
+++ b/include/m_clist.h
@@ -453,39 +453,23 @@ EXTERN_C MIR_APP_DLL(void) Clist_EndRebuild(void);
 
 /////////////////////////////////////////////////////////////////////////////////////////
 // do the message processing associated with double clicking a contact
-// wParam = (MCONTACT)hContact
-// lParam = 0
-// returns 0 on success, nonzero on failure
 
-#define MS_CLIST_CONTACTDOUBLECLICKED "CList/ContactDoubleClicked"
-
-/////////////////////////////////////////////////////////////////////////////////////////
-// do the processing for when some files are dropped on a contact
-// wParam = (MCONTACT)hContact
-// lParam = (LPARAM)(char**)ppFiles
-// returns 0 on success, nonzero on failure
-// ppFiles is an array of fully qualified filenames, ending with a NULL.
-
-#define MS_CLIST_CONTACTFILESDROPPED   "CList/ContactFilesDropped"
+EXTERN_C MIR_APP_DLL(void) Clist_ContactDoubleClicked(MCONTACT hContact);
 
 /////////////////////////////////////////////////////////////////////////////////////////
 // change the group a contact belongs to
-// wParam = (MCONTACT)hContact
-// lParam = (LPARAM)(MGROUP)hGroup
 // returns 0 on success, nonzero on failure
 // use hGroup = NULL to put the contact in no group
 
-#define MS_CLIST_CONTACTCHANGEGROUP   "CList/ContactChangeGroup"
+EXTERN_C MIR_APP_DLL(int) Clist_ContactChangeGroup(MCONTACT hContact, MGROUP hGroup);
 
 /////////////////////////////////////////////////////////////////////////////////////////
 // determines the ordering of two contacts
-// wParam = (WPARAM)(MCONTACT)hContact1
-// lParam = (LPARAM)(MCONTACT)hContact2
 // returns 0 if hContact1 is the same as hContact2
 // returns +1 if hContact2 should be displayed after hContact1
 // returns -1 if hContact1 should be displayed after hContact2
 
-#define MS_CLIST_CONTACTSCOMPARE      "CList/ContactsCompare"
+EXTERN_C MIR_APP_DLL(int) Clist_ContactCompare(MCONTACT hContact1, MCONTACT hContact2);
 
 /////////////////////////////////////////////////////////////////////////////////////////
 // DRAG-N-DROP SUPPORT
-- 
cgit v1.2.3