求助:调用API函数

在Delphi中怎样调用API:  NetShareAdd等函数

解决方案 »

  1.   

    自己定义一个单元，进行引用netapi32.dll，注意函数的格式，如果需要，我可以给你写一个单元
      

  2.   

    我想以下，好像在delphi的第二章光盘上就有这个单元，你搜索一下
    LANMANGER.PAS单元就是了
    如果要使用单独一个函数，那么直接调用netapi32.dll就好了
      

  3.   

    wxjh老兄,可不可以写一写,我找不到LANMANGER.PAS单元
      

  4.   

    请问,LANMANAGER.PAS文件在哪可以找得到???
      

  5.   

    找不到，自己写引用啦。
    function NetShareAdd(
      servername: WideString;
      level: DWORD;
      buf: PByte;
      parm_err: PDWORD
    ): DWORD; stdcall; external 'Netapi32.dll' name 'NetShareAdd';