当前，DELPHI的应用愈加广泛，而网络又是未来计算机的发展趋势。本文介绍一个在DELPHI中如何实现网络驱动器映射的小技巧，源程序如下：
    MAP－NETWORK－DRIVE.PAS
    procedure TForm1.Button1Click(Sender:Tobject);
    var
    NR:TNetResource;
    begin
    with NR do
    begin
    dwType:=RESOURCETYPE__ANY;
    lpLocalName:=`X:'; //map to this driver letter
    lpRemoteName:=`//MyServer\MyDirectory';
    //Must be filled in.
    lpProvider:=";
    end;
    WNetAddConnection2(NR,`MyPassword',`MyUername',
    CONNECT__UPDATE__PROFILE)；
    end;
    (郑州市经七路22号 瓮建 450002)