繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- 使用 php4 加速 web 传输
- MYSQL中如何存取二进制文件
- “在phpMyAdmin使用用户口令登陆”补充
- 几种显示数据的方法的比较
- 使用PHP制作新闻系统的思路
- 关于PHP中操作MySQL数据库的一些要注意的问题
- 不使用OCI8接口如何连接PHP和Oracle
- php 之 没有mysql支持时的替代方案
- 用session代替apache服务器验证
- php实现ping
- PHP语句中or的用法
- 在Linux下安装PHP,APACHE,ORACLE,PERL的方法
- 一个非常精彩的日历程序
- 利用static实现表格的颜色隔行显示
- php写的域名查询系统whois
- 用PHP制作的意见反馈表
- 针对初学PHP者的疑难问答
- 从C/C++迁移到PHP——判断字符类型的函数
- 几点提高php序运行效率的方法
- Output Buffer (输出缓冲)函数的妙用
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 346 ::
收藏到网摘: 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
