Grouping

Saturday, December 30, 2006 by Dreamdesign3d | Discussion: Widget talk

For some odd reason when I group a set of objects together they are all moving at the same time, and I’m not wanting them to. The way I use to do it was group them normal so I could have another object to control them but you could still move them independently. Any idea of what I’m doing wrong?
10 Reply 7 Referrals
ZubaZ
Reply #1 Saturday, December 30, 2006 5:16 PM
You can always move them seperatly by holding down the control. By grouping by definition means they act as one object.

What are you trying to control? Maybe there's a better way of doing it. Scripting maybe?

Dreamdesign3d
Reply #2 Saturday, December 30, 2006 7:53 PM
I have one object toggling the show/hide function on a bunch of little ones all at the same time. Never seem to have a problem with the grouping before not sure what I’m doing wrong this time.

sViz
Reply #3 Sunday, December 31, 2006 8:06 AM
If your object's all have the same parent but are NOT grouped you can move them at the same time by moving the parent and you can still move the child objects independantly. Could that be what you did differently?

Dreamdesign3d
Reply #4 Monday, January 1, 2007 10:53 AM
The only reason I want to group the little objects is so when I click on the one big object it toggles the show/hide of the whole group of little ones. I don’t want any of the objects to move together. I did this a few years back before I got DX Pro and it worked out fine. What I did was made a whole theme out of DX and on the bar there was a button that when you clicked on it would show/hide all the other objects like the clock, calendar, and the menu access.

sViz
Reply #5 Thursday, January 4, 2007 6:57 AM
Hmm, I think I remember at one time there was an option to not have the objects move as one. There are other options besides grouping:

This script would go in the controller

Sub Object_OnLbuttonUp(x,y,dragged)
If Not dragged Then
'Identify if objects are already hidden or showing
Select Case Desktopx.Object("1").visible
Case True
showhide= False
Case False
showhide= True
End Select
'Set objects visibility
Desktopx.Object("1").visible = showhide
Desktopx.Object("2").visible = showhide
Desktopx.Object("3").visible = showhide
End If
End Sub




Or if you name all of the objects you want to control sequentially like this: object1, object2, object3 etc. OR item1, item2, item3 etc.

Then you could use this script:

Dim numofobjs
'Define number of objects to control
numofobjs = 3

Sub Object_OnLbuttonUp(x,y,dragged)
If Not dragged Then toggle
End Sub

Function toggle
'Check the visiblity of object
Select Case Desktopx.Object("object1").visible
Case True
showhide= False
Case False
showhide= True
End Select
'Reset visibility of objects
For x= 1 To numofobjs
desktopx.Object("object" & x).visible =showhide
Next
End Function

Dreamdesign3d
Reply #6 Friday, January 5, 2007 12:34 AM
Thank you for the scripts, I am by no means a scripter so I have no clue. In your first example I tried it using opjects p_01, p_02, and p_03, and the main clickable object was called main. The problem I had was it would only work if the objects started out visible, and would not show them on clicking a second time. Another question I have is once these objects are turned into wigets wouldn’t I have to change this Destopx.object(“1”).visible=showhide to wiget(“1”).visible=showhide or am I off my rocker? In your second example I could not figure out what I needed to change to get it to work.

Thank you for taking the time to help me with this.

sViz
Reply #7 Friday, January 5, 2007 6:36 AM
I can't seem to replicate the problem you're referring to on the 1st script. I set the visibilty of all the objects to 'no' so that they were hidden. Then I inserted the script and it worked. Make sure your "main" object type is set to 'layer' and not 'object controller'. In your other objects, go to Properties > Relation > Popup and make sure it's set to 'static'. Any other settings would interfere with the script.


On the 2nd script I would recommend that you change the names to p_1, p_2, p_3 (instead of p_01 etc.) it won't work otherwise. With that in mind this is how it should look:


Dim numofobjs
'Define number of objects to control
numofobjs = 3 '---Change this number to amount of objects

Sub Object_OnLbuttonUp(x,y,dragged)
If Not dragged Then toggle
End Sub

Function toggle
'Check the visiblity of object
Select Case Desktopx.Object("p_1").visible
Case True
showhide= False
Case False
showhide= True
End Select
'Reset visibility of objects
For x= 1 To numofobjs
desktopx.Object("p_" & x).visible =showhide
Next
End Function



If you are exporting all the objects together as a widget then there's no need to change desktopx.object to widget However if you are exporting them as four seperate widgets then I'm afraid I know of no way for different widgets to communicate with each other through scripts.



Dreamdesign3d
Reply #8 Friday, January 5, 2007 10:38 AM
Ok on my test objects this second script worked exactly how I needed it to this is awesome, my problem was in thinking I had to add other lines for the other objects in Select Case Desktopx.Object(“p_1”).visible then under that added the same line with p_2 etc. trying to learn this scripting as I go, I want to understand the meaning of each line. The one thing I understood was in the line desktopx.object(“p_&x).visible=showhide the & symbol is like a wild card. Cant wait to get to work on the real objects to test this out thank you for all your help and time.

ZubaZ
Reply #9 Friday, January 5, 2007 10:43 AM
sVis, these snippets of code that you must spend a ton of time getting to work might go to waste if they are not captured.

Have you thought about adding them to the DX wiki here: http://scratchpad.wikia.com/wiki/DesktopX ?

sViz
Reply #10 Friday, January 5, 2007 10:45 AM
You're welcome, dreamdesign3d. Keep at it, we've all been there. Wasn't so long ago when I couldn't understand anything in DX, myself.

Be sure to check out w3schools.com for more VBScript information. You can start here at: VBScript Variables and keep going.


EDIT: I'll check it out Zubaz.
EDIT#2: I forgot to mention I just started a blog where I'll be posting some tutorials--sViz at JoeUser

Please login to comment and/or vote for this skin.

Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:

  • Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
  • Access to a great community, with a massive database of many, many areas of interest.
  • Access to contests & subscription offers like exclusive emails.
  • It's simple, and FREE!
Login

Home | About | Privacy | Upload Guidelines | Terms of Service | Help
Copyright © Stardock Corporation. All Rights Reserved.


web-wc01