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, 7 insertions, 8 deletions

diff --git a/include/delphi/m_api.pas b/include/delphi/m_api.pas
index 94ff48a9c3..dad86df80c 100644
--- a/include/delphi/m_api.pas
+++ b/include/delphi/m_api.pas
@@ -72,7 +72,7 @@ type
   plong     = ^long;

   {$IFDEF VER150}

   UnicodeString = WideString;

-  ULONG_PTR = LongWord;

+  ULONG_PTR = longword;

   {$ENDIF}

   DWORD_PTR = ULONG_PTR;

   size_t    = ULONG_PTR;

@@ -83,13 +83,13 @@ type
   int       = integer;

 //  uint     = Cardinal;

 //  pint     = ^int;

-//  WPARAM   = Integer;

-//  LPARAM   = Integer;

+//  WPARAM   = integer;

+//  LPARAM   = integer;

   TLPARAM   = LPARAM;

   TWPARAM   = WPARAM;

 

 // My definitions

-  TWNDPROC = function (Dialog:HWnd; hMessage:uint; wParam:WPARAM;lParam:LPARAM):lresult; stdcall;

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

 

 type

   PTChar = ^TChar;

@@ -129,7 +129,7 @@ type
   TPLUGININFOEX = record

     cbSize     :int;

     shortName  :PAnsiChar;

-    version    :DWORD;

+    version    :dword;

     description:PAnsiChar;

     author     :PAnsiChar;

     authorEmail:PAnsiChar;

@@ -149,7 +149,7 @@ type
   //lParam=HINSTANCE of the loaded plugin

 }

 const

-  ME_SYSTEM_MODULELOAD:pAnsiChar = 'Miranda/System/LoadModule';

+  ME_SYSTEM_MODULELOAD:PAnsiChar = 'Miranda/System/LoadModule';

 

 {

   Miranda/System/UnloadModule event

@@ -157,7 +157,7 @@ const
   wParam=PLUGININFOEX*

   lParam=HINSTANCE of the loaded plugin

 }

-  ME_SYSTEM_MODULEUNLOAD:pAnsiChar = 'Miranda/System/UnloadModule';

+  ME_SYSTEM_MODULEUNLOAD:PAnsiChar = 'Miranda/System/UnloadModule';

 

 {

   Each service mode plugin must implement MS_SERVICEMODE_LAUNCH

@@ -235,7 +235,6 @@ var
   {$include m_descbutton.inc}

   {$include m_iconheader.inc}

   {$include m_extraicons.inc}

-  {$include m_errors.inc}

   {$include m_proto_listeningto.inc}

   {$include m_toptoolbar.inc}

   {$include m_msg_buttonsbar.inc}