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

1 files changed, 3 insertions, 2 deletions

diff --git a/plugins/Watrack/kolframe/frm_dlg1.inc b/plugins/Watrack/kolframe/frm_dlg1.inc
index 401e04536d..8759ac059c 100644
--- a/plugins/Watrack/kolframe/frm_dlg1.inc
+++ b/plugins/Watrack/kolframe/frm_dlg1.inc
@@ -19,7 +19,7 @@ begin
   move(buf,result^,size);

 end;

 

-procedure SwitchBk(Dialog:hwnd);

+procedure SwitchBk(Dialog:HWND);

 var

   en:boolean;

 begin

@@ -38,7 +38,7 @@ begin
   EnableWindow(GetDlgItem(Dialog,IDC_USECOVER ),en);

 end;

 

-function FrameViewDlg(Dialog:HWnd; hMessage,wParam,lParam:DWord):integer; stdcall;

+function FrameViewDlg(Dialog:HWND; hMessage:uint; wParam:WPARAM; lParam:LPARAM):LRESULT; stdcall;

 const

   DlgInited:boolean=false;

 var

@@ -201,6 +201,7 @@ begin
         buf1^:=#0;

         buf:=GetDlgText(Dialog,IDC_FRMBKPIC,true);

         PathToRelative(buf,buf1);

+//        CallService(MS_UTILS_PATHTORELATIVE,twparam(buf),tlparam(buf1));

         if StrCmp(buf1,D.BkDefFile)<>0 then

         begin

           mFreeMem(D.BkDefFile);