diff options
author | Vadim Dashevskiy <watcherhd@gmail.com> | 2014-12-31 22:11:10 +0000 |
---|---|---|
committer | Vadim Dashevskiy <watcherhd@gmail.com> | 2014-12-31 22:11:10 +0000 |
commit | ec7b7cf1c956bf17b60d788d73530fcbd12bf51f (patch) | |
tree | 45450baf5b76d8e57b9f198cb1fd9f8db9a6d31f /plugins/Watrack/players | |
parent | 813851def848b52b92f59c379706ada6bebceba9 (diff) |
temporary revert
git-svn-id: http://svn.miranda-ng.org/main/trunk@11705 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Watrack/players')
-rw-r--r-- | plugins/Watrack/players/pl_cowon.pas | 32 | ||||
-rw-r--r-- | plugins/Watrack/players/pl_mpc.pas | 8 |
2 files changed, 20 insertions, 20 deletions
diff --git a/plugins/Watrack/players/pl_cowon.pas b/plugins/Watrack/players/pl_cowon.pas index 5ee5ab4be6..0ac7027426 100644 --- a/plugins/Watrack/players/pl_cowon.pas +++ b/plugins/Watrack/players/pl_cowon.pas @@ -65,8 +65,8 @@ const GET_STATUS_JETAUDIO_VER3 = 997;
const
- TitleWnd:HWND = 0;
- HostWnd :HWND = 0;
+ titlewnd:HWND = 0;
+ hostwnd :HWND = 0;
tmpstr :pWideChar=nil;
function HiddenWindProc(wnd:HWND; msg:uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;
@@ -90,19 +90,19 @@ end; function Init:integer;cdecl;
begin
- HostWnd:=CreateWindowExW(0,'STATIC',nil,0,1,1,1,1,HWND_MESSAGE,0,hInstance,nil);
- if HostWnd<>0 then
- SetWindowLongPtrW(HostWnd,GWL_WNDPROC,LONG_PTR(@HiddenWindProc));
- result:=HostWnd;
+ hostwnd:=CreateWindowExW(0,'STATIC',nil,0,1,1,1,1,HWND_MESSAGE,0,hInstance,nil);
+ if hostwnd<>0 then
+ SetWindowLongPtrW(hostwnd,GWL_WNDPROC,LONG_PTR(@HiddenWindProc));
+ result:=hostwnd;
end;
function DeInit:integer;cdecl;
begin
result:=0;
- if HostWnd<>0 then
+ if hostwnd<>0 then
begin
- DestroyWindow(HostWnd);
- HostWnd:=0;
+ DestroyWindow(hostwnd);
+ hostwnd:=0;
end;
end;
@@ -134,8 +134,8 @@ begin result:=FindWindow(PluginClass,PluginName);
}
if (result<>0) {and (result<>wnd)} then
- if EnumWindows(@chwnd,int_ptr(@TitleWnd)) then
- TitleWnd:=0;
+ if EnumWindows(@chwnd,int_ptr(@titlewnd)) then
+ titlewnd:=0;
end;
function GetWndText:pWideChar;
@@ -143,9 +143,9 @@ var p:pWideChar;
begin
result:=nil;
- if TitleWnd<>0 then
+ if titlewnd<>0 then
begin
- result:=GetDlgText(TitleWnd);
+ result:=GetDlgText(titlewnd);
if result<>nil then
begin
if StrScanW(result,'[')<>nil then
@@ -205,19 +205,19 @@ end; function GetFileName(wnd:HWND;flags:integer):pWideChar;cdecl;
begin
- SendMessage(wnd,WM_REMOCON_GETSTATUS,HostWnd,GET_STATUS_TRACK_FILENAME);
+ SendMessage(wnd,WM_REMOCON_GETSTATUS,hostwnd,GET_STATUS_TRACK_FILENAME);
result:=tmpstr;
end;
function GetArtist(wnd:HWND):pWideChar;
begin
- SendMessage(wnd,WM_REMOCON_GETSTATUS,HostWnd,GET_STATUS_TRACK_ARTIST);
+ SendMessage(wnd,WM_REMOCON_GETSTATUS,hostwnd,GET_STATUS_TRACK_ARTIST);
result:=tmpstr;
end;
function GetTitle(wnd:HWND):pWideChar;
begin
- SendMessage(wnd,WM_REMOCON_GETSTATUS,HostWnd,GET_STATUS_TRACK_TITLE);
+ SendMessage(wnd,WM_REMOCON_GETSTATUS,hostwnd,GET_STATUS_TRACK_TITLE);
result:=tmpstr;
end;
diff --git a/plugins/Watrack/players/pl_mpc.pas b/plugins/Watrack/players/pl_mpc.pas index f5ac986c28..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;
@@ -29,14 +29,14 @@ begin i:=StrIndex(PAnsiChar(@s),' / ');
if i<>0 then
begin
- if param^=0 then
+ if Param^=0 then
begin
s[i-1]:=#0;
- param^:=TimeToInt(s);
+ Param^:=TimeToInt(s);
end
else
begin
- param^:=TimeToInt(s+i+2);
+ Param^:=TimeToInt(s+i+2);
end;
result:=false;
end
|