Cómo Mostrar Imágenes TIFF en PowerBuilder

PowerBuilder Tip #10: ¿Cómo Mostrar 
Imágenes TIFF en PowerBuilder? 
 
En la actualidad, PowerBuilder no ofrece soporte nativo a imágenes en formato TIFF. Hay dos soluciones para visualizar imágenes TIFF en PowerBuilder: 
1. Usar un OCX para ver la imagen TIFF (por ejemplo, ​
Kodak Image Edit Control​
) 

o 
2. Convertir primero la imagen TIFF a un Bitmap (u otro formato soportado por PowerBuilder) usando una herramienta de terceros.  
Para usar el ​
Kodak Image Edit Control​
: 
1. En PowerBuilder, ir a ​
Insert ­> Control ­> OLE... 
2. En la pestaña ​
Insert Control​
, seleccione ​Kodak Image Edit Control​
 y de click 

en ​
OK​
. 
3. En su ventana, haga click en la ubicación en donde desea crear este control. 
4.Para ver las propiedades y funciones disponibles, haga click en el ​
Browser 
Painter​
 (​
Tools ­> Browser​
); vaya a la pestaña  ​
OLE​
 y expanda ​
OLE Custom 
Controls;​
 por último ubique el control. 
Si el control ​
Kodak Image Edit Control​ no aparece en la lista del paso 2, usted debe 
ubicar manualmente el archivo OCX (por ejemplo, ​
C:\Windows\System32\imgedit.ocx​
) y 
registrarlo manualmente antes de poder crear el objeto, usando la opción ​
'Register New...'​
 que aparece en la pestaña ​
'Insert Control'​
 del paso 2. 
La siguiente porción de código (que se puede usar en el evento 'clicked' de un botón) permite abrir una imagen TIFF y mostrarla en la ventana (​
ole_1​
 es el nombre del 
objeto): 
string ls_title, ls_fullpathname, ls_filename, ls_extension, ls_filter 
int li_rc 
 
ls_title  = "Select a .TIF file" 
ls_extension = "TIF" ls_filter  = "TIF Files (*.TIF),*.TIF" 
 
li_rc = GetFileOpenName ( ls_title, ls_fullpathname, ls_filename, 
ls_extension, ls_filter) 

 
ole_1.object.ClearDisplay() 
ole_1.object.Image = ls_filename ole_1.object.Display() 
Finalmente, estas dos líneas de código le permiten ver las dimenciones de la imagen: 
MessageBox("Alto:", string(ole_1.object.ImageHeight)) ...