summaryrefslogtreecommitdiff
path: root/include/delphi
diff options
context:
space:
mode:
authorGeorge Hazan <george.hazan@gmail.com>2015-06-25 21:53:56 +0000
committerGeorge Hazan <george.hazan@gmail.com>2015-06-25 21:53:56 +0000
commit06bb38dfa357a731e16980d03ab100b84e5cb989 (patch)
tree686bd8edc9e71087bb943ec3fe6dbb5193d09247 /include/delphi
parentcc6abc9eed963a2659c121ddec136f1ab4256535 (diff)
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
Diffstat (limited to 'include/delphi')
-rw-r--r--include/delphi/m_clistint.inc4
-rw-r--r--include/delphi/m_clui.inc15
-rw-r--r--include/delphi/m_helpers.inc3
3 files changed, 4 insertions, 18 deletions
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
@@ -31,21 +31,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
Affect : A new group was created, add it to the list, see notes
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}