Futurebasic/語言/參考/def drawimagefile
外觀
✔ 外觀 ✔ 標準 ✔ 控制檯
DEF DRAWIMAGEFILE ( fName$ , vRef% )
2001年5月(5.0版)
您可以使用此語句直接從磁碟顯示圖片。圖片實際上可能太大而無法載入到記憶體中。您可以使用DEF GETIMAGEFILERECT提前確定圖片的大小。以下示例顯示瞭如何開啟檔案並在視窗中顯示它。
為了使用此例程,您必須包含名為“Subs Image Files.Incl”的檔案,如下面的示例所示。
INCLUDE "Subs Image Files.Incl"
DIM fName$
DIM @vRef%
DIM r as rect
gFBUseNavServices = _ztrue
fName$ = FILES$(_fOpenPreview,,"選擇要開啟的檔案", 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)"點選退出"
DO
UNTIL FN BUTTON
DEF GETIMAGEFILERECT