Remote Find Questions Revisited
Wouter
wouter.abraham at pi.be
Wed Apr 28 16:37:29 EDT 2004
Possible change of script of button 2 which probably will be faster
(didn't test it yet)
> button 2:
>
> on mouseUp
> if field "Test Results" is "" then
> answer "Use button 1 first please :^)"
> exit to top
> end if
> put line 1 of field "Test Results" into x
> put "" into tList
> put the cardids of stack x into a
> repeat for each line i in a
> if the mark of card id i of stack x then
> put "card id" && i & cr after tList
> unmark card id i of stack x
> end if
> end repeat
> if tList = "" then put "no marked cards" into tList
> put cr & tList after field "Test Results"
> end mouseUp
on mouseUp
if field "Test Results" is "" then
answer "Use button 1 first please :^)"
exit to top
end if
put line 1 of field "Test Results" into x
repeat with i = 1 to the number of marked cards in stack x
put the id of marked card i of stack x & cr after tList
end repeat
repeat for each line i in tList
unmark card id i of stack x
end repeat
if tList = "" then put "no marked cards" into tList
put cr & tList after fld 1
end mouseUp
Greetings,
WA
More information about the use-livecode
mailing list