From d83baeb842ea828eaee90a0cd6575872a95240e8 Mon Sep 17 00:00:00 2001 From: Alexey Kulakov 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/lastfm/i_last_api.inc | 8 ++++---- plugins/Watrack/lastfm/i_last_dlg.inc | 2 +- plugins/Watrack/lastfm/lastfm.pas | 4 ++-- 3 files changed, 7 insertions(+), 7 deletions(-) (limited to 'plugins/Watrack/lastfm') diff --git a/plugins/Watrack/lastfm/i_last_api.inc b/plugins/Watrack/lastfm/i_last_api.inc index 1f934646a3..ec42acfeeb 100644 --- a/plugins/Watrack/lastfm/i_last_api.inc +++ b/plugins/Watrack/lastfm/i_last_api.inc @@ -223,7 +223,7 @@ begin end; var - xmlparser:XML_API_W; + xmlparser:TXML_API_W; function FixInfo(info:pWideChar):pWideChar; var @@ -300,7 +300,7 @@ begin begin UTF8ToWide(res,pcw); mFreeMem(res); - xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(XML_API_W); + xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(TXML_API_W); CallService(MS_SYSTEM_GET_XI,0,lparam(@xmlparser)); with xmlparser do begin @@ -424,7 +424,7 @@ begin begin UTF8ToWide(res,pcw); mFreeMem(res); - xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(XML_API_W); + xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(TXML_API_W); CallService(MS_SYSTEM_GET_XI,0,lparam(@xmlparser)); with xmlparser do begin @@ -533,7 +533,7 @@ begin begin UTF8ToWide(res,pcw); mFreeMem(res); - xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(XML_API_W); + xmlparser.cbSize:={XML_API_SIZEOF_V1;//}SizeOf(TXML_API_W); CallService(MS_SYSTEM_GET_XI,0,lparam(@xmlparser)); with xmlparser do begin diff --git a/plugins/Watrack/lastfm/i_last_dlg.inc b/plugins/Watrack/lastfm/i_last_dlg.inc index b72545843e..ee1f96092f 100644 --- a/plugins/Watrack/lastfm/i_last_dlg.inc +++ b/plugins/Watrack/lastfm/i_last_dlg.inc @@ -37,7 +37,7 @@ begin mFreeMem(data.image); end; -function DlgProcOptions(Dialog:HWnd;hMessage:UINT;wParam:WPARAM;lParam:LPARAM):lresult; stdcall; +function DlgProcOptions(Dialog:HWND;hMessage:uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall; var tmp:longbool; bmp,wnd:HWND; diff --git a/plugins/Watrack/lastfm/lastfm.pas b/plugins/Watrack/lastfm/lastfm.pas index d2a5cbc8a7..46098c558b 100644 --- a/plugins/Watrack/lastfm/lastfm.pas +++ b/plugins/Watrack/lastfm/lastfm.pas @@ -73,7 +73,7 @@ begin if (lfm_login <>nil) and (lfm_login^ <>#0) and (lfm_password<>nil) and (lfm_password^<>#0) then - mir_forkthread(@ThScrobble,nil); + {CloseHandle}(mir_forkthread(@ThScrobble,nil)); end; function NewPlStatus(wParam:WPARAM;lParam:LPARAM):int;cdecl; @@ -118,7 +118,7 @@ begin end; WAT_EVENT_PLAYERSTATUS: begin - case Integer(loword(lParam)) of + case integer(loword(lParam)) of WAT_PLS_NOMUSIC,WAT_PLS_NOTFOUND: begin if hTimer<>0 then begin -- cgit v1.2.3