LiveCode Forums.

Code: Select all

   on menuPick itemPicked
  switch itemPicked
  case "Living Room"
    Put 0.80  into  roomsens
    break
  case "Lounge"
    Put 0.80 into roomsens
    break
case "Other"
     Ask "What is the room name"
     put return & it after button "theItem"
         put 0.80 into roomsens
    break
end switch
call MouseUp of button "Calc" of first card
end menuPick

Code: Select all

  switch itemPicked
  case "Living Room"
    Put 0.80  into  roomsens
    break
  case "Lounge"
    Put 0.80 into roomsens
    break
  case "Other"
     Ask "What is the room name"
     
     ## Store th ANSWER for later use:
     put it into tAnswer
     put return & tAnswer after button "theItem"
     put 0.80 into roomsens

    ## Now do whatever you want with tAnswer
    put tAnswer into fld "whatever field you mean..."
    break
  end switch

  ## Put QUOTES around the message to CALL or SEND!
  send "mouseup" to btn "Calc" of cd 1
end menuPick

Code: Select all

  case "Other"
           Ask "What is the room name"
          ## Store th ANSWER for later use:
     put it into tAnswer
     put return & tAnswer after button "theItem"
     put 0.80 into roomsens

    ## Now do whatever you want with tAnswer
    put tAnswer into fld "theItem"
    break

Code: Select all

on menuPick pItemName
   switch pItemName
      case "Living Room"
         put 0.80 into roomsens
         break
      case "Lounge"
         Put 0.80 into roomsens
         break
      case "Other"
         ask "What is the room name?"
         -- check if the user cancelled and only proceed if they didn't
         if the result is not "Cancel" then
            -- store the value they submitted
            put it into tAnswer
            -- stick it at the end of the list, overwriting the line for "Other"
            put  tAnswer into line -1 of me
            -- sort the new list with the extra item, but without having to worry about "Other" appearing in the middle of the list
            sort me ascending text
            -- add a new line at the end for the "Other" option to be the last item again
            put cr & "Other" after me
            -- you can set the label of the comboBox to show the currently selected item being the one newly inserted
            set the label of me to tAnswer
            -- or you can find out which line the newly inserted item is on and 
            -- set the menuHistory to the corresponding line number by uncommenting
            -- the relevant line below.
            -- if you set the menuHistory then another menuPick message is generated
            -- which may or may not be desired. In this case it would not have any different effect, but
            -- you may want to prevent a duplicate calculation, for instance
            -- set the menuHistory of me to lineOffset(tAnswer,the text of me)
            -- do anything else you need to
            put 0.80 into roomsens
         end if
         break
   end switch
   -- fire off the calculation handler, as Klaus said, change the on mouseUp script of your "Calc" button to 
   -- run the same command we do here:
   doTheCalc
   -- I picked an arbitrary name for the command handler, of course!
end menuPick

Code: Select all

Global roomsens
command TheCalc
      if the text of fld "Length" is a number or the text of fld "Width" is a number or the text of fld "Height" is a number then
         put fld "Length" *  fld "Width" * fld "Height" * roomsens into fld "Result"
      End if
end TheCalc

Code: Select all

Global roomsens
command TheCalc
    put field "Length" into tLength
    put field "Width" into tWidth
    put field "Height" into tHeight
    if tLength is a number and tWidth is a number and tHeight is a number then
        put tLength * tWidth * tHeight * roomsens into field "Result"
    end if
end TheCalc

Code: Select all

switch pItemName
    case "Living Room"
    case "Lounge"
    case "Billiard Room"
    case "Study"
        put "Colonel Mustard" into theSuspect
        break
    case "Kitchen"
    case "Conservatory"
        put "Miss Scarlet" into theSuspect
        break
    default
        put "Professor Plum" into theSuspect
end switch