IStream与TStream之间的相互转换


Posted in PHP onAugust 01, 2008

  
procedure TForm1.Button1Click(Sender: TObject);    
var   
  memoStream,OleStream:TStream;    
  Stream : IStream;    
begin   
  image1.Picture :=nil;    
  image2.Picture :=nil;    

  //显示初始照片    
  image1.Picture.LoadFromFile('c:\logo.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;    //必加此二单元

PHP 相关文章推荐
PHP 和 HTML
Oct 09 PHP
以文本方式上传二进制文件的PHP程序
Oct 09 PHP
文件系统基本操作类
Nov 23 PHP
Php Image Resize图片大小调整的函数代码
Jan 17 PHP
PHP图片等比例缩放生成缩略图函数分享
Jun 10 PHP
朋友网关于QQ相关的PHP代码(研究QQ的绝佳资料)
Jan 26 PHP
PHP使用内置dir类实现目录遍历删除
Mar 31 PHP
Zend Framework创建自己的动作助手详解
Mar 05 PHP
PHP API接口必备之输出json格式数据示例代码
Jun 27 PHP
thinkPHP通用控制器实现方法示例
Nov 23 PHP
PHP中命名空间的使用例子
Mar 22 PHP
PHP面向对象程序设计之构造方法和析构方法详解
Jun 13 PHP
特详细的PHPMYADMIN简明安装教程
Aug 01 #PHP
php-accelerator网站加速PHP缓冲的方法
Jul 30 #PHP
新安装的MySQL数据库需要注意的安全知识
Jul 30 #PHP
说明的比较细的php 正则学习实例
Jul 30 #PHP
MySql中正则表达式的使用方法描述
Jul 30 #PHP
php自动跳转中英文页面
Jul 29 #PHP
PHP一些常用的正则表达式字符的一些转换
Jul 29 #PHP
You might like
php多个字符串替换成同一个的解决方法
2013/06/18 PHP
php判断IP地址是否在多个IP段内
2020/08/18 PHP
JavaScript入门教程(9) Document文档对象
2009/01/31 Javascript
JS 中document.URL 和 windows.location.href 的区别
2009/11/11 Javascript
鼠标滚轮改变图片大小的示例代码
2013/11/20 Javascript
jquery浏览器滚动加载技术实现方案
2014/06/03 Javascript
Node.js操作Firebird数据库教程
2016/03/04 Javascript
简单封装js的dom查询实例代码
2016/07/08 Javascript
前端微信支付js代码
2016/07/25 Javascript
WEB开发之注册页面验证码倒计时代码的实现
2016/12/15 Javascript
ionic2中使用自动生成器的方法
2018/03/04 Javascript
微信小程序module.exports模块化操作实例浅析
2018/12/20 Javascript
layui框架与SSM前后台交互的方法
2019/09/12 Javascript
Vue 同步异步存值取值实现案例
2020/08/05 Javascript
原生js实现分页效果
2020/09/23 Javascript
基于openlayers实现角度测量功能
2020/09/28 Javascript
微信小程序实现列表左右滑动
2020/11/19 Javascript
[01:19:46]EG vs Secret 2019国际邀请赛淘汰赛 胜者组 BO3 第二场 8.21.mp4
2020/07/19 DOTA
详解Python3中的Sequence type的使用
2015/08/01 Python
Python Django使用forms来实现评论功能
2016/08/17 Python
一些常用的Python爬虫技巧汇总
2016/09/28 Python
分析python请求数据
2018/08/19 Python
python机器学习之神经网络实现
2018/10/13 Python
Python中常见的数制转换有哪些
2020/05/27 Python
python numpy实现rolling滚动案例
2020/06/08 Python
浅析pandas随机排列与随机抽样
2021/01/22 Python
YSL圣罗兰美妆官方旗舰店:购买YSL口红
2018/04/16 全球购物
GetYourGuide台湾:预订旅游活动、景点和旅游项目
2019/06/10 全球购物
党委书记岗位职责
2013/11/24 职场文书
会计员岗位职责
2014/03/15 职场文书
县级文明单位申报材料
2014/05/23 职场文书
团代会闭幕词
2015/01/28 职场文书
舞蹈社团活动总结
2015/05/07 职场文书
高中生军训感言
2015/08/01 职场文书
深入浅析Django MTV模式
2021/09/04 Python
React如何使用axios请求数据并把数据渲染到组件
2022/08/05 Javascript