使用TImage浏览与保存网络图像
2006-02-04 13:49:55 来源:WEB开发网核心提示:网络ID:wnhoo or sos_admin网名:e梦缘Mail:wnhoo@163.com风花雪月 e梦情缘将http://delphi.ktop.com.tw/delphi.gif直接显示在timage中! 保存为文件,然后显示:uses UrlMon ;function DownLoadInternetFile
网络ID:wnhoo or sos_admin
网名:e梦缘
Mail:wnhoo@163.com
风花雪月 e梦情缘
将http://delphi.ktop.com.tw/delphi.gif直接显示在timage中!
保存为文件,然后显示:
uses UrlMon ;
function DownLoadInternetFile(Source, Dest : String) : Boolean;
begin
try
Result := URLDownloadToFile(nil,PChar(Source),PChar(Dest),0,nil) = 0
except
Result := False;
end;
end;
保存为Tsream,然后显示:
PRocedure TForm1.Button1Click(Sender: TObject);
var
tm: TMemoryStream;
begin
try
tm := TMemoryStream.Create;
IdHTTP1.Get('http://delphi.ktop.com.tw/delphi.gif', tm);
ShowMessage('OK');
finally
tm.Free;
end;
end;
[]
- ››使用脚本恢复WinXP系统的用户登录密码
- ››使用phpMyadmin创建数据库及独立数据库帐号
- ››使用Zend Framework框架中的Zend_Mail模块发送邮件...
- ››使用cout标准输出如何控制小数点后位数
- ››浏览器Skyfire将推出iPad版,支持Flash
- ››使用nofollow标签做SEO的技巧
- ››使用 WebSphere Message Broker 的 WebSphere Tra...
- ››使用SQL Server事件探查器做应用程序的性能分析
- ››使用SQL Server事件探查器分析死锁原因
- ››使用纯文本文件打造WCF服务
- ››使用 Dojo 开发定制 Business Space 小部件,第 4...
- ››使用 ADDRESS 与 INDIRECT函数查询信息
更多精彩
赞助商链接