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

7 files changed, 13 insertions, 13 deletions

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