old/unused types removed from Pascal sources

git-svn-id: http://svn.miranda-ng.org/main/trunk@8267 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

6 files changed, 14 insertions, 14 deletions

diff --git a/plugins/ExternalAPI/delphi/m_sessions.inc b/plugins/ExternalAPI/delphi/m_sessions.inc
index 0cc18a0d33..21794e88ee 100644
--- a/plugins/ExternalAPI/delphi/m_sessions.inc
+++ b/plugins/ExternalAPI/delphi/m_sessions.inc
@@ -325,7 +325,7 @@ UI   : displays the modes that the channel is in, the modes still have to be abs
 PROTO: sends a CHANNEL_DONE

 UI   : the UI is now sure that no more messages are expected.

 

-UI   : sends a UI_TEXT message, with optional source HCONTACT and of course the message.

+UI   : sends a UI_TEXT message, with optional source MCONTACT and of course the message.

 PROTO: picks up on this message and transmits it, it must return

        a HPROCESS code that is later acknowledged.

 

@@ -339,8 +339,8 @@ UI   : sends UI_IAMTYPING
 PROTO: the protocol may or may not send this message to the other parties

        but it must process it, this message is also optional.

 

-PROTO: sends UI_CONTACT_ISTYPING (source HCONTACT)

-UI   : an HCONTACT within the session is typing, the UI may elect to show this

+PROTO: sends UI_CONTACT_ISTYPING (source MCONTACT)

+UI   : an MCONTACT within the session is typing, the UI may elect to show this

        message in a status bar, or with a visual effect.	    	

 }

 

diff --git a/plugins/ExternalAPI/delphi/m_smileyadd.inc b/plugins/ExternalAPI/delphi/m_smileyadd.inc
index 4562f575f1..a620b1219a 100644
--- a/plugins/ExternalAPI/delphi/m_smileyadd.inc
+++ b/plugins/ExternalAPI/delphi/m_smileyadd.inc
@@ -41,7 +41,7 @@ type
        // If not found or NULL, "Standard" will be used

     flags              :uint;       // Flags (SAFLRE_*) that define the behaivior

     disableRedraw      :BOOL;       // Parameter have been depricated, have no effect on operation

-    hContact           :HCONTACT;   // Contact handle

+    hContact           :MCONTACT;   // Contact handle

   end;

 

 {

@@ -71,7 +71,7 @@ type
     targetWParam : LPARAM;    // Target WParam to be sent (LParam will be PAnsiChar to

                               // select smiley) see the example file.

     hwndParent   : HWND;      // Parent window for smiley dialog

-    hContact     : HCONTACT;  // Contact handle

+    hContact     : MCONTACT;  // Contact handle

   end;

 

 {

@@ -98,7 +98,7 @@ type
      // do not destroy! NULL if the buttonicon is not defined...

     NumberOfVisibleSmileys: int;       // Number of visible smileys defined.

     NumberOfSmileys       : int;       // Number of total smileys defined

-    hContact              : HCONTACT;  //Contact handle

+    hContact              : MCONTACT;  //Contact handle

   end;

 

 const

@@ -129,7 +129,7 @@ type
     numSmileys  :uint;      // Number of Smileys found, this parameter filled by SmileyAdd

     oflag       :uint;      // One of the SAFL_ flags specifies content of the parse results

                             // this parameter filled by SmileyAdd

-    hContact    :HCONTACT;  // Contact handle

+    hContact    :MCONTACT;  // Contact handle

   end;

 

 type

@@ -237,7 +237,7 @@ const
 type

   SMADD_CONT = record

     cbSize  :uint;

-    hContact:HCONTACT;

+    hContact:MCONTACT;

     _type   :int;      // 0 - directory, 1 - file;

     path    :TChar;    // smiley category name for reference

   end;

diff --git a/plugins/ExternalAPI/delphi/m_spamfilter.inc b/plugins/ExternalAPI/delphi/m_spamfilter.inc
index 1e15f7fec4..b0245f6650 100644
--- a/plugins/ExternalAPI/delphi/m_spamfilter.inc
+++ b/plugins/ExternalAPI/delphi/m_spamfilter.inc
@@ -362,7 +362,7 @@ type
                                // checked for spam. Can be NULL.

     dwFlags          :DWORD;   // Flags for the spam checking.  (For more details see below.)

     case LongInt of

-     0: (hContact: HCONTACT);  // Handle to the sending contact (use pszUserName

+     0: (hContact: MCONTACT);  // Handle to the sending contact (use pszUserName

                                // instead if no hContact is available)

      1: (UserName: TChar);     // Name of the user, e.g. nick (set SCDF_NO_CONTACT

                                // in the flags to use this parameter) -> should

diff --git a/plugins/ExternalAPI/delphi/m_tipper.inc b/plugins/ExternalAPI/delphi/m_tipper.inc
index 452904113d..737ae5cad1 100644
--- a/plugins/ExternalAPI/delphi/m_tipper.inc
+++ b/plugins/ExternalAPI/delphi/m_tipper.inc
@@ -10,7 +10,7 @@
 {$IFNDEF M_TIPPER}

 {$DEFINE M_TIPPER}

 type

-  TranslateFunc = function (hContact:HCONTACT;module:PAnsiChar;setting_or_prefix:PAnsiChar;

+  TranslateFunc = function (hContact:MCONTACT;module:PAnsiChar;setting_or_prefix:PAnsiChar;

        buff:pWideChar;bufflen:int):pWideChar; cdecl;

 

 type

diff --git a/plugins/ExternalAPI/delphi/m_variables.inc b/plugins/ExternalAPI/delphi/m_variables.inc
index 3d4f1ae940..233853d149 100644
--- a/plugins/ExternalAPI/delphi/m_variables.inc
+++ b/plugins/ExternalAPI/delphi/m_variables.inc
@@ -56,7 +56,7 @@ type
     szExtraText:TCHAR;       // Extra, context-specific string (can be NULL) ->

                              // The field "extratext" will be replaced by this

                              // string. (Previously szSource).

-    hContact   :HCONTACT;    // Handle to contact (can be NULL) -> The field "subject"

+    hContact   :MCONTACT;    // Handle to contact (can be NULL) -> The field "subject"

                              // represents this contact.

     pCount     :int;         // (output) Number of succesful parsed tokens, needs to

                              // be set to 0 before the call

diff --git a/plugins/ExternalAPI/delphi/m_yamn.inc b/plugins/ExternalAPI/delphi/m_yamn.inc
index a44debb669..300f5a3dac 100644
--- a/plugins/ExternalAPI/delphi/m_yamn.inc
+++ b/plugins/ExternalAPI/delphi/m_yamn.inc
@@ -101,7 +101,7 @@ const
 //

 //Event is fired when there is a double click on a CList contact,

 //it is upto the caller to check for the protocol & status

-//of the HCONTACT, it's not done for you anymore since it didn't make

+//of the MCONTACT, it's not done for you anymore since it didn't make

 //sense to store all this information in memory, etc.

   MS_YAMN_CLISTCONTEXT = 'YAMN/Service/ClistContactContextMenu';

 

@@ -111,7 +111,7 @@ const
 //

 //Event is fired when there is a double click on a CList contact,

 //it is upto the caller to check for the protocol & status

-//of the HCONTACT, it's not done for you anymore since it didn't make

+//of the MCONTACT, it's not done for you anymore since it didn't make

 //sense to store all this information in memory, etc.

   MS_YAMN_CLISTCONTEXTAPP = 'YAMN/Service/ClistContactContextMenuApp';

 

@@ -121,7 +121,7 @@ const
 //

 //Event is fired when there is a double click on a CList contact,

 //it is upto the caller to check for the protocol & status

-//of the HCONTACT, it's not done for you anymore since it didn't make

+//of the MCONTACT, it's not done for you anymore since it didn't make

 //sense to store all this information in memory, etc.

   MS_YAMN_CLISTDBLCLICK = 'YAMN/Service/ClistContactDoubleclicked';