Is not the same result as Windows
*Gadget.gadget = PB_Object_GetObject(PB_Gadget_Objects, Id)
Windows Gadget
Code: Select all
;- PB Interne Struktur Gadget
Structure Gadget
Gadget.i
*vt.GadgetVT
UserData.i
OldCallback.i
Daten.i[4]
EndStructure
Code: Select all
;- PB Interne Struktur GadgetVT
Structure GadgetVT
GadgetType.l
SizeOf.l
GadgetCallback.Prog_Callback
FreeGadget.Prog_FreeGadget
GetGadgetState.Prog_GetGadgetState
SetGadgetState.Prog_SetGadgetState
GetGadgetText.Prog_GetGadgetText
SetGadgetText.Prog_SetGadgetText
AddGadgetItem2.Prog_AddGadgetItem2
AddGadgetItem3.Prog_AddGadgetItem3
RemoveGadgetItem.Prog_RemoveGadgetItem
ClearGadgetItemList.Prog_ClearGadgetItemList
ResizeGadget.Prog_ResizeGadget
CountGadgetItems.Prog_CountGadgetItems
GetGadgetItemState.Prog_GetGadgetItemState
SetGadgetItemState.Prog_SetGadgetItemState
GetGadgetItemText.Prog_GetGadgetItemText
SetGadgetItemText.Prog_SetGadgetItemText
OpenGadgetList2.Prog_OpenGadgetList2
GadgetX.Prog_GadgetX
GadgetY.Prog_GadgetY
GadgetWidth.Prog_GadgetWidth
GadgetHeight.Prog_GadgetHeight
HideGadget.Prog_HideGadget
AddGadgetColumn.Prog_AddGadgetColumn
RemoveGadgetColumn.Prog_RemoveGadgetColumn
GetGadgetAttribute.Prog_GetGadgetAttribute
SetGadgetAttribute.Prog_SetGadgetAttribute
GetGadgetItemAttribute2.Prog_GetGadgetItemAttribute2
SetGadgetItemAttribute2.Prog_SetGadgetItemAttribute2
SetGadgetColor.Prog_SetGadgetColor
GetGadgetColor.Prog_GetGadgetColor
SetGadgetItemColor2.Prog_SetGadgetItemColor2
GetGadgetItemColor2.Prog_GetGadgetItemColor2
SetGadgetItemData.Prog_SetGadgetItemData
GetGadgetItemData.Prog_GetGadgetItemData
GetRequiredSize.Prog_GetRequiredSize
SetActiveGadget.Prog_SetActiveGadget
GetGadgetFont.Prog_GetGadgetFont
SetGadgetFont.Prog_SetGadgetFont
SetGadgetItemImage.Prog_SetGadgetItemImage
EndStructure