Excellent, Andy! Thanks for sharing this.
The only minor, cosmetic change I made was on the next to last line:
set the textColor of line tcl of me to empty
My hilite color was set to a dark blue, and the black on dark blue was hard to
read. Setting it back to empty means that it will go to a contrasting white
when highlighted.
Devin
On Feb 2, 2017, at 11:48 AM, AndyP via use-livecode
<[email protected]<mailto:[email protected]>> wrote:
Modified script
added
/if within (field "myField", the mouseLoc) is true then /
on mouseDown
put word 2 of the clickLine into tcl
set the textcolor of line tcl of me to "red"
if line tcl of me is empty then
exit mousedown
end if
put item 2 of the mouseLoc into tstarty
put the effective textHeight of me into th
repeat while the mouse is down
if item 2 of the mouseLoc - tstarty > (th/2) then
if within (field "myField", the mouseLoc) is true then
lock screen
put cr & line tcl of me after line tcl + 1 of me
delete line tcl of me
add 1 to tcl
set the textcolor of line tcl of me to "red"
add th to tstarty
unlock screen
end if
else if tstarty - item 2 of the mouseLoc > (th/2) then
if within (field "myField", the mouseLoc) is true then
lock screen
put line tcl of me & cr before line tcl - 1 of me
delete line tcl + 1 of me
subtract 1 from tcl
set the textcolor of line tcl of me to "red"
subtract th from tstarty
unlock screen
end if
end if
end repeat
set the textcolor of line tcl of me to "black"
set the hilitedLine of me to tcl
end mouseDown
-----
Andy Piddock
My software never has bugs. It just develops random features.
TinyIDE a Free alternative minimalist IDE Plugin for LiveCode
TinyIDE
Script editor Themer for LC http://2108.co.uk
PointandSee is a FREE simple but full featured under cursor colour picker /
finder.
http://www.pointandsee.co.uk - made with LiveCode
--
View this message in context:
http://runtime-revolution.278305.n4.nabble.com/Drag-List-Items-Up-and-Down-tp4712158p4712166.html
Sent from the Revolution - User mailing list archive at
Nabble.com<http://Nabble.com>.
_______________________________________________
use-livecode mailing list
[email protected]<mailto:[email protected]>
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
Devin Asay
Director
Office of Digital Humanities
Brigham Young University
_______________________________________________
use-livecode mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
