diff options
| author | Kirill Volinsky <mataes2007@gmail.com> | 2012-10-09 05:20:49 +0000 |
|---|---|---|
| committer | Kirill Volinsky <mataes2007@gmail.com> | 2012-10-09 05:20:49 +0000 |
| commit | faf1e494a31b70203aa67d34602f5256eabe0336 (patch) | |
| tree | b222ebe08c9173c1ba2811bcad4f47369d0e4f38 /plugins/ExternalAPI/delphi/m_tipper.inc | |
| parent | 302209a17a9f5342a377904cda699fd3833bbe9a (diff) | |
Test commit:
delphi headers structure as c headers structure
git-svn-id: http://svn.miranda-ng.org/main/trunk@1829 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/ExternalAPI/delphi/m_tipper.inc')
| -rw-r--r-- | plugins/ExternalAPI/delphi/m_tipper.inc | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/plugins/ExternalAPI/delphi/m_tipper.inc b/plugins/ExternalAPI/delphi/m_tipper.inc new file mode 100644 index 0000000000..d9fea8208d --- /dev/null +++ b/plugins/ExternalAPI/delphi/m_tipper.inc @@ -0,0 +1,51 @@ +{
+ Tipper API
+ note: Tipper is internally unicode and requires unicows.dll to function
+ correctly on 95/98/ME so you'll find a lot of wchar_t stuff in here
+
+ translation function type
+ use hContact, module and setting to read your db value(s) and put the resulting
+ string into buff return buff if the translation was successful, or return 0 for failure
+}
+{$IFNDEF M_TIPPER}
+{$DEFINE M_TIPPER}
+type
+ TranslateFunc = function (hContact:THANDLE;module:PAnsiChar;setting_or_prefix:PAnsiChar;
+ buff:pWideChar;bufflen:int):pWideChar; cdecl;
+
+type
+ PDBVTranslation = ^TDBVTranslation;
+ TDBVTranslation = record
+ tfunc:TranslateFunc; // address of your translation function (see typedef above)
+ name :pWideChar; // make sure this is unique, and DO NOT translate it
+ id :dword; // will be overwritten by Tipper - do not use
+ end;
+
+{
+ add a translation to tipper
+ wParam not used
+ lParam = pointer to PDBVTranslation
+}
+const
+ MS_TIPPER_ADDTRANSLATION:PAnsiChar = 'Tipper/AddTranslation';
+
+{
+ Show tooltip
+ wParam - optional (PAnsiChar) text for text-only tips
+ lParam - (PCLCINFOTIP) infoTip
+}
+ MS_TIPPER_SHOWTIP:PAnsiChar = 'mToolTip/ShowTip';
+
+{
+ unicode extension to the basic functionality
+ wParam - optional (pWideChar) text for text-only tips
+ lParam - (PCLCINFOTIP) infoTip
+}
+ MS_TIPPER_SHOWTIPW:PAnsiChar = 'mToolTip/ShowTipW';
+
+{
+ wParam=lParam=0;
+}
+ MS_TIPPER_HIDETIP:PAnsiChar = 'mToolTip/HideTip';
+
+{$ENDIF}
|