HTML agtig pulldown-menu

ja, du kan anvende dropdown list behavior som du finder i behavior library. Det andet er vanskeligt at finde noget om, men prøv at kikke disse koder. Desværre har jeg ikke tid til mere hjælp.

on beginSprite me
  --put in the default text and somehow know the sprite holding the
dropdown list
  sprite(me.spriteNum).member.text = "Select an item"
  me.pTOG = 6
  me.pTextchanged = false
  sprite(7).visible = false
  sprite(8).visible = false
end beginSprite
----------------------------------------------------------------------------------------------------------

on mouseEnter me
  sprite(me.pTOG).visible = not sprite(me.pTOG).visible
end mouseEnter
----------------------------------------------------------------------------------------------------------

on mouseDown me
  sprite(me.pTOG).visible = false
end mouseDown
----------------------------------------------------------------------------------------------------------

on mouseUp me
  if pTextchanged then
    x = sprite(pTOG).myList.findPos(sprite(me.spriteNum).member.text)
    x = sprite(pTOG).myList[x] & sprite(me.spriteNum).member.text
    member("dummyPict").fileName = x
    member("dummyPict").regPoint = point( member("dummyPict").width / 2,
member("dummyPict").height / 2)
    temp = scale()
    sprite(2).width = temp[1]
    sprite(2).height = temp[2]
    sprite(2).visible = true
    sprite(3).member.text = x & return & member("dummyPict").width &&
"x" && member("dummyPict").height
    sprite(3).visible = true
    me.pTextchanged = false --unless you want to see a different
picture, this button don't work twice
  end if
end mouseUp
----------------------------------------------------------------------------------------------------------

on scale
  x = member("dummyPict").width
  y = member("dummyPict").height

  if y  x then
    if y  400 then

      x = x * 400 / y
      y = 400
    end if
  else
    if x  600 then

      y = y * 600 / x
        x = 600
    end if
  end if
  return [x, y]
end scale
----------------------------------------------------------------------------------------------------------
--SS to put on the list field


property myList
property pLstName
property pSelectBox
----------------------------------------------------------------------------------------------------------

on beginSprite me
  me.myList = buildDeList() --fill from another handler which, using
getNthFileNameInFolder(),
  --returns a property list of filenames ending with .jpg and their paths
  me.pLstName = "list_field"
  me.pSelectBox = 5
  maxLines = 5 --i want 5 lines in my drop down box, then it should
start scrolling

  --put in the text
  member(me.pLstName).text = ""
  member(me.pLstName).boxType = #adjust
  member(me.pLstName).text = ""
  maxNum = me.myList.count

  repeat with i = 1 to maxNum
    --keep making bigger until it gets to be a certain size, then start
scrolling
    if i = maxLines then
      if maxNum  maxLines then
        member(me.pLstName).boxType = #scroll
      end if
    end if

    member(me.pLstName).text = member(me.pLstName).text & RETURN &
me.myList.getPropAt(i)
  end repeat

  delete member(me.pLstName).char[1] --delete the first return
  sprite(me.spriteNum).member.scrollTop = 0 --put the first line to the
top
  sprite(me.spriteNum).visible = false --hide self
end beginSprite
----------------------------------------------------------------------------------------------------------

on mouseDown me
  member(me.pLstName).line[the mouseLine].hilite()
end mouseDown

----------------------------------------------------------------------------------------------------------

on mouseUp me
  sprite(me.pSelectBox).member.text = member(me.pLstName).line[the
mouseLine]
  sprite(me.spriteNum).visible = false
  sprite(me.pSelectBox).pTextchanged = true
end mouseUp