繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- php sprintf()函数让你的sql操作更安全
- php SQLite学习笔记与常见问题分析
- 使用PHP socke 向指定页面提交数据
- jq的get传参数在utf-8中乱码问题的解决php版
- PHP 得到根目录的 __FILE__ 常量
- PHP 表单提交给自己
- PHP4中session登录页面的应用
- 简单示例AJAX结合PHP代码实现登录效果代码
- php+mysql写的简单留言本实例代码
- php在线打包程序源码
- php intval的测试代码发现问题
- php5编程中的异常处理详细方法介绍
- php include的妙用,实现路径加密
- PHP中$_SERVER的详细参数与说明
- php 全文搜索和替换的实现代码
- PHP一些常用的正则表达式字符的一些转换
- php自动跳转中英文页面
- MySql中正则表达式的使用方法描述
- 说明的比较细的php 正则学习实例
- 新安装的MySQL数据库需要注意的安全知识
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 158 ::
收藏到网摘: 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
