宇
宇宙神
Unregistered / Unconfirmed
GUEST, unregistred user!
请教:<br>服务器的<br>计算机名为:lsh <br>IP 地址为 :192.168.0.188<br><br>客户端的<br>计算机名为:wqs<br>IP 地址为 :192.168.0.166<br><br><br>我的图片是放在 ledtest/test4/ 目录下<br>并且把 ledtest 是设置为共享的<br><br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> NetShare :NETRESOURCE;<br>begin<br> NetShare.dwType := RESOURCETYPE_ANY;<br> //NetShare.lpLocalName := PAnsiChar(edit1.Text);<br> NetShare.lpLocalName := 'D:';<br> //NetShare.lpRemoteName:= PAnsiChar(edit2.Text);<br> NetShare.lpRemoteName:= '//lsh/ledtest/test4/';<br> NetShare.lpProvider:='';<br> WNetAddConnection2(NetShare,'administrator','1999',CONNECT_UPDATE_PROFILE);<br>end;<br><br>procedure TForm1.Button2Click(Sender: TObject);<br>var<br> strLocalName : PChar;<br>begin<br> strLocalName:= PAnsiChar(edit1.Text);<br> WNetCancelConnection2(strLocalName,CONNECT_UPDATE_PROFILE,False);<br>end;<br><br>procedure TForm1.Button3Click(Sender: TObject);<br>var<br> map:Tbitmap; //位图实例变量<br>begin<br> map:=Tbitmap.Create;<br> map.Transparent:=true;<br> map.LoadFromFile('//lsh/ledtest/test4/001.bmp');<br> form1.Canvas.Draw(20,20,map);<br>end;<br><br><br>程序运行后:<br>我首先单击 Button1,想使登陆到服务器<br>然后 单击 Button3, 想显示图片<br><br>可是还是<br>提示:<br>can not open file "//lsh/ledtest/test4/001.bmp'" <br>登陆失败,未知的用户名或密码错误<br><br><br>各位大哥,这是什么原因?<br>我哪里写错了<br>是不是 <br>map.LoadFromFile('//lsh/ledtest/test4/001.bmp');<br>这里写错了,如果是的话,那要怎么写呢?<br><br>谢谢!