Changeset 101 for trunk/lingosource/castlib2/ButtonManager.ls

Timestamp:

03/05/09 12:45:14 (3 years ago)

Author:

alex

Message:

adressed wrong text position on line. bug in my code was revealed through fixedLineSpace bug in D11

File:

• trunk/lingosource/castlib2/ButtonManager.ls (modified) (4 diffs)

trunk/lingosource/castlib2/ButtonManager.ls

@@ -618 +618 @@
 
 -- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
---
---on getPropertyDescriptionList
---  if the currentspritenum = 0 then exit
---  liste = [:]
---  fontliste = call(#InitFonts, [pIncludes.getaprop(#commonmoviescript)])
---  if not listP(fontliste) then fontliste = ["Arial"]
---  
---  liste[#pCallFunction] = [#default:#funktion, #format:#symbol, #comment:"Event to sendAllSprites:"]
---  liste[#pBroadcastSprites] = [#format:#list, #default:[], #comment:"Send event to: ([] = All, [-1] = Moviescript, [0] = this Sprite)"]
---  liste[#pEventsToProcess] = [#format:#list, #default:[#mouseUp], #comment:"Which events to process:"]
---  liste[#pKeyboardshortcut] = [#default:"", #format:#string, #comment:"Keyboardshortcut:"]
---  
---  liste[#pLabel] = [#default:"Label", #format:#string, #comment:"Labeltext:"]
---  
---  liste[#pFarbe] = [#default:rgb(170,170,170),#format:#color,#comment: "Color:"]
---  liste[#pBevel] = [#default:"1 - Small Bevel", #format:#string, #range:["0 - No Bevel","1 - Small Bevel", "2 - Normal Bevel","3 - Large Bevel"], #comment:"Bevel:"]
---  liste[#pUseMember] = [#default:"myAquaButton", #format:#string, #comment:"Use prepared members based on name:"]
---  
---  liste[#pSaveImgs] = [#default:0, #format:#integer, #comment:"Save text images to which castlib (0 = dont save)"]
---  
---  liste[#pUseDefaultLayout] = [#default:0, #format:#boolean, #comment:"Use global layout settings from handler mGetDefaultButtonList()"]
---  liste[#pDefaultLayoutPreset] = [#default:"", #format:#string, #comment:"layout preset (only used when global layout = 1)"]
---  
---  liste[#pMarginH] = [#format:#integer, #default:20, #range:[#min:0, #max:30], #comment:"Margin horiz.:"]
---  liste[#pMarginV] = [#format:#integer, #default:10, #range:[#min:0, #max:20], #comment:"Margin vert.:"]
---  
---  liste[#pRotation] = [#format:#integer, #default:0, #range:[#min:0, #max:360], #comment:"Rotation:"]
---  
---  liste[#pFont] = [#format:#string, #default:fontliste[1], #range:fontliste, #comment:"Font:"]
---  liste[#pFontGroesse] = [#format:#integer, #default:10, #range:[#min:7, #max:36], #comment:"Fontsize:"]
---  liste[#pFontFarbe] = [#default:rgb(0,0,0),#format:#color,#comment: "Fontcolor"]
---  liste[#pFontHLFarbe] = [#default:rgb(0,0,0),#format:#color,#comment: "Font highlight color"]
---  liste[#pFontAA] = [#default:0,#format:#boolean,#comment: "Font Anti-Aliasing"]
---  liste[#pEnabled] = [#default:true, #format:#boolean, #comment:"Initially enabled ?"]
---  liste[#pDisableBlend] = [#format:#integer, #default:100, #range:[#min:0, #max:100], #comment:"When disabled dim to blend:"]
---  liste[#pStayHilited] = [#default:false, #format:#boolean, #comment:"Stay hilited on mouseLeave while mouse pressed ?"]
---  liste[#pRepeatDownEvent] = [#format:#integer, #default:0, #comment:"Repeat the mouseDown event while the mouse is down every <x> ms"]
---  liste[#pToggle] = [#default:false, #format:#boolean, #comment:"Toggle Button ?"]
---  liste[#pGroupName] = [#default:"", #format:#string, #comment:"Radio button group name:"]
---  liste[#pSelected] = [#default:true, #format:#boolean, #comment:"Initially Selected ?"]
---  return liste
---end
+
+
+-- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
+
+on getPropertyDescriptionList
+  if the currentspritenum = 0 then exit
+  liste = [:]
+  
+  cmonm = mGetXScript()
+  if not voidP(cmonm) then fontliste = call(#InitFonts, cmonm)
+  
+  if not listP(fontliste) then fontliste = ["Arial"]
+  
+  liste[#pCallFunction] = [#default:#funktion, #format:#symbol, #comment:"Event to sendAllSprites:"]
+  liste[#pBroadcastSprites] = [#format:#list, #default:[], #comment:"Send event to: ([] = All, [-1] = Moviescript, [0] = this Sprite)"]
+  liste[#pEventsToProcess] = [#format:#list, #default:[#mouseUp], #comment:"Which events to process:"]
+  liste[#pKeyboardshortcut] = [#default:"", #format:#string, #comment:"Keyboardshortcut:"]
+  
+  liste[#pLabel] = [#default:"Label", #format:#string, #comment:"Labeltext:"]
+  
+  liste[#pFarbe] = [#default:rgb(170,170,170),#format:#color,#comment: "Color:"]
+  liste[#pBevel] = [#default:"1 - Small Bevel", #format:#string, #range:["0 - No Bevel","1 - Small Bevel", "2 - Normal Bevel","3 - Large Bevel"], #comment:"Bevel:"]
+  liste[#pUseMember] = [#default:"myAquaButton", #format:#string, #comment:"Use prepared members based on name:"]
+  
+  liste[#pSaveImgs] = [#default:0, #format:#integer, #comment:"Save text images to which castlib (0 = dont save)"]
+  
+  liste[#pUseDefaultLayout] = [#default:0, #format:#boolean, #comment:"Use global layout settings from handler mGetDefaultButtonList()"]
+  liste[#pDefaultLayoutPreset] = [#default:"", #format:#string, #comment:"layout preset (only used when global layout = 1)"]
+  
+  liste[#pMarginH] = [#format:#integer, #default:20, #range:[#min:0, #max:30], #comment:"Margin horiz.:"]
+  liste[#pMarginV] = [#format:#integer, #default:10, #range:[#min:0, #max:20], #comment:"Margin vert.:"]
+  
+  liste[#pRotation] = [#format:#integer, #default:0, #range:[#min:0, #max:360], #comment:"Rotation:"]
+  
+  liste[#pFont] = [#format:#string, #default:fontliste[1], #range:fontliste, #comment:"Font:"]
+  liste[#pFontGroesse] = [#format:#integer, #default:10, #range:[#min:7, #max:36], #comment:"Fontsize:"]
+  liste[#pFontFarbe] = [#default:rgb(0,0,0),#format:#color,#comment: "Fontcolor"]
+  liste[#pFontHLFarbe] = [#default:rgb(0,0,0),#format:#color,#comment: "Font highlight color"]
+  liste[#pFontAA] = [#default:0,#format:#boolean,#comment: "Font Anti-Aliasing"]
+  liste[#pEnabled] = [#default:true, #format:#boolean, #comment:"Initially enabled ?"]
+  liste[#pDisableBlend] = [#format:#integer, #default:100, #range:[#min:0, #max:100], #comment:"When disabled dim to blend:"]
+  liste[#pStayHilited] = [#default:false, #format:#boolean, #comment:"Stay hilited on mouseLeave while mouse pressed ?"]
+  liste[#pRepeatDownEvent] = [#format:#integer, #default:0, #comment:"Repeat the mouseDown event while the mouse is down every <x> ms"]
+  liste[#pToggle] = [#default:false, #format:#boolean, #comment:"Toggle Button ?"]
+  liste[#pNoIcon] = [#default:false, #format:#boolean, #comment:"Don't use checkbox icon for toggle button"]
+  liste[#pGroupName] = [#default:"", #format:#string, #comment:"Radio button group name:"]
+  liste[#pSelected] = [#default:true, #format:#boolean, #comment:"Initially Selected ?"]
+  
+  return liste
+end
 
 -- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
@@ -748 +756 @@
   pOptionsListe[#keyboardshortcut] = pKeyboardshortcut
   
+  -- further properties known to this script (3-D only):
+  -- #renderformat ; default rgba8880 for images without alpha and rgba8888 for images with alpha
+  -- #useModel ; use the model with the name specified by #useModel (String) instead of an overlay (-> default)
+  
   sendSprite(me.spritenum, #mButtonManager_OverrideOptions, pOptionsListe)
 end
@@ -772 +784 @@
   -- INPUT: <options> ; property list ; huge number of properties describing the button, most of which comes from mGetDefaultButtonList()
   --                    see script "defaultLayoutDefinitions" for all properties, which are available for the layout of the button
-  --                see the below example for the porperties concerning this script:
+  --                see the below example for the properties concerning this script
+  --                see handler "mInitProps" in this script for properties too
   -- RETURNS: -
   -- CALLER: -
@@ -836 +849 @@
   tabname = options.getaprop(#myName)
   
-  if voidP(tabname) then -- Sonderfall: ohne name loescht ALLE vorherigen tabellen
+  if voidP(tabname) then -- Exception!: buttons without a name replaces ALL buttons
     tabname = "button1"