Micono RbPictureUtil v1.3.0b3
for REALbasic 2 plugin

Upload:ハ1999/10/13

[Download]


About RbPictureUtil

OpenAsPicture, SaveAsPicture of methods in FolderItem class depend on a monitor depth.
Then, I made extension plugin of FolderItem class which could read/write various image formats with depth, such as, 32, 16, 8....
  • Can read image format with GraphicsImporter after QuickTime 2.5.
  • Can read the postertime image of QuickTime Movie.
  • Can read PICT resource.
  • Can store picture by PICT, JPEG (can establish compression) , TIFF, Photoshop format.
  • Can set up memory domain for picture.

 


Methods

Set up memory domain for picture

mic_PictureUtil_UseTempMem( UseTemp as Integer )

UseTemp:

0: Try making picture in application heap. if it was failure, try in temporary.

1: Try making picture in temporary. if it was failure, try in application heap.

2: Try making picture in application heap. if it was failure, return nil.

3: Try making picture in temporary. if it was failure, return nil.

Open as picture with depth

f.OpenAsGiPicture(depth as integer) as picture
depth = 32, 16, 8, 4, 2, or 1 
f: FolderItem

Read PICT resource

f.OpenAsMicPICS(resID as integer, depth as integer) as picture
depth = 32, 16, 8, 4, 2, or 1
f: FolderItem

Save as PICT format

f.SaveAsMicPICT(p as picture, depth as integer) as integer
depth = 32 (Only 32 bits in this version)
if return value is not 0, it is error.
f: FolderItem

Save as JPEG format

f.SaveAsMicJPEG(p as picture, depth as integer, quality as integer) as integer
depth = 32, 16, 8, 4, 2, or 1
f: FolderItem
if return value is not 0, it is error.
quality:

minimum valid value = 0
low-quality reproduction = 256
normal-quality repro = 512
high-quality repro =768
maximum-quality repro =1023
lossless-quality repro = 1024

Save as TIFF format

f.SaveAsMicTIFF(p as picture, depth as integer) as integer
depth = 32 (Only 32 bits in this version)
f: FolderItem
if return value is not 0, it is error.

Save as Photoshop format

f.SaveAsMic8BPS(p as picture, depth as integer) as integer
depth = 32 (Only 32 bits in this version)
f: FolderItem
if return value is not 0, it is error.

 


Warranty and Copyright Information


Support


Copyright 1999, Micono Utilities. All rights reserved.