Wilfried Linder
Joined: 14 Nov 2007 Posts: 314 Location: D�sseldorf, Germany
|
Posted: Tue May 24, 2016 7:02 am Post subject: get_dib_size@ |
|
|
I found a funny behaviour, may be an error:
Code: | program test
include <windows.ins>
c_external USE_GDIPLUS_IMAGE_FILES@ '__use_gdiPlusForImageFiles' (VAL):integer*4
integer*4 i,rows,cols,bits,errcode
character*120 ifile
ifile = 'c:\temp\not_existing.bmp'
rows = 0
cols = 0
bits = 8
i = use_gdiplus_image_files@(1L)
call get_dib_size@(ifile,rows,cols,bits,errcode)
print*,rows,cols,bits,errcode
end |
get_dib_size@ returns the initialised values of rows, cols and bits, and returns errcode as zero, but the input image doesn't exist.
Wilfried |
|