From 226f2fceddb5b81d5ba7a16729b4f07e53cfafb4 Mon Sep 17 00:00:00 2001 From: George Hazan Date: Fri, 27 Sep 2019 14:40:29 +0300 Subject: obsolete services from m_ignore.h converted into functions --- include/delphi/m_ignore.inc | 34 +-------------------------------- include/delphi/m_imgsrvc.inc | 2 +- include/m_ignore.h | 45 ++++++++++++++++++++------------------------ 3 files changed, 22 insertions(+), 59 deletions(-) (limited to 'include') diff --git a/include/delphi/m_ignore.inc b/include/delphi/m_ignore.inc index 4007ac03a8..99a08ead4d 100644 --- a/include/delphi/m_ignore.inc +++ b/include/delphi/m_ignore.inc @@ -34,38 +34,6 @@ const IGNOREEVENT_AUTHORIZATION = 4; IGNOREEVENT_TYPINGNOTIFY = 5; - { - wParam : TMCONTACT - lParam : IGNOREEVENT_* - Affects: Determines if a message type to a contact should be ignored, see notes - Returns: 0 if the message type MUST be shown [non zero] if it MUST be ignored - Notes : TMCONTACT can be NULL(0) to see what to do with a contact - that isn't on the list (or is unknown in some way) - don't use the IGNOREEVENT_ALL type! - Version: v0.1.0.1+ - } - MS_IGNORE_ISIGNORED:PAnsiChar = 'Ignore/IsIgnored'; - - { - wParam : TMCONTACT - lParam : IGNOREEVENT_* constant - Affects: Ignore future messages from a contact, see notes - Returns: 0 on success, [nonzero] on failure - Notes : wParam: NULL(0) can be used to see if an unknown contact should be - ignored or not - you can't SET unknown contact's ignore types, this - is to stop a plugin allowing certain functions (I guess) - Version: v0.1.0.1+ - } - MS_IGNORE_IGNORE:PAnsiChar = 'Ignore/Ignore'; - - { - wParam : TMCONTACT - lParam : IGNOREEVENT_* - Affects: Receive future messages from a contact -- of the given type, see notes - Returns: 0 on success, non zero on failure - Notes : Use NULL(0) for TMCONTACT to retrieve the setting for an unknown contact - Version: v0.1.0.1+ - } - MS_IGNORE_UNIGNORE:PAnsiChar = 'Ignore/Unignore'; +function Ignore_Ignore(hContact:TMCONTACT; mask:integer) : integer; stdcall; external AppDll; {$ENDIF} diff --git a/include/delphi/m_imgsrvc.inc b/include/delphi/m_imgsrvc.inc index ef770733f2..6e764af1e0 100644 --- a/include/delphi/m_imgsrvc.inc +++ b/include/delphi/m_imgsrvc.inc @@ -33,7 +33,7 @@ by the FreeImage project (http://freeimage.sourceforge.net) {$IFNDEF M_IMGSRVC} {$DEFINE M_IMGSRVC} - +const IMGL_RETURNDIB = 1; // will NOT return a HBITMAP but a FIBITMAP * instead (useful, // if you want to do further image manipulations before // converting to a Win32 bitmap caller MUST then free the diff --git a/include/m_ignore.h b/include/m_ignore.h index b4439727b7..987582a3ef 100644 --- a/include/m_ignore.h +++ b/include/m_ignore.h @@ -25,38 +25,33 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. #ifndef M_IGNORE_H__ #define M_IGNORE_H__ 1 -//this module provides UI and storage for blocking only, protocol modules are -//responsible for implementing the block +#ifndef M_CORE_H__ +#include +#endif -#define IGNOREEVENT_ALL (LPARAM)(-1) +///////////////////////////////////////////////////////////////////////////////////////// +// this module provides UI and storage for blocking only, protocol modules are +// responsible for implementing the block + +#define IGNOREEVENT_ALL (int)(-1) #define IGNOREEVENT_MESSAGE 1 #define IGNOREEVENT_FILE 2 #define IGNOREEVENT_USERONLINE 3 #define IGNOREEVENT_AUTHORIZATION 4 #define IGNOREEVENT_TYPINGNOTIFY 5 -//determines if a message type to a contact should be ignored v0.1.0.1+ -//wParam = (MCONTACT)hContact -//lParam = message type, an ignoreevent_ constant -//returns 0 if the message should be shown, or nonzero if it should be ignored -//Use hContact = NULL to retrieve the setting for unknown contacts (not on the -//contact list, as either permanent or temporary). -//don't use ignoreevent_all when calling this service -#define MS_IGNORE_ISIGNORED "Ignore/IsIgnored" - -//ignore future messages from a contact v0.1.0.1+ -//wParam = (MCONTACT)hContact -//lParam = message type, an ignoreevent_ constant -//returns 0 on success or nonzero on failure -//Use hContact = NULL to retrieve the setting for unknown contacts -#define MS_IGNORE_IGNORE "Ignore/Ignore" - -//receive future messages from a contact v0.1.0.1+ -//wParam = (MCONTACT)hContact -//lParam = message type, an ignoreevent_ constant -//returns 0 on success or nonzero on failure -//Use hContact = NULL to retrieve the setting for unknown contacts -#define MS_IGNORE_UNIGNORE "Ignore/Unignore" +// determines if a message type to a contact should be ignored +// mask is one of IGNOREEVENT_* constants +EXTERN_C MIR_APP_DLL(bool) Ignore_IsIgnored(MCONTACT hContact, int mask); + +// ignores certain type of events from a contact +// returns 0 on success or nonzero on failure +// Use hContact = 0 to retrieve the setting for unknown contacts +EXTERN_C MIR_APP_DLL(int) Ignore_Ignore(MCONTACT hContact, int mask); +// allows certain type of future events from a contact +// returns 0 on success or nonzero on failure +// Use hContact = NULL to retrieve the setting for unknown contacts +EXTERN_C MIR_APP_DLL(int) Ignore_Allow(MCONTACT hContact, int mask); #endif // M_IGNORE_H__ -- cgit v1.2.3