,客户端如何读取(访问)服务器的数据(比如图片),马上放分

求助:各位大哥,客户端怎么读取(访问)服务器的数据(比如图片),马上放分
请教:
服务器的
计算机名为:lsh  
IP   地址为   :192.168.0.188

客户端的
计算机名为:wqs
IP   地址为   :192.168.0.166


我的图片是放在     ledtest\test4\   目录下
并且把   ledtest   是设置为共享的


procedure   TForm1.Button1Click(Sender:   TObject);
var
          NetShare   :NETRESOURCE;
begin
          NetShare.dwType   :=   RESOURCETYPE_ANY;
          //NetShare.lpLocalName   :=   PAnsiChar(edit1.Text);
          NetShare.lpLocalName   :=   'D: ';
          //NetShare.lpRemoteName:=   PAnsiChar(edit2.Text);
          NetShare.lpRemoteName:=   '\\lsh\ledtest\test4\ ';
          NetShare.lpProvider:= ' ';
          WNetAddConnection2(NetShare, 'administrator ', '1999 ',CONNECT_UPDATE_PROFILE);
end;

procedure   TForm1.Button2Click(Sender:   TObject);
var
          strLocalName   :   PChar;
begin
          strLocalName:=   PAnsiChar(edit1.Text);
          WNetCancelConnection2(strLocalName,CONNECT_UPDATE_PROFILE,False);
end;

procedure   TForm1.Button3Click(Sender:   TObject);
var
          map:Tbitmap;   //位图实例变量
begin
          map:=Tbitmap.Create;
          map.Transparent:=true;
          map.LoadFromFile( '\\lsh\ledtest\test4\001.bmp ');
          form1.Canvas.Draw(20,20,map);
end;


程序运行后:
我首先单击   Button1,想使登陆到服务器
然后   单击   Button3,   想显示图片

可是还是
提示:
can   not   open   file   "\\lsh\ledtest\test4\001.bmp ' "  
登陆失败,未知的用户名或密码错误


各位大哥,这是什么原因?
我哪里写错了
是不是  
map.LoadFromFile( '\\lsh\ledtest\test4\001.bmp ');
这里写错了,如果是的话,那要怎么写呢?

谢谢!



------解决方案--------------------
你怎麼重複發這麼多啊
------解决方案--------------------
好像button1里面的代码就有错误,似乎是你button1.click俩面那个路径设置的不对
------解决方案--------------------
按照楼主的代码的话,
map.LoadFromFile( '\\lsh\ledtest\test4\001.bmp ');
要改成:
map.LoadFromFile( 'D:\001.bmp ');
因为\\lsh\ledtest\test4\已经被映射成了本地的D:

另外,
NetShare.lpLocalName := 'D: ';
中的D:最好改成比较靠后的盘符, 比如T: