Ok..............Thanks for help and do you know how to make move over effect like in windows sidebar???          

Move over effect?

Yes ,,i mean while the mouse is over the desired icon in sidebar a box like effect appears like in win 7???????????????

Easy, just add a second state to the icon/object that has the effect/box you want. Call it the mouse over state.

You see, in DX you can add states to an object on the "states" tab in properties.

Doesn't have any script for that????????????

I have an image for that to get mouse over effect!!!

try it or any other way for that???? suggest me........ 

You don't need a script for that. You need an object with 2 states. Mouse away and mouse over. That simple.

Here is a short video I made to show you how.

http://screencast.com/t/lz8VlvJtJbk

I don't know why that video runs so fast. Strange. Hopefully you can slow it or pause it on and off or something.

Ok, I remade the video. This one runs slower for some reason.

http://screencast.com/t/Sy33jgwfB

Also, if you're saying you already have the mouse over state set and you want additional functions or whatever, see OnMouseEnter:

There is also OnMouseLeave. See the DX User's Guide for more: https://www.stardock.com/products/desktopx/help/toc.htm   And the Wincustomize Wiki: http://wiki.wincustomize.com/wiki/Category:Tutorials

Or you can script it.

Okay, I ran the gadget. It's not much of a sidebar. The bar is just a static background image which doesn't dock the screen (can be dragged away) and none of the 'gadgets' actually dock onto the bar. They sit on top and can be dragged around.  From what I can tell, they are *not* separate gadgets. It is a large collection of widgets/objects (which you can find here in the galleries) into one gadget. It appears to me that the author used show/hide toggle to 'open' and 'close' the objects, as RND had suggested earlier.

The Windows 'window' and other effects are images, so,  a look into the program folder, and you'll see the author did use images for each state. I highly doubt the author scripted mouse over effects. 

ya i need that script for mouse over effect

friends "sviz and RedneckDude"  plz dont be angry on me if im making you feel irritated by asking same question

just try it guys if ypu get that you give me other wise no problem 

becoz u have helped me more .........thanks for that 

plz reply 

i wil be waiting 

I'm not angry. Everyone needs help, and we're here to help.

However, I'm afraid I can help you no further. I am sorry.

I hope you find a way to accomplish what you seek to do.

OK,,I think i got some idea!!!!!!!!!!!!!!!!!!!!!

hope it works but its upon Ur both responses,,,,,

Here i will say it...

There are three objects named Main object , Sub object and Details viewer object

when i keep the mouse over the Main object it must make sub object and Details viewer object visible and on mouse leave it must be invisible..........if i get the Script for this then

i will make the Main object as icon,,sub object as mouse over background image like in actual sidebar and Details viewer is for viewing the detail of the object on which mouse is upon...

Thanks in advance

'Called on mouse over object

Sub Object_OnMouseEnter

DesktopX.Object("subobject").visible = True

desktopx.Object("details").visible = True

End Sub

'Called when mouse leaves object

Sub Object_OnMouseLeave

DesktopX.Object("subobject").visible = False

desktopx.Object("details").visible = False

End Sub

The script should go in the main object

Hooooooooooooooooooooooooooooo yes!!!!!!!!!!!!!!

Thanks SVIZ it worked 

I got both Mouse over effect and also the details of that to show in bottom of my widget........

Thank you so much bro,,,

and i have make a object and made it as help button ,,,and added the menus for that 

1 Help and support

2  Main me i.e.,my email id

3 Contact Us i.e, site

4 Online help i.e., my facebook account

but the thing is i dont know how to add the links for that like for Help and support i want Google.co.in1

for 2 Google.co.in2 ,,for 3 Google.co.in3 ,,,for 4 Google.co.in4...I want script for these and also for adding Mail me....

thanks in advance....

Define 'menu'? If each of your 4 help options is a separate object, then you need only make each of these objects a URL object: Properties > General > Change object type

For the record, sViz isn't a bro.  She's a sis...lol.

Oh ok ,,,sorry

Not that im asking about right click or left click menu...

Dim IsMinimized
'Called when the script is executed
Sub Object_OnScriptEnter
IsMinimized = False
desktopx.RegisterController Object.Name
End Sub

'Called when the script is terminated
Sub Object_OnScriptExit

End Sub

Function Object_OnLButtonUp(x,y,dragged)
If dragged = False Then
Call PopupMenu
End If
End Function

Function PopupMenu()
Set mainmenu = nothing
Set mainmenu = DesktopX.CreatePopupMenu '-- Create Main Men
mainmenu.AppendMenu 0, 1, "Help & support"
mainmenu.AppendMenu 0, 2, "Froums"
mainmenu.AppendMenu &H00000800, 100, "seperator"
mainmenu.AppendMenu 0, 3, "Contact us"
mainmenu.AppendMenu 0, 5, "Visit Us"

result = mainmenu.TrackPopupMenu(0, System.CursorX, System.CursorY)
Select Case result
Case 1
??????????????????????
Case 2
????????????????????????
Case 3
????????????????????
Case 4
???????????????????
Case 5
??????????????????
End Select
End Function

Function PopupMenuTray()
Set mainmenu = nothing
Set mainmenu = DesktopX.CreatePopupMenu '-- Create Main Men

mainmenu.AppendMenu 0, 1, "Restore from Tray"
mainmenu.AppendMenu 0, 2, "Close"

result = mainmenu.TrackPopupMenu(0, System.CursorX, System.CursorY)
Select Case result
Case 1
IsMinimized = False
object.Visible = True
Case 2
widget.Close
End Select
End Function

Function OnControl(lType, lCode)
'desktopx.Object("testing").text = desktopx.Object("testing").text & lType & " " & lCode & vbnewline
OnControl = True
ShowMenu = False
If lType=2 And lCode=517 Then ShowMenu = True
If lType=1 And lCode=2 Then ShowMenu = True ' RIGHT CLICK ON ITEM

If ShowMenu = True Then
OnControl = True
If IsMinimized = True Then
Call PopupMenuTray
Else
Call PopupMenu
End If
End If
End Function

what to be inserted in the Cases ??? I need urls in place of ????????????????????????

Easiest way I know of, you'll need to call another function from those places: 

Sub runApp(app)

On Error Resume Next

Set Sh = CreateObject("WScript.Shell")

Sh.Run (Chr(34)& app & Chr(34))

Set Sh = Nothing

End Sub

That function will run any URL (or program) passed to it. Now, for each Case in the PopUpMenu function use the line below to call the runApp function and pass the URL (replace the URL with your own):

Select Case result

Case 1

runApp("https://www.wincustomize.com")

Case 2

'...etc...

End Select

Couldn't Understand

plz modify the script and Post it again here plz( whole Script)

ok got it done.... and What about Email>?? i mean Email Id