Klaus:
I am working with LC 9.6.1 Indy on a Dell PC running Windows 10. I first
find a point in the group (in this case the topleft of btn "Button 1"
Adjust it a little and then set the topright of the newly created button
"New Button". This would be the equivalent of your "where whateverX and Y
are definitively inside of that group"
The script below works on my setup:
There is a loclocked group named "Display Group" with an image and a button
"Button 1"
A button labeled "Create and Place a New Button in Group 'Display Group' out
side the group has the following script:
on mouseUp
Lock Screen
Put "Display Group" into tGroupName
Put the width of btn "Button 1" of group tGroupName into tWidth
Put the height of btn "Button 1" of group tGroupName into tHeight
Create button "New Button" in group tGroupName
## Optional resizing of the new button
Set the width btn "New Button" of group tGroupName to tWidth
Set the height of btn "New Button" of group tGroupName to tHeight
## Get a point to locate the new button.
Put the topLeft of btn "Button 1" of group tGroupName into tLocalTL
Subtract 4 from item 1 of tLocalTL
## This tLocalTL is equivalent to your "whateverX,Y"
Set the topRight of btn "New Button" of group tGroupName to tLocalTL
end mouseUp
This also works:
On MouseUp
Put "Display Group" into tGroupName
Put the rect of group tGroupName into tGroupRect
Put the loc of group tGroupName into tGroupLoc
Put 99,232 into tNewBtnLoc
--Put 400,400 into tNewBtnloc ## Try a point outside the rect of the
loclocked group
if tNewBtnLoc is within tGroupRect then
Create button "New Button" in group tGroupName
Set the loc of btn "New Button" to tNewBtnLoc
else Answer "The position of the New button would be outside the bounds of
the locked Group and therefore not visible on screen. Either unlock the
group or choose a new location within the rect of the group ("& tGroupRect
&")"
--Answer "tGroupLoc = "& tGroupLoc &return&"tGroupRect = "&tGroupRect
&return& "tNewBtnLoc = "&tNewBtnLoc
end MouseUp
Michael R Thompson
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
