extern api_function netshareadd(const char far * pszserver,
short slevel,
const char far * pbbuffer,
unsigned short cbbuffer
);
特别强调：
我们在声明上面的函数时，函数参数一定要写对，也就是一定要正确对应到delphi 自己的类型上。不然函数功能无法实现，这一点我已经尝试了。之所以在nt 下实现不了主要还是，参数类型对应的不对。我们还需要声明一个记录类型，在98/95/me 和 nt/2000/xp下声明如下：
windows nt/2000/xp: share_info_2 和 share_info_502 结构
