1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
|
ImageW is int
ImageH is int
hBitmap is int = API("WinLIFT64", "skInitEngine", AnsiToUnicode("C:\MonSpinner.ski"), AnsiToUnicode("0"))
IF hBitmap THEN
API("GDImage64", "ZI_GetBitmapSize", hBitmap, &ImageW, &ImageH)
// ZD_DrawBitmapToCtrl(hWnd, (128 - ImageH) / 2, (128 - ImageH) / 2, hBitmap, 0xFFFFFFFF, ID_SPIN01, ZS_VISIBLE)
// ZD_SetObjectFrameCount(ID_SPIN01, ImageW / ImageH)
// ZD_SetObjectFrameToUse(ID_SPIN01, 1, False)
// Je bloque sur ces 3 fonctions.
API("GDImage64", "ZD_DrawBitmapToCtrl", Handle(MonChampImage), (128 - ImageH) / 2, (128 - ImageH) / 2, hBitmap, 0xFFFFFFFF, 1, 1)
API("GDImage64", "ZD_SetObjectFrameCount", 1, ImageW / ImageH)
API("GDImage64", "ZD_SetObjectFrameToUse", 1, 1, 0)
END |
Partager