diff options
author | George Hazan <george.hazan@gmail.com> | 2013-03-01 23:11:39 +0000 |
---|---|---|
committer | George Hazan <george.hazan@gmail.com> | 2013-03-01 23:11:39 +0000 |
commit | 8ef40f0bd018c6f9295977c206714db8d1e6159c (patch) | |
tree | 2acbdcb3743bb4d1b6bbfc49953cc164b11a6089 /plugins/Watrack | |
parent | 427891e0d28becb428ae8435954399f2e4daa9fe (diff) |
code cleanup for pascal plugins
git-svn-id: http://svn.miranda-ng.org/main/trunk@3828 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Watrack')
-rw-r--r-- | plugins/Watrack/kolframe/frm_dlg1.inc | 2 | ||||
-rw-r--r-- | plugins/Watrack/stat/statlog.pas | 7 | ||||
-rw-r--r-- | plugins/Watrack/waticons.pas | 6 |
3 files changed, 3 insertions, 12 deletions
diff --git a/plugins/Watrack/kolframe/frm_dlg1.inc b/plugins/Watrack/kolframe/frm_dlg1.inc index 19f590af66..08028a3356 100644 --- a/plugins/Watrack/kolframe/frm_dlg1.inc +++ b/plugins/Watrack/kolframe/frm_dlg1.inc @@ -200,7 +200,7 @@ begin mGetMem(buf1,1024{*SizeOf(WideChar)});
buf1^:=#0;
buf:=GetDlgText(Dialog,IDC_FRMBKPIC,true);
- CallService(MS_UTILS_PATHTORELATIVE,dword(buf),dword(buf1));
+ CallService(MS_UTILS_PATHTORELATIVE,wparam(buf),lparam(buf1));
if StrCmp(buf1,D.BkDefFile)<>0 then
begin
mFreeMem(D.BkDefFile);
diff --git a/plugins/Watrack/stat/statlog.pas b/plugins/Watrack/stat/statlog.pas index 50af34508d..fa49bc5fb0 100644 --- a/plugins/Watrack/stat/statlog.pas +++ b/plugins/Watrack/stat/statlog.pas @@ -358,7 +358,7 @@ begin begin
CurCell^.next:=Cell;
CurCell:=Cell;
- end;
+ end;
end;
end;
inc(p,2); p1:=p;
@@ -414,7 +414,6 @@ var begin
Lock:=true;
ConvertFileName(fname,buf1);
-// CallService(MS_UTILS_PATHTOABSOLUTE,dword(fname),dword(@buf1));
Root:=BuildTree(buf1,buf);
if Root<>nil then
begin
@@ -459,7 +458,6 @@ begin else
fname:=PAnsiChar(wParam);
ConvertFileName(fname,log);
-// CallService(MS_UTILS_PATHTOABSOLUTE,dword(fname),dword(@log));
AppendStat(log,pSongInfo(lParam));
end;
@@ -491,9 +489,6 @@ begin ConvertFileName(r,report);
ConvertFileName(l,template);
ConvertFileName(StatName,log);
-// CallService(MS_UTILS_PATHTOABSOLUTE,dword(r),dword(@report));
-// CallService(MS_UTILS_PATHTOABSOLUTE,dword(l),dword(@template));
-// CallService(MS_UTILS_PATHTOABSOLUTE,dword(StatName),dword(@log));
if DoAddExt=BST_CHECKED then
ChangeExt(report,'htm');
if StatOut(report,log,template) then
diff --git a/plugins/Watrack/waticons.pas b/plugins/Watrack/waticons.pas index 5b61af18dd..94b511767e 100644 --- a/plugins/Watrack/waticons.pas +++ b/plugins/Watrack/waticons.pas @@ -51,14 +51,12 @@ var begin
result:=true;
sid.szDefaultFile.a:='icons\'+ICOCtrlName;
-// ConvertFileName(sid.szDefaultFile.a,buf);
CallService(MS_UTILS_PATHTOABSOLUTE,wparam(sid.szDefaultFile),lparam(@buf));
hIconDLL:=LoadLibraryA(buf);
if hIconDLL=0 then // not found
begin
sid.szDefaultFile.a:='plugins\'+ICOCtrlName;
-// ConvertFileName(sid.szDefaultFile.a,buf);
CallService(MS_UTILS_PATHTOABSOLUTE,wparam(sid.szDefaultFile),lparam(@buf));
hIconDLL:=LoadLibraryA(buf);
end;
@@ -107,7 +105,7 @@ const ((descr:'Play' ;name:'WATrack_Play' ; id:IDI_PLAY_NORMAL),
(descr:'Play Hovered' ;name:'WATrack_PlayH' ; id:IDI_PLAY_HOVERED),
(descr:'Play Pushed' ;name:'WATrack_PlayP' ; id:IDI_PLAY_PRESSED)),
-
+
((descr:'Pause' ;name:'WATrack_Pause' ; id:IDI_PAUSE_NORMAL),
(descr:'Pause Hovered' ;name:'WATrack_PauseH' ; id:IDI_PAUSE_HOVERED),
(descr:'Pause Pushed' ;name:'WATrack_PauseP' ; id:IDI_PAUSE_PRESSED)),
@@ -144,14 +142,12 @@ begin if not IconsLoaded then
begin
path:='icons\'+ICOCtrlName;
-// ConvertFileName(sid.szDefaultFile.a,buf);
CallService(MS_UTILS_PATHTOABSOLUTE,wparam(path),lparam(@buf));
hIconDLL:=LoadLibraryA(buf);
if hIconDLL=0 then // not found
begin
sid.szDefaultFile.a:='plugins\'+ICOCtrlName;
-// ConvertFileName(sid.szDefaultFile.a,buf);
CallService(MS_UTILS_PATHTOABSOLUTE,wparam(path),lparam(@buf));
hIconDLL:=LoadLibraryA(buf);
end;
|