PowerBuilder Tip #6

¿Cómo obtener el ancho y alto de un bitmap?

El siguiente código muestra cómo extraer el ancho y alto de un bitmap almacenado en un archivo BMP:

// Ancho y alto de una imagen almacenada en un archivo BMP
int   i_filenum
blob  b
ulong ul_width, ul_height

i_filenum = FileOpen( "archivo.bmp", StreamMode!, Read! )

FileRead( i_filenum, b )
ul_width  = Long( Integer( BlobMid( b, 19, 2 ) ), &
    Integer( BlobMid( b, 21, 2) ) )
ul_height = Long( Integer( BlobMid( b, 23, 2 ) ), &
    Integer( BlobMid( b, 25, 2) ) )
FileClose( i_filenum )

MessageBox("Información", "Ancho: " + String(ul_width) &
    + " Alto: " + String(ul_height))

Vea aquí más Tips de PowerBuilder.