当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换

PHP
require(),include(),require_once()和include_once()区别
Mysql和网页显示乱码解决方法集锦
php+mysql分页代码详解
一家之言的经验之谈php+mysql扎实个人基本功
php.ini中的php-5.2.0配置指令详解
php Undefined index和Undefined variable的解决方法
php中变量及部分适用方法
简单的PHP图片上传程序
php中cookie的作用域
PHP与MySQL开发中页面乱码的产生与解决
php日历[测试通过]
PHP之变量、常量学习笔记
php一些公用函数的集合
php5中类的学习
关于Intype一些小问题的解决办法
php中文字符截取防乱码
Mysql的GROUP_CONCAT()函数使用方法
php heredoc和phpwind的模板技术使用方法小结
PHP5中的时间相差8小时的解决办法
PHP截取汉字乱码问题解决方法mb_substr函数的应用

PHP 中的 IStream与TStream之间的相互转换


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-12   浏览: 118 ::
收藏到网摘: 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; //必加此二单元