File Sharing 95/98 v2.0 by Jerry Ryle

  This unit allows you to share and unshare folders in Windows 95/98.
  It encapsulates the SvrAPI exports in easy to use functions.

  NEW: No more intermediate DLL! The functions have been written
       natively in Delphi now and you no longer have to use the
       SHARING.DLL.

  This unit is completely free of course. If you find it useful,
  and are compelled to send me cash, beer, or dead things in
  envelopes, please feel free to do so.

  email me if you make it better:  gryle@calpoly.edu



 Files included:

 Sharing.pas  - Contains the SvrAPI imports, and encapsulated functions.
 ShareErr.pas - Contains network error codes, and a function to turn them
                into meaningful String errors.


-----------------------------------------------------------------------------

 Functions in Sharing.pas: (Documentation is available in sharing.pas)

 function ShareResource(ServerName : PChar; FilePath : PChar;
                       NetName : PChar; Remark : PChar;
                       ShareType : Byte; Flags : Word;
                       RWPass : PChar; ROPass : PChar ) : Integer

 function DeleteShare(ServerName : PChar; NetName : PChar) : Integer
 function GetShareInfo(ServerName : PChar; NetName : PChar; Var ShareStruct : Share_Info50) : Integer
 function SetShareInfo(ServerName : PChar; NetName : PChar; ShareStruct : Share_Info50) : Integer


  All of these functions return a network error code, to determine the meaning of the
  code look at ShareErr.pas, or use the function: 
  
  GetNetErrorString(ErrorNumber : Integer) : String
 
  Which is located in ShareErr.pas.