[REBOL] Re: Compressing image data (bugs?)
From: carl:cybercraft at: 24-Dec-2003 22:50
On 05-Dec-03, Henrik Mikael Kristensen wrote:
> Gabriele Santilli wrote:
>> Hi Henrik,
>> On Thursday, December 4, 2003, 3:18:36 PM, you wrote:
>>> Still, I'd like to know if there's an easier way to contain
>>> size with the data.
>> Just keep the image in the original format, i.e.:
>> image-data: read/binary %img.gif
>> Then later you can LOAD it:
>> img: load image-data
> It works! Never thought of using LOAD that way. Thanks! :-)
Also, if you're dealing with an image created by REBOL, you could use
save/png to create a compressed binary of the image. ie...
>> pic: to-image layout [backdrop black box "A picture"]
== make image! [140x140 #{
000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000...
>> length? pic
== 78400
>> save/png shrunk-pic: make binary! [] pic
>> length? shrunk-pic
== 301
>> view layout [image load shrunk-pic]
--
Carl Read
