diff options
author | Alexey Kulakov <panda75@bk.ru> | 2014-12-31 17:08:47 +0000 |
---|---|---|
committer | Alexey Kulakov <panda75@bk.ru> | 2014-12-31 17:08:47 +0000 |
commit | da87b3fa0479333cfe9505713f6ffaa54b9ba543 (patch) | |
tree | d4868e4947c3944bb3313a057ec3b189a876018f /plugins/Watrack/players/pl_mpc.pas | |
parent | f33f9ebac9806cba6bfd89715566a65c29b5fee2 (diff) |
pascal code: reformat, small fixes
git-svn-id: http://svn.miranda-ng.org/main/trunk@11700 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins/Watrack/players/pl_mpc.pas')
-rw-r--r-- | plugins/Watrack/players/pl_mpc.pas | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/plugins/Watrack/players/pl_mpc.pas b/plugins/Watrack/players/pl_mpc.pas index bd0fade514..f5ac986c28 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
|