|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
|
2004/4/28 9:50:47 |
标题: |
关于stream的easy问题,多谢前辈指教,先谢了 |
浏览:1099 |
|
加入我的收藏 |
楼主: |
我这样写的一段程序, 。。。。 begin try begin FileName:='dd.bmp'; bmp:=TBitMap.Create ; bmp.LoadFromFile(FileName); try begin ms:=TMemorystream.Create ; bmp.SaveToStream(ms); if ms.Size = 0 then showmessage('no pics') else showmessage('hi'); end; finally end; ms.Free ; end; finally bmp.Free ; end 为什么每次执行时都是显示no pics呢,应该怎样修改,我跟踪发现ms.size总是0,这是为什么呢?难道我没有读到图象吗?迷糊了。。。
谢谢ggjj指教,
小女子拜谢了。
----------------------------------------------
我是一个新人,希望能得到ggjj的帮助。
为生活所迫,需要学习delphi,但是这段经历会成为我成长的记忆;
大家的帮助则是我这段时间里最温暖的记忆
click here to my blog |
作者: |
bios (阿贡) |
★☆☆☆☆ |
-
|
盒子中级会员 |
|
2004/4/28 9:53:21 |
1楼: |
'dd.bmp' 用完整路径试试!
----------------------------------------------
|
作者: |
|
2004/4/28 9:59:58 |
2楼: |
不行呀,我试了,
奇怪了。。。
----------------------------------------------
我是一个新人,希望能得到ggjj的帮助。
为生活所迫,需要学习delphi,但是这段经历会成为我成长的记忆;
大家的帮助则是我这段时间里最温暖的记忆
click here to my blog
|
作者: |
|
2004/4/28 10:46:10 |
3楼: |
知道了,
少这一句。
ms.position:=0,
放在 bmp.SaveToStream(ms); 后面
。。。
寒。。。
----------------------------------------------
我是一个新人,希望能得到ggjj的帮助。
为生活所迫,需要学习delphi,但是这段经历会成为我成长的记忆;
大家的帮助则是我这段时间里最温暖的记忆
click here to my blog
|
|