image能否显示网络中的图片,如另外一台机器文件http://192.168.0.1/1.jpg;如不能,要用什么组件?先多谢了!!!
解决方案 »
- 一串字符如何取前2个词
- 出现bug,但是这段解决bug的代码又应该添在哪里呢?
- 如何在BCB6+DirectDraw的全屏模式+flip(翻页) 中显示EDIT控件?
- 打印dxflowchart的图
- TQuery查出结果的修改?
- 请问怎么用HexToBin
- 在table中我想按字段的前三位进行过滤我设filter:=copy(字段,1,3)出来的结果是 can't find field copy!! 我该怎么办?50分
- 俺们国内有没有专门讲Delphi的杂志啊?对‘程序员’一书的个人建议(俺也是随便问问,进者有分)
- 急!access问题!
- 关于调用360杀毒查杀网络文件的问题
- 在人事系统中,如何做合同期到期的提醒功能(如本月合同到期的人数、今天合同到期的人数)?
- Delphi处理Excel数据的回归?
能否将WebBrowser中显示的图像转到image中显示吗?我需要将在WebBrowser中显示的图像的一部分在image中显示,这能做到吗?分可以再加!
uses CWGIFImage;//一个显示GIF图片的类,如果需要,我可以发给你procedure TForm1.Button1Click(Sender: TObject);
var
Stream : TMemoryStream;
GifImage : TCWGifImage;
begin
Stream := TMemoryStream.Create();
GifImage := TCWGifImage.Create();
try
IdHTTP1.Get('http://community.csdn.net/images/CSDN_logo.GIF',Stream);
Stream.Position := 0;
GifImage.LoadFromStream(Stream);
Image1.Picture.Assign(GifImage);
finally
Stream.Free();
GifImage.Free();
end;
end;
uses Jpeg;
procedure TForm1.Button1Click(Sender: TObject);
var
Stream : TMemoryStream;
Image : TJPEGImage;
begin
Stream := TMemoryStream.Create();
Image := TJPEGImage.Create();
try
IdHTTP1.Get('http://community.csdn.net/adv/Images/google20051025.jpg',Stream);
Stream.Position := 0;
Image.LoadFromStream(Stream);
Image1.Picture.Assign(Image);
finally
Stream.Free();
Image.Free();
end;
end;
您好,我真是万分的感谢,结贴!