REVO2700& ResizeGroup@on deleteAnObject whichOne --breakpoint delete whichOne --remove whichOne from this card end deleteAnObject $ ResizeGroup  ULucida Grande ULucida Grande WLucida Grande cRevOnlineid387cRevStandaloneSettingsBscriptLibrariesInternet Geometry PrintingMacOSXfalseMacOS,documentTypeUNIX,fileSelectortrueWindowsfalseWeb,WindowsSupportedtrueWindows,LegalCopyright#2009 All rights reserved worldwideUNIX,pageSetuptrueWebfalse answerDialogtrueWeb,LinuxSupportedtrueWindows,FileDescription(resizeGroupMtecedor2 1.0.0.0 for WindowsOSX,longVersionresizeGroupMtecedor2 1.0.0.0Web,RequestedNameWindows,buildU3falseOSX,copyright#2009 All rights reserved worldwideWeb,CustomBackgroundColor 237,237,237Web,CustomLoadIconMacOS,versionnumber11MacOS,versionnumber20MacOS,ReleaseFinalOSX,identifiercom..resizegroupmtecedor2nameresizeGroupMtecedor2MacOS,versionnumber30OSX,shortVersion1.0.0.0Web,InstanceIdWindows,fileversion11Windows,fileversion20Windows,fileversion30cursorsfalseWindows,fileversion40Web,MacOSXSupportedtrueMacOSX PowerPC-32falseMacOS,dynamicMemorytrue Windows,UUID$0868E575-7E9F-4A79-89E7-D0A39053E8D3MacOS,PreferredSize15000MacOS,creator???? OSX,nameresizeGroupMtecedor2MacOS,longVersionresizeGroupMtecedor2 1.0.0.0OSX,documentTypeWeb,MinEnvironmentVersion inclusionssearchWindows,documenticonFilee/Applications/Revolution Studio/4.0.0-dp-4/Runtime/Windows/x86-32/Support/Sample Icons/genericdoc.icoOSX,documentExtension Web,Domain0xFFWeb,AllowOtherPlatformstrueUNIX,printerChoosertrueWeb,DetectSecurityPermissionstrueMacOS,MinimumSize15000Web,SecurityPermissions,,,,,,,, MacOS,Region1Windows,productversion11Windows,productversion20Windows,productversion30Windows,productversion40 OSX,info$resizeGroupMtecedor2 Version 1.0.0.0Web,ExecutionModeBrowserWeb,CustomBackgroundColor2 237,237,237 askDialogtrueOSX,signature????Windows,iconFilee/Applications/Revolution Studio/4.0.0-dp-4/Runtime/Windows/x86-32/Support/Sample Icons/genericapp.icoWindows,ProductNameresizeGroupMtecedor2 Web,UUID$D7896AC3-86D2-4536-952A-C91AD33BB7D0UNIX,colorChoosertrueMacOSX x86-32falseWindows,companyname cREVGeneralscripteditorvscroll0breakpointconditionsscripteditorselection32 breakpointsbreakpointstatesstackfileversion2.7cREVGeometryCachestackID1062 @ tRevGeneral tRevUniqueID 1257335936761 cREVGeneral revUniqueID 1257335935759scripteditorvscroll0scripteditorselection0cREVGeometryCacheIDs1257286564103101812572879935101019125801870797410321257280631234101012572806206791008cREVGeometrycacheorder total5group id 1010i'on mouseDown grab me end mouseDown G1 tRevGeneral tRevUniqueID 1257280632244 cREVGeneral revUniqueID 1257280631234scripteditorvscroll0scripteditorselection0OvalKDK5h cREVGeneral revUniqueID 1257287993510 Field)`sSxZ cREVGeneral revUniqueID 1257280620679  TClick in the bottom right red square and drag to change size of red oval and field. -Click in red oval to move everything around. The resize script is in the red square. You can copy this script and put it into a similar resize control (could be a graphic or an image). I should work as long as your group has one graphic and one field. It is advised that the resize handle be the fronmost control in the group (the one with the lowest number in the property inspector/Size and position. @You can clone such groups without loss of resize functionality. regards Bernd Niggemann, Oct. 09 `TXaHandlet local msgID, tHorzDiff, tVertDiff, tMinWidth, tMinHeight, tFieldTopLeft, tGrcTopleft on mouseDown set the traversalOn of field 1 of the owner of me to false put the topLeft of field 1 of of the owner of me into tFieldTopLeft put the topLeft of grc 1 of of the owner of me into tGrcTopleft put the clickLoc into tClick put the loc of me into myLoc -- adjust for the mouse offset, otherwise it would jump put the bottomRight of grc 1 of of the owner of me into tGraphicBotRight put item 1 of tGraphicBotRight - item 1 of tClick into tHorzDiff put item 2 of tGraphicBotRight - item 2 of tClick into tVertDiff put 200 into tMinWidth -- adjust for your minimal width put 150 into tMinHeight -- adjust for your minimal height send followMe to me in 0 milliseconds put the result into msgID end mouseDown on followMe if the mouse is up then cancel msgID click at 1,1 -- somehow this avoids occasional short unresponsiveness of the resize control ??? set the traversalOn of field 1 of the owner of me to true exit followMe end if put the mouseLoc into newLoc -- adjust for the offset of the mouseClick add tHorzDiff to item 1 of newLoc add tVertDiff to item 2 of newLoc -- take care that the new size is not to small, if item 1 of newLoc - item 1 of tGrcTopleft < tMinWidth then put item 1 of tGrcTopleft + tMinWidth into item 1 of newLoc end if if item 2 of newLoc - item 2 of tGrcTopleft < tMinHeight then put item 2 of tGrcTopleft + tMinHeight into item 2 of newLoc end if lock screen -- calculate new width and height of the graphic put item 1 of newLoc - item 1 of tGrcTopleft into tNewWidthGraphic put item 2 of newLoc - item 2 of tGrcTopleft into tNewHeightGraphic -- set width and height of graphic set the width of grc 1 of of the owner of me to tNewWidthGraphic set the height of grc 1 of of the owner of me to tNewHeightGraphic set the topLeft of grc 1 of of the owner of me to tGrcTopleft -- calculate new width and height of text field in percent of graphic set the width of field 1 of of the owner of me to round (tNewWidthGraphic * .6) -- adjust the ratio width graphic/field, now 60 % set the height of field 1 of of the owner of me to round (tNewHeightGraphic * .6) -- adjust the ratio height graphic/field, now 60% set the loc of field 1 of of the owner of me to the loc of grc 1 of of the owner of me -- now adjust the locaction of this resize control set the right of me to the right of grc 1 of of the owner of me set the bottom of me to the bottom of grc 1 of of the owner of me set the topleft of image "myDelete" of the owner of me to the topleft of grc 1 of the owner of me unlock screen if followMe is not in the pendingMessages then send followMe to me in 10 milliseconds put the result into msgID end if end followMe kPNG  IHDR gAMA=-f"IDAT8c򟁊8jਁ8 QQZIENDB` tRevGeneral tRevUniqueID 1257286565121 cREVGeneral revUniqueID 1257286564103scripteditorvscroll611scripteditorselection2755 myDeleteton mouseUp answer "this will delete this group" with "Cancel" and "OK" if it is "OK" then -- the handler deleteAnObject is in the stack script send "deleteAnObject" && (the long id of the owner of me) to this stack in 2 milliseconds end if end mouseUp K5PNG  IHDRW?gAMA=-f PLTE$]?tRNS A4IDATc` `d$A&* `bedeĦ5" l8DI!)E"ZIENDB` cREVGeneralscripteditorvscroll0 revUniqueID 1258018707974scripteditorselection155 revOnline | RunRev