From d83baeb842ea828eaee90a0cd6575872a95240e8 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Sat, 8 Mar 2014 13:10:05 +0000
Subject: Pascal-style type correction Letter case correction small fixes
 Actman UA part dialog slightly changed

git-svn-id: http://svn.miranda-ng.org/main/trunk@8473 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Watrack/players/pl_apollo.pas | 6 +++---
 plugins/Watrack/players/pl_behold.pas | 8 ++++----
 plugins/Watrack/players/pl_bs.pas     | 2 +-
 plugins/Watrack/players/pl_cowon.pas  | 4 ++--
 plugins/Watrack/players/pl_mpc.pas    | 2 +-
 plugins/Watrack/players/pl_mradio.pas | 2 +-
 plugins/Watrack/players/pl_winamp.pas | 2 +-
 7 files changed, 13 insertions(+), 13 deletions(-)

(limited to 'plugins/Watrack/players')

diff --git a/plugins/Watrack/players/pl_apollo.pas b/plugins/Watrack/players/pl_apollo.pas
index 360b23ab89..1658f48b1d 100644
--- a/plugins/Watrack/players/pl_apollo.pas
+++ b/plugins/Watrack/players/pl_apollo.pas
@@ -63,7 +63,7 @@ end;
 
 function GetFileName(wnd:HWND;flags:integer):pWideChar;cdecl;
 var
-  tmpwnd:hwnd;
+  tmpwnd:HWND;
   ps:array [0..255] of AnsiChar;
 begin
   if GetStatus(wnd)<>WAT_MES_STOPPED then
@@ -83,7 +83,7 @@ end;
 
 function GetWndText(wnd:HWND):pWideChar;
 var
-  tmpwnd:hwnd;
+  tmpwnd:HWND;
   ps:array [0..255] of AnsiChar;
 begin
   tmpwnd:=SendMessage(wnd,WM_APOLLO_COMMAND,APOLLO_GETCURRENTLYPLAYEDTITLE,0);
@@ -167,7 +167,7 @@ end;
 
 function GetRemoteTitle(wnd:HWND):pWideChar;
 var
-  tmpwnd:hwnd;
+  tmpwnd:HWND;
   ps:array [0..255] of AnsiChar;
   num:integer;
 begin
diff --git a/plugins/Watrack/players/pl_behold.pas b/plugins/Watrack/players/pl_behold.pas
index 977a021034..ddac43cfa1 100644
--- a/plugins/Watrack/players/pl_behold.pas
+++ b/plugins/Watrack/players/pl_behold.pas
@@ -55,7 +55,7 @@ end;
 
 function GetVersion(wnd:HWND):integer;
 begin
-  result:=DWORD(SendMessage(wnd,WM_BHCMD,WMBH_GETVERSION,0));
+  result:=dword(SendMessage(wnd,WM_BHCMD,WMBH_GETVERSION,0));
   result:=((result shr 16) shl 8)+LoWord(result);
 end;
 
@@ -92,7 +92,7 @@ end;
 
 function GetVolume(wnd:HWND):cardinal;
 begin
-  result:=WORD(SendMessage(wnd,WM_BHCMD,WMBH_GETVOLUME,0));
+  result:=word(SendMessage(wnd,WM_BHCMD,WMBH_GETVOLUME,0));
   result:=(result shl 16)+(result shr 12);
 end;
 
@@ -103,12 +103,12 @@ end;
 
 function VolDn(wnd:HWND):integer;
 begin
-  result:=WORD(SendMessage(wnd,WM_BHCMD,WMBH_VOLUMEDOWN,0));
+  result:=word(SendMessage(wnd,WM_BHCMD,WMBH_VOLUMEDOWN,0));
 end;
 
 function VolUp(wnd:HWND):integer;
 begin
-  result:=WORD(SendMessage(wnd,WM_BHCMD,WMBH_VOLUMEUP,0));
+  result:=word(SendMessage(wnd,WM_BHCMD,WMBH_VOLUMEUP,0));
 end;
 
 function GetInfo(var SongInfo:tSongInfo;flags:integer):integer;cdecl;
diff --git a/plugins/Watrack/players/pl_bs.pas b/plugins/Watrack/players/pl_bs.pas
index 7fd2e9c5e5..efcd6c26d4 100644
--- a/plugins/Watrack/players/pl_bs.pas
+++ b/plugins/Watrack/players/pl_bs.pas
@@ -36,7 +36,7 @@ const
 const
   bspwnd:HWND = 0;
 
-function HiddenWindProc(wnd:HWnd; msg:UINT;wParam:WPARAM;lParam:LPARAM):integer; stdcall;
+function HiddenWindProc(wnd:HWND; msg:uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;
 begin
   result:=DefWindowProc(wnd,msg,wParam,lParam);
 end;
diff --git a/plugins/Watrack/players/pl_cowon.pas b/plugins/Watrack/players/pl_cowon.pas
index 0977ea4b20..fb2d985038 100644
--- a/plugins/Watrack/players/pl_cowon.pas
+++ b/plugins/Watrack/players/pl_cowon.pas
@@ -69,7 +69,7 @@ const
   hostwnd :HWND = 0;
   tmpstr  :pWideChar=nil;
 
-function HiddenWindProc(wnd:HWnd; msg:UINT;wParam:WPARAM;lParam:LPARAM):integer; stdcall;
+function HiddenWindProc(wnd:HWND; msg:uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;
 var
   cds:PCOPYDATASTRUCT;
 begin
@@ -106,7 +106,7 @@ begin
   end;
 end;
 
-function chwnd(awnd:hwnd;param:pdword):boolean; stdcall;
+function chwnd(awnd:HWND;param:pdword):boolean; stdcall;
 var
   s:array [0..255] of AnsiChar;
 begin
diff --git a/plugins/Watrack/players/pl_mpc.pas b/plugins/Watrack/players/pl_mpc.pas
index a2127cea76..bd0fade514 100644
--- a/plugins/Watrack/players/pl_mpc.pas
+++ b/plugins/Watrack/players/pl_mpc.pas
@@ -19,7 +19,7 @@ begin
     result:=FindWindowEx(0,wnd,MPCClass98,NIL);
 end;
 
-function chwnd(awnd:hwnd;Param:pdword):boolean; stdcall;
+function chwnd(awnd:HWND;Param:pdword):boolean; stdcall;
 var
   s:array [0..31] of AnsiChar;
   i:integer;
diff --git a/plugins/Watrack/players/pl_mradio.pas b/plugins/Watrack/players/pl_mradio.pas
index 68589eb159..b694fb912c 100644
--- a/plugins/Watrack/players/pl_mradio.pas
+++ b/plugins/Watrack/players/pl_mradio.pas
@@ -75,7 +75,7 @@ begin
   CurrentStation:=db_find_first(playername);
   while CurrentStation<>0 do
   begin
-    i:=DBReadWord(CurrentStation,playername,'Status',WORD(-1));
+    i:=DBReadWord(CurrentStation,playername,'Status',word(-1));
     if i=ID_STATUS_ONLINE then
     begin
       result:=1;
diff --git a/plugins/Watrack/players/pl_winamp.pas b/plugins/Watrack/players/pl_winamp.pas
index 254475e09a..e107cb81f6 100644
--- a/plugins/Watrack/players/pl_winamp.pas
+++ b/plugins/Watrack/players/pl_winamp.pas
@@ -96,7 +96,7 @@ var
   pid:dword;
   op:THANDLE;
   buf:array [0..1023] of AnsiChar;
-  tmp:{$IFDEF FPC}LongWord{$ELSE}ulong_ptr{$ENDIF};
+  tmp:{$IFDEF FPC}longword{$ELSE}ulong_ptr{$ENDIF};
 begin
   result:=nil;
   if (flags and WAT_OPT_IMPLANTANT)<>0 then
-- 
cgit v1.2.3