home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / netz / netware / nwmess.pa1 < prev    next >
Text File  |  1992-03-02  |  4KB  |  84 lines
  1. {!R! FONT 15; FTMD 15; EXIT;}
  2.  
  3.  
  4. {***************************************************************************}
  5. {** Program : NWMESS                                                      **}
  6. {***************************************************************************}
  7. {** Version : 1.3             ** Started : 11/11/91  ** Ended :   /  /    **}
  8. {***************************************************************************}
  9. {******************************** Description ******************************}
  10. {***************************************************************************}
  11. {** OOP library for Netware API                                           **}
  12. {**                                                                       **}
  13. {** This unit forms the second level object : MESSAGE                     **}
  14. {** This object is a descandent of          : NETWARE                     **}
  15. {**                                                                       **}
  16. {**                                                                       **}
  17. {**                                                                       **}
  18. {**                                                                       **}
  19. {***************************************************************************}
  20. {******************************** Information ******************************}
  21. {***************************************************************************}
  22. {** Provides Netware Messaging Services                                   **}
  23. {**                                                                       **}
  24. {**                                                                       **}
  25. {**                                                                       **}
  26. {** This code is (c) 1991,1992 Tony Covelli                               **}
  27. {** Portions (c) Novell Inc,                                              **}
  28. {**                                                                       **}
  29. {**                                                                       **}
  30. {***************************************************************************}
  31.  
  32. {$I NETWARE.INC}
  33.  
  34. UNIT NWMESS;
  35.  
  36. INTERFACE
  37.  
  38. USES
  39.  
  40.   netware, nwvar;
  41.  
  42. TYPE
  43.  
  44.   pMessageOBJ = ^MessageOBJ;
  45.   MessageOBJ  = object (NetwareOBJ)
  46.  
  47.     CONSTRUCTOR Init;
  48.  
  49.     FUNCTION    BroadcastToConsole   (Message : ConsoleMessageType) : WORD;
  50.  
  51.     FUNCTION    CheckPipeStatus      (ConnectionList : ConnectionListType; VAR ResultList : ConnectionListType;
  52.                                       VAR ConnectionCount : BYTE) : WORD;
  53.  
  54.     FUNCTION    CloseMessagePipe     (ConnectionList : ConnectionListType; VAR ResultList : ConnectionListType;
  55.                                       VAR ConnectionCount : BYTE) : WORD;
  56.  
  57.     FUNCTION    DisableBroadcasts : WORD;
  58.  
  59.     FUNCTION    EnableBroadcasts : WORD;
  60.  
  61.     FUNCTION    GetBroadcastMessage  (VAR Message : BroadcastMessageType) : WORD;
  62.  
  63.     FUNCTION    GetBroadcastMode : WORD;
  64.  
  65.     FUNCTION    GetPersonalMessage   (VAR Message : PersonalMessageType; VAR SourceConnection : WORD) : WORD;
  66.  
  67.     FUNCTION    LogNetworkMessage    (Message : ConsoleMessageType) : WORD;
  68.  
  69.     FUNCTION    OpenMessagePipe      (ConnectionList : ConnectionListType; VAR ResultList : ConnectionListType;
  70.                                       VAR ConnectionCount : BYTE) : WORD;
  71.  
  72.     FUNCTION    SendBroadcastMessage (Message : BroadcastMessageType; ConnectionList : ConnectionListType;
  73.                                       VAR ResultList : ConnectionListType; ConnectionCount : BYTE) : WORD;
  74.  
  75.     FUNCTION    SendPersonalMessage  (Message : PersonalMessageType; ConnectionList : ConnectionListType;
  76.                                       VAR ResultList : ConnectionListType; ConnectionCount : BYTE) : WORD;
  77.  
  78.     PROCEDURE   SetBroadcastMode     (BroadcastMode : WORD);
  79.  
  80.     DESTRUCTOR  Done; VIRTUAL;
  81.  
  82.   END;
  83.  
  84.