From 6c4c81c02298ba6ab34c85c58f96da92c835f20d Mon Sep 17 00:00:00 2001 From: George Hazan Date: Fri, 2 Dec 2016 16:52:47 +0300 Subject: toolbar services removed from pascal --- plugins/ExternalAPI/delphi/m_msg_buttonsbar.inc | 51 +++---------------------- 1 file changed, 5 insertions(+), 46 deletions(-) (limited to 'plugins/ExternalAPI/delphi') diff --git a/plugins/ExternalAPI/delphi/m_msg_buttonsbar.inc b/plugins/ExternalAPI/delphi/m_msg_buttonsbar.inc index 9caa4dc44a..9ead87cdb1 100644 --- a/plugins/ExternalAPI/delphi/m_msg_buttonsbar.inc +++ b/plugins/ExternalAPI/delphi/m_msg_buttonsbar.inc @@ -1,53 +1,12 @@ {$IFNDEF M_MSG_BUTTONSBAR} {$DEFINE M_MSG_BUTTONSBAR} -////////////////////////////////////////////////////////////////////////// -// Services -// -////////////////////////////////////////////////////////////////////////// -// Adding a button -// -// wParam = 0 -// lParam = (BBButton *) &description const - MS_BB_ADDBUTTON:PAnsiChar = 'TabSRMM/ButtonsBar/AddButton'; - -////////////////////////////////////////////////////////////////////////// -// Remove button -// -// wParam = 0 -// lParam = (BBButton *) &description, only button ID and ModuleName used - MS_BB_REMOVEBUTTON:PAnsiChar = 'TabSRMM/ButtonsBar/RemoveButton'; - -////////////////////////////////////////////////////////////////////////// -// ModifyButton(global) -// -// wParam = 0 -// lParam = (BBButton *) &description - MS_BB_MODIFYBUTTON:PAnsiChar = 'TabSRMM/ButtonsBar/ModifyButton'; - - BBSF_HIDDEN = 1; BBSF_DISABLED = 2; BBSF_PUSHED = 4; BBSF_RELEASED = 8; -////////////////////////////////////////////////////////////////////////// -// GetButtonState(local) -// -// wParam = hContact -// lParam = (BBButton *) &description , only ModuleName and ID used -// Returns BBButton struct with BBSF_ bbbFlags: - MS_BB_GETBUTTONSTATE:PansiChar = 'TabSRMM/ButtonsBar/GetButtonState'; - -////////////////////////////////////////////////////////////////////////// -// SetButtonState (local) -// -// wParam = hContact -// lParam = (BBButton *) &description , ModuleName, ID,hIcon,Tooltip, and BBSF_ bbbFlags are used - MS_BB_SETBUTTONSTATE:PAnsiChar = 'TabSRMM/ButtonsBar/SetButtonState'; - - //////////////////////////////////////////////////////////////// //Events // @@ -75,7 +34,6 @@ const type pCustomButtonClickData = ^tCustomButtonClickData; tCustomButtonClickData = record - cbSize :int; pt :TPOINT; // screen coordinates for menus pszModule :PAnsiChar; // button owners name dwButtonId:dword; // registered button ID @@ -97,8 +55,8 @@ const BBBF_ISDUMMYBUTTON = $0200; type - tagBBButton = record - cbSize :int; // size of structure + pBBButton = ^tBBButton; + tBBButton = record dwButtonID :dword; // your button ID, will be combined with pszModuleName for storing settings, etc... pszModuleName:PAnsiChar; // module name without spaces and underline symbols (e.g. "tabsrmm") szTooltip :PWideChar; // button's tooltip @@ -108,7 +66,8 @@ type bbbFlags :dword; // combine of BBBF_ flags above hIcon :HICON; // Handle to icolib registered icon, it's better to register with pszSection = "TabSRMM/Toolbar" end; - tBBButton = tagBBButton; - +function Srmm_RemoveButton(bbdi:pBBButton) : integer; stdcall; external AppDll; +function Srmm_SetButtonState(hContact:TMCONTACT;bbdi:pBBButton) : integer; stdcall; external AppDll; + {$ENDIF} -- cgit v1.2.3