forums.silverfrost.com

[rudnei]

I am using FNT95 8.10 and am unable to read a file into a graphics area, without using a resource control (which can't be used since the name of the file is unknown at compile time).

If I enclose the file name in curly brackets, I get an error: Curly bracket/integer form is not available in this context

Any ideas?

winapp
program testa_imagem
include <windows.ins>
integer :: i,ctrl,rslt,handle_img
rslt=winio@('%ww%ca[Teste]&')
rslt=winio@('%`gr[grey,rgb_colours]&', &
600,600,handle_img)
rslt=winio@('%lw',ctrl)
i=select_graphics_object@(handle_img)
i=import_image@('{600x600 pixel square.jpg}',0,0)
print *,'i=',i
end program testa_imagem

[Kenneth_Smith]

I think handle_img has to be assigned a value by the programmer before winio@ calls with %gr

[rudnei]

Indeed! Many thanks!