繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- PHP动态网页技术中SESSION的应用
- PHP和MySQL操作应该注意的一些细节
- 理解学习PHP编码规范之注释和文件结构
- PHP网站开发过程中注意这些安全知识
- 利用PHP自定义错误处理器处理出错信息
- 用PHP程序计算时间差的几种方法
- PHP关于中文汉字替换与模式匹配的问题
- PHP中的一些常识：类篇
- PHP程序员一般都忽略了的几点精华
- PHP4之COOKIE支持详解
- 用新PHP插件实现MySQL为基础的事务
- 如何利用PHP操纵Oracle LOB类型数据
- PHP5 OOP编程之代理与定制异常(1)
- PHP5 OOP编程之代理与定制异常(2)
- 用PHP编程语言开发动态WAP页面
- PHP 编码规范-注释
- 用PHP正则表达式清除字符串的空白
- PHP应用技巧：如何将代码中的通知和警告删除
- PHP入门进阶学习必备的知识及工具
- 用PHP编程语言开发动态WAP页
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 91 ::
收藏到网摘: 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
