from 229
VB用のdtools.dllを入手する。
上記作者の許諾は得てないけど、
DTOOLS.BI
'F−BASIC6.で使用するDTOOL.BIファイル
'2001/06/18 Ver 1.4d
'Attribute VB_Name = "DTools"
'左上の座標の色を透明色にする
#define CLR_INVALID -1
'ディスプレイモード
#defineDT_MODE320 0
#defineDT_MODE640 1
#defineDT_MODE800 2
#defineDT_MODE1024 3
#defineDT_MODE1152 4
#define DT_MODE1280 5
#define DT_MODE1600 6
'色数
#define DT_BPP8 0
#define DT_BPP16 &H10
#define DT_BPP24 &H20
#define DT_BPP32 &H30
'スクリーンモード
#define DT_FULLSCREEN 0
#define DT_WINDOWMODE &H100
'描画フラグ
#define DT_NORMAL 0
#define DT_NOSRCKEY 1
#define DT_DESTKEY 2
#define DT_NOWAIT 4
#define DT_NOCLIP 8
'メモリタイプ
#define DT_DEFAULT 0
#define DT_VRAM 1
#define DT_SYSTEM 2
'パレット操作用
type PALETTEENTRY
PERED as byte '赤
PEGREEN as byte '緑
PEBLUE as byte '青
PEFLAGS as byte
end type
'メモリ操作用
type MEMSTATE
LPSURFACE as long 'サーフェスの一番左上のメモリアドレス
LPITCH as long 'サーフェスのピッチ
end type
'ピクセルフォーマット用
type COLORMASK
BPP As Long
RBITS as long
GBITS as long
BBITS as long
RMASK as long
GMASK as long
BMASK as long
End Type