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