Hi!

I have a question form wtih about 15 to 25 question on each frame.
Every question has 5 alternatives(Badest, bad, good, very good and not att 
all).
I want the user not able to check more than one box in each question.
User can change to another of the 5 alternatives anytime.


Hey ofcource I solved all this the long way

All "badest" checkbox has this script (All five alternatives have script 
like this except another bgcolor)

on mouseUp me
  if member(the memberNum of sprite the currentSpriteNum).bgColor = rgb(255, 
255, 255) then  --if the backgrund color is white then make it red
    member(the memberNum of sprite the currentSpriteNum).bgColor = rgb(255, 
0, 0)
  else
    member(the memberNum of sprite the currentSpriteNum).bgColor = rgb(255, 
255, 255)
  end if
end

The hard part is how to make only one checkbox available in every question
This script is for question 1:

global a
on mouseUp
  set a=the memberNum of sprite the currentSpriteNum

  case (a) of:
    131: set the hilite of member 151 to FALSE
--131 badest alternativ is checked now
      member(151).bgColor = rgb(255, 255, 255)
      set the hilite of member 171 to FALSE
      member(171).bgColor = rgb(255, 255, 255)
      set the hilite of member 191 to FALSE
      member(191).bgColor = rgb(255, 255, 255)
      set the hilite of member 211 to FALSE
      member(211).bgColor = rgb(255, 255, 255)
    151:
--151 bad alternativ is checked now
      set the hilite of member 131 to FALSE
      member(131).bgColor = rgb(255, 255, 255)
      set the hilite of member 171 to FALSE
      member(171).bgColor = rgb(255, 255, 255)
      set the hilite of member 191 to FALSE
      member(191).bgColor = rgb(255, 255, 255)
      set the hilite of member 211 to FALSE
      member(211).bgColor = rgb(255, 255, 255)

171: set the hilite of member 131 to FALSE
--171 good alternativ is checked now

      member(131).bgColor = rgb(255, 255, 255)
      set the hilite of member 151 to FALSE
      member(151).bgColor = rgb(255, 255, 255)
      set the hilite of member 191 to FALSE
      member(191).bgColor = rgb(255, 255, 255)
      set the hilite of member 211 to FALSE
      member(211).bgColor = rgb(255, 255, 255)

    191: set the hilite of member 131 to FALSE
--191 very good alternativ is checked now
      member(131).bgColor = rgb(255, 255, 255)
      set the hilite of member 151 to FALSE
      member(151).bgColor = rgb(255, 255, 255)
      set the hilite of member 171 to FALSE
      member(171).bgColor = rgb(255, 255, 255)
      set the hilite of member 211 to FALSE
      member(211).bgColor = rgb(255, 255, 255)

    211: set the hilite of member 131 to FALSE
--211 not at all alternativ is checked now

      member(131).bgColor = rgb(255, 255, 255)
      set the hilite of member 151 to FALSE
      member(151).bgColor = rgb(255, 255, 255)
      set the hilite of member 191 to FALSE
      member(191).bgColor = rgb(255, 255, 255)
      set the hilite of member 171 to FALSE
      member(171).bgColor = rgb(255, 255, 255)
  end case
end

If I do like this their will be alot of scripts their must be an easier way 
right?
/Mattias

_________________________________________________________________
H�mta MSN Explorer kostnadsfritt p� http://explorer.msn.se


[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi  To post messages to the list,
email [EMAIL PROTECTED]  (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo.  Thanks!]

Reply via email to