【HSP3】リソース読み取りサンプル

リソース読み取りサンプル、ieframe.dll に埋め込まれているビットマップを表示してみる

リソース読み取りサンプル、ieframe.dll に埋め込まれているビットマップを表示してみる

#include "kernel32.as"
#include "user32.as"
#include "gdi32.as"
#define RT_BITMAP 2

	LoadLibrary "ieframe.dll"
	hModule = stat

	LoadImage hModule, 625, 0, 0, 0, 0
	hBitmap = stat

	// 画像サイズ取得
	dim BITMAP, 6
	GetObject hBitmap, 24, varptr(BITMAP)
	x = BITMAP(1)
	y = BITMAP(2)

	CreateCompatibleDC hdc
	hCompatDC = stat
	
	SelectObject hCompatDC, hBitmap
	hPrevBitmap = stat
	
	BitBlt hdc, 0, 0, x, y, hCompatDC, 0, 0, 0xCC0020
	redraw 1

	// 破棄
	SelectObject hCompatDC, hPrevBitmap
	DeleteObject hBitmap
	DeleteDC hCompatDC