diff options
| author | George Hazan <george.hazan@gmail.com> | 2016-09-08 12:08:57 +0000 |
|---|---|---|
| committer | George Hazan <george.hazan@gmail.com> | 2016-09-08 12:08:57 +0000 |
| commit | 91a382b14d293137fa3fd90d3f5d315491df9716 (patch) | |
| tree | 59b474db7c960126a88e30519a931bb0469fda95 /include/delphi | |
| parent | 5fdbe74ef5349341f2f513c92c920a57e9c9648b (diff) | |
Srmm_* wrappers for services converted into regular functions
git-svn-id: http://svn.miranda-ng.org/main/trunk@17274 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'include/delphi')
| -rw-r--r-- | include/delphi/m_helpers.inc | 29 | ||||
| -rw-r--r-- | include/delphi/m_message.inc | 30 |
2 files changed, 0 insertions, 59 deletions
diff --git a/include/delphi/m_helpers.inc b/include/delphi/m_helpers.inc index 0e51727d89..62bdd92c10 100644 --- a/include/delphi/m_helpers.inc +++ b/include/delphi/m_helpers.inc @@ -40,11 +40,6 @@ function Langpack_Register:int_ptr; function CreateProtoServiceFunction(const szModule, szService: PAnsiChar; serviceProc: TMIRANDASERVICE): int_ptr;
-function Srmm_AddIcon (sid: PStatusIconData):int_ptr;
-procedure Srmm_RemoveIcon(sid: PStatusIconData);
-procedure Srmm_ModifyIcon(hContact:TMCONTACT; sid:PStatusIconData);
-function Srmm_GetNthIcon(hContact:TMCONTACT; index:int):pStatusIconData;
-
function SkinAddNewSound(const name, description, defaultFile: PAnsiChar): int_ptr;
function SkinPlaySound (const name: PAnsiChar): int_ptr;
@@ -336,30 +331,6 @@ begin Result := CreateServiceFunction(szStr, @serviceProc);
end;
-// Hidden variable hLangpack - do not use Inline style
-function Srmm_AddIcon(sid: PStatusIconData):int_ptr;
-begin
- result:=CallService(MS_MSG_ADDICON, hLangpack, LPARAM(sid));
-end;
-
-procedure Srmm_RemoveIcon(sid: PStatusIconData);
- {$IFDEF AllowInline}inline;{$ENDIF}
-begin
- CallService(MS_MSG_REMOVEICON, 0, LPARAM(sid));
-end;
-
-procedure Srmm_ModifyIcon(hContact:TMCONTACT; sid:PStatusIconData);
- {$IFDEF AllowInline}inline;{$ENDIF}
-begin
- CallService(MS_MSG_GETNTHICON, hContact, LPARAM(sid));
-end;
-
-function Srmm_GetNthIcon(hContact:TMCONTACT; index:int):PStatusIconData;
- {$IFDEF AllowInline}inline;{$ENDIF}
-begin
- result:=PStatusIconData(CallService(MS_MSG_GETNTHICON, hContact, index));
-end;
-
function SkinAddNewSound(const name, description, defaultFile: PAnsiChar): int_ptr;
var
ssd: TSKINSOUNDDESCEX;
diff --git a/include/delphi/m_message.inc b/include/delphi/m_message.inc index a6cddc4cdc..1a50da7c6f 100644 --- a/include/delphi/m_message.inc +++ b/include/delphi/m_message.inc @@ -211,36 +211,6 @@ type const
{
- wParam = hLangpack
- lParam = (StatusIconData *)&StatusIconData
-}
- MS_MSG_ADDICON:PAnsiChar = 'MessageAPI/AddIcon';
-
-{
- wParam = 0
- lParam = (StatusIconData *)&StatusIconData
- only szModule and szId are used
-}
- MS_MSG_REMOVEICON:PAnsiChar = 'MessageAPI/RemoveIcon';
-
-{
- wParam = (HANDLE)hContact
- lParam = (int)zero-based index of a visible icon
- returns (StatusIconData*)icon description filled for the required contact
- don't free this memory.
-}
- MS_MSG_GETNTHICON:PAnsiChar = 'MessageAPI/GetNthIcon';
-
-{
- wParam = (HANDLE)hContact
- lParam = (StatusIconData *)&StatusIconData
- if hContact is null, icon is modified for all contacts
- otherwise, only the flags field is valid
- if either hIcon, hIconDisabled or szTooltip is null, they will not be modified
-}
- MS_MSG_MODIFYICON:PAnsiChar = 'MessageAPI/ModifyIcon';
-
-{
wParam = (HANDLE)hContact;
lParam = (StatusIconClickData *)&StatusIconClickData;
catch to show a popup menu, etc.
|