From da87b3fa0479333cfe9505713f6ffaa54b9ba543 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Wed, 31 Dec 2014 17:08:47 +0000
Subject: pascal code: reformat, small fixes

git-svn-id: http://svn.miranda-ng.org/main/trunk@11700 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/ExternalAPI/delphi/m_actman.inc |  2 +-
 plugins/ExternalAPI/delphi/m_music.inc  | 26 +++++++++++++-------------
 plugins/ExternalAPI/delphi/m_text.inc   |  2 +-
 3 files changed, 15 insertions(+), 15 deletions(-)

(limited to 'plugins/ExternalAPI/delphi')

diff --git a/plugins/ExternalAPI/delphi/m_actman.inc b/plugins/ExternalAPI/delphi/m_actman.inc
index 6a65b9446a..757ce0965b 100644
--- a/plugins/ExternalAPI/delphi/m_actman.inc
+++ b/plugins/ExternalAPI/delphi/m_actman.inc
@@ -148,7 +148,7 @@ const
     wParam - repeat count
     lParam - unicode task name
     Return - old repeat count value
-    Note - works for all tasks with same started name
+    Note - works for all tasks with same started name. Returns old counter of last found task
   }
   MS_ACT_TASKCOUNT:PAnsiChar = 'Actions/TaskCount';
 
diff --git a/plugins/ExternalAPI/delphi/m_music.inc b/plugins/ExternalAPI/delphi/m_music.inc
index d881708eef..f1cf3540fc 100644
--- a/plugins/ExternalAPI/delphi/m_music.inc
+++ b/plugins/ExternalAPI/delphi/m_music.inc
@@ -44,21 +44,21 @@ type
 type
   pSongInfo=^tSongInfo;
   tSongInfo = record
-    artist   :pWideChar;
-    title    :pWideChar;
-    album    :pWideChar;
-    genre    :pWideChar;
-    comment  :pWideChar;
-    year     :pWideChar;
-    mfile    :pWideChar; // media file
+    artist   :PWideChar;
+    title    :PWideChar;
+    album    :PWideChar;
+    genre    :PWideChar;
+    comment  :PWideChar;
+    year     :PWideChar;
+    mfile    :PWideChar; // media file
     kbps     :dword;
     khz      :dword;
     channels :dword;
     track    :dword;
     total    :dword;     // music length
     time     :dword;     // elapsed time
-    wndtext  :pWideChar; // window title
-    player   :pWideChar; // player name
+    wndtext  :PWideChar; // window title
+    player   :PWideChar; // player name
     plyver   :dword;     // player version
     icon     :HICON;     // player icon
     fsize    :dword;     // media file size
@@ -71,9 +71,9 @@ type
     height   :dword;
     fps      :dword;
     date     :int64;
-    txtver   :pWideChar;
-    lyric    :pWideChar;
-    cover    :pWideChar; // cover path
+    txtver   :PWideChar;
+    lyric    :PWideChar;
+    cover    :PWideChar; // cover path
     volume   :dword;
     url      :PWideChar; // player homepage
     winampwnd:HWND;
@@ -310,7 +310,7 @@ type
   tInitProc    = function():integer;cdecl;
   tDeInitProc  = function():integer;cdecl;
   tStatusProc  = function(wnd:HWND):integer;cdecl;
-  tNameProc    = function(wnd:HWND;flags:integer):pWideChar;cdecl;
+  tNameProc    = function(wnd:HWND;flags:integer):PWideChar;cdecl;
   tCheckProc   = function(wnd:HWND;flags:integer):HWND;cdecl;
   tInfoProc    = function(var SongInfo:tSongInfo;flags:integer):integer;cdecl;
   tCommandProc = function(wnd:HWND;command:integer;value:integer):integer;cdecl;
diff --git a/plugins/ExternalAPI/delphi/m_text.inc b/plugins/ExternalAPI/delphi/m_text.inc
index 5847cd92e1..11d6a5f0b0 100644
--- a/plugins/ExternalAPI/delphi/m_text.inc
+++ b/plugins/ExternalAPI/delphi/m_text.inc
@@ -40,7 +40,7 @@ type
 
     Register   :function(const userTitle:PAnsiChar; options:dword):THANDLE; stdcall;
     Create     :function(userHandle:THANDLE; text:pointer):THANDLE; stdcall;
-    CreateEx   :function(userHandle:THANDLE; hContact:TMCONTACT; text:pointer; flags:dword):THANDLE; stdcall;
+    CreateEx   :function(userHandle:THANDLE; text:pointer; flags:dword):THANDLE; stdcall;
     Measure    :function(dc:HDC; sz:PSIZE; text:THANDLE):int; stdcall;
     Display    :function(dc:HDC; pos:TPOINT; sz:TSIZE; text:THANDLE):int; stdcall;
     SetParent  :function(text:THANDLE; hwnd:HWND; rect:TRECT):int; stdcall;
-- 
cgit v1.2.3