From a2795725f5afc756a405a85c192bdd53b967999d Mon Sep 17 00:00:00 2001 From: Alexey Kulakov Date: Fri, 29 Jun 2012 06:56:07 +0000 Subject: Added my Miranda API pascal version Changed ShlExt to my API compilation (32 bit FPC now only) git-svn-id: http://svn.miranda-ng.org/main/trunk@679 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c --- plugins/ShlExt/inc/newpluginapi.inc | 94 ------------------------------------- 1 file changed, 94 deletions(-) delete mode 100644 plugins/ShlExt/inc/newpluginapi.inc (limited to 'plugins/ShlExt/inc/newpluginapi.inc') diff --git a/plugins/ShlExt/inc/newpluginapi.inc b/plugins/ShlExt/inc/newpluginapi.inc deleted file mode 100644 index 85a7df9a2b..0000000000 --- a/plugins/ShlExt/inc/newpluginapi.inc +++ /dev/null @@ -1,94 +0,0 @@ -(* - -Miranda IM: the free IM client for Microsoft* Windows* - -Copyright 2000-2004 Miranda ICQ/IM project, -all portions of this codebase are copyrighted to the people -listed in contributors.txt. - -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 NEWPLUGINAPI} -{$DEFINE NEWPLUGINAPI} - -const - - MAXMODULELABELLENGTH = 64; - -type - - PPLUGININFO = ^TPLUGININFO; - TPLUGININFO = record - cbSize: int; - shortName: PChar; - version: DWORD; - description: PChar; - author: PChar; - authorEmail: PChar; - copyright: PChar; - homepage: PChar; - isTransient: Byte; // leave zero for now - { one of the DEFMOD_* consts in m_plugin or zero, if non zero, this will - suppress loading of the specified builtin module } - replacesDefaultModule: int; - end; - - { modules.h is never defined -- no check needed } - - TMIRANDAHOOK = function(wParam: WPARAM; lParam: LPARAM): int; cdecl; - TMIRANDASERVICE = function(wParam: WPARAM; lParam: LPARAM): int; cdecl; - - //see modules.h tor what all this stuff is - - TCreateHookableEvent = function(const char: PChar): THandle; cdecl; - TDestroyHookableEvent = function(Handle: THandle): int; cdecl; - TNotifyEventHooks = function(Handle: THandle; wParam: WPARAM; lParam: LPARAM): int; cdecl; - THookEvent = function(const char: PChar; MIRANDAHOOK: TMIRANDAHOOK): THandle; cdecl; - THookEventMessage = function(const char: PChar; Wnd: THandle; wMsg: Integer): THandle; cdecl; - TUnhookEvent = function(Handle: THandle): int; cdecl; - TCreateServiceFunction = function(const char: PChar; MIRANDASERVICE: TMIRANDASERVICE): THandle; cdecl; - TCreateTransientServiceFunction = function(const char: PChar; MIRANDASERVICE: TMIRANDASERVICE): THandle; cdecl; - TDestroyServiceFunction = function(Handle: THandle): int; cdecl; - TCallService = function(const char: PChar; wParam: WPARAM; lParam: LPARAM): int; cdecl; - TServiceExists = function(const char: PChar): int; cdecl; - - PPLUGINLINK = ^TPLUGINLINK; - TPLUGINLINK = record - CreateHookableEvent: TCreateHookableEvent; - DestroyHookableEvent: TDestroyHookableEvent; - NotifyEventHooks: TNotifyEventHooks; - HookEvent: THookEvent; - HookEventMessage: THookEventMessage; - UnhookEvent: TUnhookEvent; - CreateServiceFunction: TCreateServiceFunction; - CreateTransientServiceFunction: TCreateTransientServiceFunction; - DestroyServiceFunction: TDestroyServiceFunction; - CallService: TCallService; - ServiceExists: TServiceExists; // v0.1.0.1+ - end; - - { any module must export the below functions to be valid plugin - the export names MUST be 'MirandaPluginInfo' 'Load' 'Unload' } - - TMirandaPluginInfo = function(mirandaVersion: DWORD): PPLUGININFO; cdecl; - TLoad = function(link: PPLUGINLINK): int; cdecl; - TUnload = function: int; cdecl; - -const - - CALLSERVICE_NOTFOUND = $80000000; - -{$ENDIF} -- cgit v1.2.3