/* le type de creation de bouton */ var NO_CREATION=0;; var AUTO_CREATION=1;; /* presence de texte */ var TEXT_BUTTON=1;; var NO_TEXT_BUTTON=0;; struct RollOverButtonType=[ ROBObj2D:Obj2D, ROBbitmap:ObjBitmap, ROBlistcoordinatesinbitmap:[[I I] r1], ROBmask:I, ROBstate:I, ROBtransparency:I, ROBClickReflex:fun [RollOverButtonType I I I] RollOverButtonType, ROBCursorMoveInReflex:fun [RollOverButtonType I I I] RollOverButtonType, ROBCursorMoveOutReflex:fun [RollOverButtonType I I I] RollOverButtonType ] MkRollOverButtonType;; proto ROB_New = fun [Chn ContainerType Obj2D [I I] I S ObjBitmap [[I I] r1] I I [I I] S] RollOverButtonType;; proto ROB_Del = fun [RollOverButtonType] RollOverButtonType;; proto ROB_SetClickReflex = fun [RollOverButtonType fun [RollOverButtonType I I I u0] RollOverButtonType u0] RollOverButtonType;; proto ROB_SetCursorMoveInReflex = fun [RollOverButtonType fun [RollOverButtonType I I I u0] RollOverButtonType u0] RollOverButtonType;; proto ROB_SetCursorMoveOutReflex = fun [RollOverButtonType fun [RollOverButtonType I I I u0] RollOverButtonType u0] RollOverButtonType;; proto ROB_GetObject = fun [RollOverButtonType] Obj2D;; proto ROB_ChangeDisplayFlags = fun [RollOverButtonType I I I] RollOverButtonType;; proto ROB_ChangeCoordinates = fun [RollOverButtonType [I I] I I] RollOverButtonType;; proto ROB_GetCoordinates = fun [RollOverButtonType] [I I];; proto ROB_GetGraphicalState = fun [RollOverButtonType] [ObjBitmap I I I I I];;