I'm glad you got it working. I don't know why, but it took nearly a week for my reply to appear....

Mark

On 20 Sep 2005, at 12:30, [EMAIL PROTECTED] wrote:

Quoting Mark Smith <[EMAIL PROTECTED]>:

Hi Mark and everyone that helped with this.
I got it sorted using this script...Basically using the background colour. I added another caveat that it only works when the mainstack is "armbase" So I can change the mainstack name in the runtime and the fields cannot be eddited
:-).



on mouseup whichone
 global field2delete
 if the mainstack of this stack is "Armbase" then
 if the controlkey is down then
 if whichone = 3 then
   put the name of me into field2delete
   set the backgroundColor of fld field2delete to "red"
 end if
else exit to top
 end if
end mouseup

on deletekey
 global field2delete
 if the backgroundColor of field field2delete is "red" then
   hide fld field2delete
   end if
end deletekey

on escapekey
 global field2delete
 set the backgroundColor of fld field2delete to empty
end escapekey

Works perfectly, however, for other objects the bordercolour would be better.

Cheers
Bob

How about drawing a red rectangle around the field:


On mouseup whgichone
global field2delete
if the controlkey is down then
   if whichone = 3 then
     put "xyz" into field2delete
     addBorder field2delete
end if
else exit to top
end mouseup

on addBorder field2delete
  put the rect of fld field2delete into cRect
  create grc "fBorder"
  set the style of grc "fBorder" to rectangle
  set the rect of grc "fBorder" to cRect
  set the penColor of grc "fBorder" to red
end addBorder


and then

on deleteKey
global field2Delete
if intersect(fld field2delete,grc "fBorder") then
hide fld field2delete
delete grc "fBorder"
end deletekey

Cheers,

Mark


On 16 Sep 2005, at 13:39, [EMAIL PROTECTED] wrote:






_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution


_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to