LiveCode Forums.

Code: Select all

on touchMove pId, pX, pY
   
   repeat with x = 1 to the number of images in group "slogans"
      if the visible of image x of group "slogans" is true then put the short name of image x of group "slogans" into tImage
   end repeat
   set the resizeQuality of img tImage to "normal"
   set the origPic of image tImage to the text of image tImage
   put the effective width of image tImage / the effective height of image tImage into sWHRatio
   if sTouches[pId] is empty then
      put (pX, pY) into sTouches[pId]
      if the number of elements in sTouches is 2 then
      put distBetweenPts(sTouches[line 1 of the keys of sTouches], sTouches[line 2 of the keys of sTouches]) into sDist 
   end if
      
   else if the number of elements in sTouches is 2 then
      put (pX, pY) into sTouches[pId]
      local tDist
      put distBetweenPts(sTouches[line 1 of the keys of sTouches], sTouches[line 2 of the keys of sTouches]) into tDist

      if tDist is not sDist then
         local tScale
         put 1 + (tDist - sDist) / 100 * kPinchScaleRatio into tScale
         local tWidth, tHeight, tLeft, tTop
         put round(the width of image tImage * tScale) into tWidth
         put round(the height of image tImage * tScale) into tHeight
         put round(the left of graphic "frame") into tLeft
         put round(the top of image tImage) into tTop
         put round(item 1 of the loc of the current card + (the left of image tImage - item 1 of the loc of the current card) * tScale) into tLeft
         put round(item 2 of the loc of the current card + (the top of image tImage - item 2 of the loc of the current card) * tScale) into tTop
         set the rect of image tImage to (tLeft, tTop, tLeft + tWidth, tTop + tHeight)
         put tDist into sDist
      end if
      
   else
      grab image tImage --here is the issue....shouldn't it grab even if the user is not touching directly since script is in the group??
   end if
end touchMove

Code: Select all

on mousedown
   --dissalow buttons so they still work without causing funkiness
   --can dissalow specific controls this way also
   if the target contains "button" then --don't start drag on buttons. Could check for specific buttons
      pass mousedown -- if it was a button pass the mousedown and do nothing else
   else
      set the dragging of me to true --set a property to use in the mousemove handler

      set the loc of image 1 to the mouseloc -- set the position of the image to the mouse position. 
      --could ignore this part if you only want the graphic to change position AFTER the mouse begins to move
   end if
end mousedown

on mouseUp
   set the dragging of me to false -- stop moving the image when the mouse is released
end mouseUp

on mousemove
   if the dragging of me then
      set the loc of image 1 to the mouseloc -- does the actual move if the dragging of the group is true
   end if
end mousemove