繁體中文当前位置: 首页 > 图文教程 > 网络编程 > PHP > IStream与TStream之间的相互转换
- PHP
- PHP中for循环语句的几种“变态”用法
- 通过php来读取xml的数据
- PHP中使用XML-RPC构造Web Service简单入门
- 用PHP通过SMTP发送邮件
- 用PHP操纵Oracle的LOB类型的数据
- PHP函数学习之PHP函数点评
- Php高手带路--问题汇总解答
- 利用PHP和AJAX创建RSS聚合器
- PHP与Javascript的两种交互方式
- 高手传经：学习PHP重在坚持
- 动态网页PHP中引用&的使用注意事项
- 用PHPINFO来实现PHP的配置统计过程
- 向普通人加密 用PHP程序保护数据
- 使用 PHP 快速生成 Flash 动画
- Php常见问题总结
- 怎样才能成为PHP高手？
- PHP对战ASP：这还值得讨论吗？
- PHP大潮将至 PHP近年发展分析
- 小荷才露尖尖角 中国的PHP社群介绍
- 从草根到大腕 PHP技术发展历程
PHP 中的 IStream与TStream之间的相互转换
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-10-12 浏览: 297 ::
收藏到网摘: 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
