LiveCode Forums.

Code: Select all

on arrowKey theKey
   if the shiftkey is down then
      if theKey is down then
         put the hilitedLines of the selectedField into myLines
         if myLines is not empty then
            put comma & max(myLines)+1 after myLines
            set the hilitedLines of the selectedField to myLines
         end if
      else if theKey is up then
         put the hilitedLines of the selectedField into myLines
         if myLines is not empty and item 1 of myLines is not 1 then
            put max(1,min(myLines)-1) & comma before myLines
            set the hilitedLines of the selectedField to myLines
         end if
      end if
   else
      -- put there what you want to do if the
      -- shiftKey is up
      pass arrowKey
   end if
end arrowKey