Futurebasic/Language/Reference/def drawimagefile

DEF DRAWIMAGEFILE Statement edit

DEF DRAWIMAGEFILE edit

Statement edit

✔ Appearance ✔ Standard ✔ Console

Syntax edit

DEF DRAWIMAGEFILE ( fName$ , vRef% )

Revised edit

May 2001 (Release 5)

Description edit

You may use this statement to display a picture directly from disk. The picture can actually be too large to load into memory. You may determine the size of the picture in advance using DEF GETIMAGEFILERECT. The following example shows how to open a file and display it in a window.

Note edit

In order to use this routine, you must include the file named "Subs Image Files.Incl" as shown in the example below.

INCLUDE "Subs Image Files.Incl"

DIM fName$
DIM @vRef%
DIM r as rect
gFBUseNavServices = _ztrue
fName$ = FILES$(_fOpenPreview,,"Select a file to open", vRef%)

LONG IF fName$[0]
  DEF GETIMAGEFILERECT(fName$,vRef%,r)
  OFFSETRECT(r,-r.left,-r.top)
  WINDOW 1,fName$,@r,_docNoGrow
  DEF DRAWIMAGEFILE(fName$,vRef%)
END IF

PRINT @(1,1)"Click to exit"

DO
UNTIL FN BUTTON

See Also edit

DEF GETIMAGEFILERECT