The following example creates a
Bitmap object based on an application instance handle and the name of a bitmap resource.
SUB GDIP_BmpFromResource (BYVAL hdc AS DWORD)
LOCAL hStatus AS LONG
LOCAL hInstance AS DWORD
LOCAL pGraphics AS DWORD
LOCAL pBitmap AS DWORD
LOCAL strName AS STRING
hInstance = GetModuleHandle(BYVAL %NULL)
hStatus = GdipCreateFromHDC(hdc, pGraphics)
' // Create a Bitmap object from a resource
strName = UCODE$("BitmapResource1")
hStatus = GdipCreateBitmapFromResource(hInstance, STRPTR(strName), pBitmap)
' // Draw the bitmap
hStatus = GdipDrawImageI(pGraphics, pBitmap, 10, 10)
' // Cleanup
IF pBitmap THEN GdipDisposeImage(pBitmap)
IF pGraphics THEN GdipDeleteGraphics(pGraphics)
END SUB
(http://www.jose.it-berater.org/captures/GdipCreateBitmapFromResource.png)