GDImage 5.00, has everything to produce state of the art Widget
A GDImage Widget, is an aggregation of several sprite objects working together as a single entity.
In this screen shot, you can see from the top left to the bottom right corner:

and an exclusive skinned interface to stand out from the crowd
Example of script code to produce a Widget:
...
A GDImage Widget, is an aggregation of several sprite objects working together as a single entity.
In this screen shot, you can see from the top left to the bottom right corner:
- A clock animated control.
- Two animated rotating wheels.
- An animated goldfish.
- Two TTF sprite objects.
- A temperature Widget, with progress and digital display.
- A see flow gauge Widget.
- A Cape/Knts navigation Widget.
- A wind orientation Widget.

and an exclusive skinned interface to stand out from the crowd

Example of script code to produce a Widget:
Code:
PROCEDURE WidgetTemperature(LOCAL nGDImageCtrl is int, LOCAL nX is int, LOCAL nY is int, LOCAL rTemperature is 4-byte real) nBitmap, nCropBitmap, nW, nH are int nFontSize is int = 22 sUseFont is string = "LCD"//"ARIAL" nTemperature is int = rTemperature // Casting to integer nTemperature = (nTemperature + 4) * 4 stemperature is string = NumToString(rTemperature) IF ZD_GetObjectBitmap(IDS_TEMPERATURE) = 0 THEN nBitmap = ZI_CreateBitmapFromFile(gsSkinComponentPath + "Temperature.png", nW, nH) ZD_DrawBitmapToCtrl(nGDImageCtrl, nX, nY, nBitmap, ZD_ColorARGB(255, 0), IDS_TEMPERATURE, ZS_VISIBLE) ZD_SetObjectLocked(IDS_TEMPERATURE, True) // Create a hidden object to manipulate the progress bar nBitmap = ZI_CreateBitmapFromFile(gsSkinComponentPath + "TempProgress.png", nW, nH) ZD_DrawBitmapToCtrl(nGDImageCtrl, 0, 0, nBitmap, ZD_ColorARGB(255, 0), HID_TEMPPROGRESS, ZS_HIDDEN) ELSE ZD_SetObjectXY(IDS_TEMPERATURE, nX, nY, False) END // Create a new object with the good size, by croping the hidden progress object bitmap. nBitmap = ZI_CropBitmap(ZD_GetObjectBitmap(HID_TEMPPROGRESS), 0, 0, nW - nTemperature - 8, nH, 0) ZD_DrawBitmapToCtrl(nGDImageCtrl, nX - 4 + nTemperature, nY, nBitmap, ZD_ColorARGB(255, 0), IDS_TEMPPROGRESS, ZS_VISIBLE) ZD_SetObjectLocked(IDS_TEMPPROGRESS, True) IF ZD_GetObjectBitmap(IDS_TEMPMASK) = 0 THEN nBitmap = ZI_CreateBitmapFromFile(gsSkinComponentPath + "TempMask.png", nW, nH) ZD_DrawBitmapToCtrl(nGDImageCtrl, nX, nY, nBitmap, ZD_ColorARGB(255, 0), IDS_TEMPMASK, ZS_VISIBLE) ZD_SetObjectLocked(IDS_TEMPMASK, True) END IF ZD_GetObjectParent(IDS_TEMPCELCIUS) = 0 THEN ZD_DrawTextToCtrl(nGDImageCtrl, "", nX, nY, gnFontColor, (sUseFont), nFontSize, IDS_TEMPCELCIUS, ZS_VISIBLE, 0, 0) END nX += 18; nY += 62 ZD_SetObjectXY(IDS_TEMPCELCIUS, nX, nY, False) ZD_SetObjectText(IDS_TEMPCELCIUS, sTemperature) ZD_SetObjectLocked(IDS_TEMPCELCIUS, True)
Comment