From cb4a46e7fbe62d788e66ed6121c717a2d22a4d7c Mon Sep 17 00:00:00 2001
From: watcherhd <watcherhd@e753b5eb-9565-29b2-b5c5-2cc6f99dfbcb>
Date: Thu, 21 Apr 2011 14:14:52 +0000
Subject: svn.miranda.im is moving to a new home!

git-svn-id: http://miranda-plugins.googlecode.com/svn/trunk@7 e753b5eb-9565-29b2-b5c5-2cc6f99dfbcb
---
 delphi/Awkward/include/m_toolbar.inc | 96 ++++++++++++++++++++++++++++++++++++
 1 file changed, 96 insertions(+)
 create mode 100644 delphi/Awkward/include/m_toolbar.inc

(limited to 'delphi/Awkward/include/m_toolbar.inc')

diff --git a/delphi/Awkward/include/m_toolbar.inc b/delphi/Awkward/include/m_toolbar.inc
new file mode 100644
index 0000000..75d291b
--- /dev/null
+++ b/delphi/Awkward/include/m_toolbar.inc
@@ -0,0 +1,96 @@
+{$IFNDEF M_TOOLBAR}
+{$DEFINE M_TOOLBAR}
+
+// Modern contact list toolbar
+
+const
+  TOOLBARBUTTON_ICONIDPREFIX          = 'MTB_';
+  TOOLBARBUTTON_ICONIDPRIMARYSUFFIX   = '_Primary';
+  TOOLBARBUTTON_ICONIDSECONDARYSUFFIX = '_Secondary';
+  TOOLBARBUTTON_ICONNAMEPRESSEDSUFFIX = 'Pressed';
+
+//button flags
+  TBBF_DISABLED    = 1 shl 0;
+  TBBF_VISIBLE     = 1 shl 1;
+  TBBF_PUSHED      = 1 shl 2;
+  TBBF_SHOWTOOLTIP = 1 shl 3;
+  TBBF_ISSEPARATOR = 1 shl 5;
+  TBBF_ISLBUTTON   = 1 shl 6;
+  TBBF_FLEXSIZESEPARATOR = TBBF_ISSEPARATOR or TBBF_PUSHED;
+
+type
+  _tagTBButton = record
+    cbSize              :int;       // size of structure
+    pszButtonID         :pAnsiChar; // char id of button used to store button info in DB and know about icon
+    pszButtonName       :pAnsiChar; // name of button (not translated)
+    pszServiceName      :pAnsiChar; // service name to be executed
+    lParam              :LPARAM;    // param of service to be called
+    pszTooltipUp        :pAnsiChar;
+    pszTooltipDn        :pAnsiChar;
+    defPos              :dword;     // default order pos of button (less values are nearer to
+                                    // edge)..please use values greater that 100. the default
+                                    // buttons has pos: 10,20..90
+    tbbFlags            :dword;     // combine of TBBF_ flags above
+    ParamDestructor     :procedure(var param); //will be called on parameters deletion
+    hPrimaryIconHandle  :THANDLE;
+    hSecondaryIconHandle:THANDLE;
+  end;
+  TBButton = _tagTBButton;
+
+const
+//////////////////////////////////////////////////////////////////////////
+// Events
+// Only after this event module subscribers should register their buttons
+// wparam=lparam=0
+// don't forget to return 0 to continue processing
+  ME_TB_MODULELOADED:PAnsiChar = 'ToolBar/ModuleLoaded';
+
+//////////////////////////////////////////////////////////////////////////
+// Services
+//
+//////////////////////////////////////////////////////////////////////////
+// Adding a button
+// WPARAM  = 0
+// LPARAM  = (TBButton *) &description
+// LRESULT = (HANDLE) hButton
+// in order to correctly process default icons via iconlib it should be
+// registered icolib icon with id named:
+// 'TBButton_'+pszButtonID+ 'Up' or +'Down' for Push (2-state) buttons
+  MS_TB_ADDBUTTON:PAnsiChar = 'ToolBar/AddButton';
+
+//////////////////////////////////////////////////////////////////////////
+// Remove button
+// WPARAM = (HANDLE) hButton;
+// LPARAM = 0;
+  MS_TB_REMOVEBUTTON:PAnsiChar = 'ToolBar/RemoveButton';
+
+//////////////////////////////////////////////////////////////////////////
+// SetState
+// WPARAM = (HANDLE) hButton;
+// LPARAM = one of below TBST_ states 
+// LRESULT= old state
+  TBST_PUSHED   = 1;
+  TBST_RELEASED = 0;
+  MS_TB_SETBUTTONSTATE:PAnsiChar = 'ToolBar/SetButtonState';
+
+//////////////////////////////////////////////////////////////////////////
+// SetStatebyId
+// WPARAM = (char *) szButtonID;
+// LPARAM = one of below TBST_ states 
+// LRESULT= old state
+  MS_TB_SETBUTTONSTATEBYID:PAnsiChar = 'ToolBar/SetButtonStateId';
+//////////////////////////////////////////////////////////////////////////
+// GetState
+// WPARAM = (HANLDE) hButton;
+// LPARAM = 0
+// LRESULT= current state
+  MS_TB_GETBUTTONSTATE:PAnsiChar = 'ToolBar/GetButtonState';
+
+//////////////////////////////////////////////////////////////////////////
+// GetState
+// WPARAM = (char *) szButtonID;
+// LPARAM = 0
+// LRESULT= current state
+  MS_TB_GETBUTTONSTATEBYID:PAnsiChar = 'ToolBar/GetButtonStateId';
+
+{$ENDIF}
-- 
cgit v1.2.3