LiveCode Forums.

Code: Select all

on scrollbarLineDec
  put the short name of the target into sn
  switch sn
     case "width"
       put min(400,1+fld sn) into fld sn -- adjust 400 to your maxWidth
       set width of fld buttonnumber to fld sn
       break
     case "height" ...
  end switch
end scrollbarLineDec

on scrollbarLineInc
  put the short name of the target into sn
  switch sn
     case "width"
       put max(32,-1+fld sn) into fld sn -- adjust 32 to your minWidth
       set width of fld buttonnumber to fld sn
       break
     case "height" ...
  end switch
end scrollbarLineInc

Code: Select all

local resize

on mouseDown b
   select me
   if item 1 of clickLoc() - item 3 of rect of me < -5 then
      grab me
   else
      put true into resize
   end if
end mouseDown

on mouseup
   put false into resize
end mouseup

on mouserelease
  put false into resize
end mouserelease

on mouseMove x, y
   if resize = true then
      put the top of me into myTop
      set the height of me to (the height of me - (the bottom of me -item 2 of mouseLoc() ))
      set the top of me to myTop
      put the left of me into myLeft
      set the width of me to (the width of me - (the right of me -item 1 of mouseLoc() ))
      set the left of me to myLeft
   end if
end mouseMove