From 06bb38dfa357a731e16980d03ab100b84e5cb989 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Thu, 25 Jun 2015 21:53:56 +0000
Subject: MS_CLUI_GETHWND & MS_CLUI_GETHWNDTREE replaced with
pcli->hwndContactList & pcli->hwndContactTree respectively
git-svn-id: http://svn.miranda-ng.org/main/trunk@14386 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
include/delphi/m_clistint.inc | 4 +---
include/delphi/m_clui.inc | 15 ---------------
include/delphi/m_helpers.inc | 3 +++
3 files changed, 4 insertions(+), 18 deletions(-)
(limited to 'include/delphi')
diff --git a/include/delphi/m_clistint.inc b/include/delphi/m_clistint.inc
index 1d21e9d942..64040a535d 100644
--- a/include/delphi/m_clistint.inc
+++ b/include/delphi/m_clistint.inc
@@ -539,9 +539,7 @@ type
pfnSetContactCheckboxes:procedure(cc:PClcContact; checked:int); cdecl;
end;
-{
var
- cli : CLIST_INTERFACE;cvar;external;
-}
+ cli : PCLIST_INTERFACE;
{$ENDIF}
diff --git a/include/delphi/m_clui.inc b/include/delphi/m_clui.inc
index 7d68a382de..a6b5fa2583 100644
--- a/include/delphi/m_clui.inc
+++ b/include/delphi/m_clui.inc
@@ -30,21 +30,6 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
/>>}
const
- {
- wParam : 0
- lParam : 0
- Affects: Returns a window handle for the contact list window, see notes
- Returns: ""
- Notes : This call has a very specific purpose internally Miranda
- and shouldn't be used gratuitously, in almost all cases
- there's another call to do whatever it is that you're
- trying to do.
- }
- MS_CLUI_GETHWND:PAnsiChar = 'CLUI/GetHwnd';
-
- //get ContactTree hwnd
- MS_CLUI_GETHWNDTREE:PAnsiChar = 'CLUI/GetHwndTree';
-
{
wParam : Handle to a group
lParam : 1 or 0
diff --git a/include/delphi/m_helpers.inc b/include/delphi/m_helpers.inc
index 1d68b6501e..1cf14f32b0 100644
--- a/include/delphi/m_helpers.inc
+++ b/include/delphi/m_helpers.inc
@@ -539,4 +539,7 @@ begin
result:=PCRYPTO_PROVIDER(CallService(MS_CRYPTO_GET_PROVIDER, 0, LPARAM(pszName)));
end;
+initialization
+ cli:=PCLIST_INTERFACE(CallService(MS_CLIST_RETRIEVE_INTERFACE,0,0));
+
{$ENDIF}
--
cgit v1.2.3