Awkward's private repo sync

git-svn-id: http://svn.miranda-ng.org/main/trunk@11279 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 41 insertions, 0 deletions

diff --git a/plugins/ExternalAPI/delphi/m_stopspam.inc b/plugins/ExternalAPI/delphi/m_stopspam.inc
new file mode 100644
index 0000000000..2bae1fa6a8
--- /dev/null
+++ b/plugins/ExternalAPI/delphi/m_stopspam.inc
@@ -0,0 +1,41 @@
+{

+Miranda NG: the free IM client for Microsoft* Windows*

+

+Copyright (c) 2012-14 Miranda NG project (http://miranda-ng.org),

+Copyright (c) 2004-009 Roman Miklashevsky, A. Petkevich, Kosh&chka, persei

+

+This program is free software; you can redistribute it and/or

+modify it under the terms of the GNU General Public License

+as published by the Free Software Foundation; either version 2

+of the License, or (at your option) any later version.

+

+This program is distributed in the hope that it will be useful,

+but WITHOUT ANY WARRANTY; without even the implied warranty of

+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

+GNU General Public License for more details.

+

+You should have received a copy of the GNU General Public License

+along with this program; if not, write to the Free Software

+Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

+}

+

+{$IFNDEF M_STOPSPAM}

+{$DEFINE M_STOPSPAM}

+

+const

+  CS_NOTPASSED = 0;

+  CS_PASSED    = 1;

+

+//check is contact pass the stopspam

+//wParam=(HANDLE)hContact

+//lParam=0

+//returns a "Contact State" flag

+  MS_STOPSPAM_CONTACTPASSED:PAnsiChar = 'StopSpam/IsContactPassed';

+

+//remove all temporary contacts from db

+//wParam=0

+//lParam=0

+//returns 0

+  MS_STOPSPAM_REMTEMPCONTACTS:PAnsiChar = 'StopSpam/RemoveTempContacts';

+

+{$ENDIF}