繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- 成为PHP编程高手应该遵循的三个准则
- PHP企业级应用之常见缓存技术篇
- PHP企业级应用之WebService篇
- PHP实现的Mysql读写分离
- php框架codeigniter是如何实现mvc模式以及单一入口
- PHP版单点登陆实现方案
- Linux编程之：五个常见PHP数据库问题
- linux下php实现C/C++扩展编程
- 目前最好的PHP开发框架
- php职业分析（如何成为一名优秀的phper）
- PHP 的八卦两则
- 20款 Web Mail PHP开源项目
- 经验分享:学好java开发的关键7步
- PHP中正则的使用
- 对于Java开发人员必须遵从的十大基本法则
- PHP绘制3D图形之自定义图形及矢量图
- PHP编写的25个游戏脚本
- php生成静态页面的办法
- 微软对PHP支持的改进 及其它一些胡言乱语
- Fedora下Zend Studio 6.1.2 的配置
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 295 ::
收藏到网摘: 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
