繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- PHP技巧教程：setcookie语句的问题
- 多个字段,大量记录的插入操作技巧(PHP)
- 动态网页PHP脚本中include文件报错解决方法
- PHP中类的使用，面向对象的思路
- php+javascript 静态化简单实例
- Zend Framework留言本模型文件 (PHP源码)
- PHP中使用ASP.NET AJAX
- PHP正则表达式的快速学习方法
- php中防盗链使用.htaccess
- PHP在windows和LINUX下的路径分隔符
- php页面zend加密乱码的解决办法
- PHP中如何使用header发送头部信息
- 如何将PHP中的多维数组显示出来
- 用PHP操作MySql数据库(分页)
- 保护代码安全，PHP如何进行注入
- 在PHP中使用全局变量【一】
- 在PHP中使用全局变量【二】
- 获取远程图片并把它保存到本地
- 源代码的加亮（highlight_file）
- 用PHP上传文件和发送邮件
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 63 ::
收藏到网摘: n/a
IStream与TStream之间的相互转换的代码
procedure TForm1.Button1Click(Sender: TObject);
var
memoStream,OleStream:TStream;
Stream : IStream;
begin
image1.Picture :=nil;
image2.Picture :=nil;
//显示初始照片
image1.Picture.LoadFromFile('/upload/tech/20091012/20091012015718_202cb962ac59075b964b07152d234b70.bmp');
memoStream := TmemoryStream.Create;
try
//将照片保存为TmemoryStream
image1.Picture.Bitmap.SaveToStream(memoStream);
memoStream.Position :=0;
//将TmemoryStream转成IStream
stream:=TStreamAdapter.Create(memoStream);
//将IStream转成TOleStream ==TmemoryStream
OleStream := TOleStream.Create(Stream);
image2.Picture.Bitmap.LoadFromStream(OleStream);
finally
memoStream.Free;
OleStream.Free;
end;
end;
///////////////////////////
uses
....................AxCtrls,ActiveX; //必加此二单元
评论 (0) All
