Sign in to follow this  
Followers 0
ashley

Vista sidebar addons for XP

12 posts in this topic

#1 ·  Posted (edited)

Vista sidebar addons for XP

Notepad *Updated 15/07/07*

#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.2.2.0
 Author:         Ashley

 Script Function:
    A Vista Style Sidebar addon for xp

#ce ----------------------------------------------------------------------------
#include <Color.au3>
#include <GuiConstants.au3>
#NoTrayIcon

HotKeySet("^p", "PopUp")
HotKeySet("^h", "Hide")

$Style = "Vista style sidebar addons for XP"


$sGUI = GUICreate("Notes" & $Style, 225, 110, @DesktopWidth / 2 + 358, @DesktopHeight / 170, BitOR($WS_POPUP, $WS_EX_TOPMOST), $WS_EX_TOOLWINDOW)
$Edit = GUICtrlCreateEdit(" Press ESC to exit Press Ctrl + P to show Press Ctrl + H to hide", 5, 5, 147, 72)
GUICtrlSetLimit($Edit, 500)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
$save = GUICtrlCreateButton("(Not allowed)", 5, 80, 27, 25, $BS_BITMAP)
GUICtrlSetImage(-1, "C:\Documents and Settings\Windows\Desktop\save.bmp", 0)
$Open = GUICtrlCreateButton("", 125, 80, 27, 25, $BS_BITMAP)
GUICtrlSetImage(-1, "C:\Documents and Settings\Windows\Desktop\open.bmp", 0)
GUICtrlCreateLabel("Made by Ashley", 38, 85, 79, 17)

$size = WinGetClientSize($sGUI)
$step = $size[0] / 1
_GUICtrlCreateGradient(0x578A9D, 0x8AAE2E, 0*$step, 0, $step, $size[1])
GUISetState()


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Edit
            $sRead = GUICtrlRead($Edit)
        Case $Save
            $save_dialog = FileSaveDialog("Save Note as...", "", "Text files  (*.TXT)")
            FileWrite($save_dialog & ".Txt", GUICtrlRead($Edit))
            Case $Open
            $open_dialog = FileOpenDialog("Open Note...", "", "Text files  (*.TXT)")
            GUICtrlSetData($Edit, FileRead($open_dialog))
    EndSwitch
WEnd

Func PopUp()
GUISetState(@SW_SHOW, HWnd($sGUI))
WinSetOnTop($sGUI, "", 1)
EndFunc

Func Hide()
    GUISetState(@SW_HIDE, HWnd($sGUI))
EndFunc



Func _GUICtrlCreateGradient($nStartColor, $nEndColor, $nX, $nY, $nWidth, $nHeight)
    Local $color1R = _ColorGetRed($nStartColor)
    Local $color1G = _ColorGetGreen($nStartColor)
    Local $color1B = _ColorGetBlue($nStartColor)

    Local $nStepR = (_ColorGetRed($nEndColor) - $color1R) / $step
    Local $nStepG = (_ColorGetGreen($nEndColor) - $color1G) / $step
    Local $nStepB = (_ColorGetBlue($nEndColor) - $color1B) / $step

    GuiCtrlCreateGraphic($nX, $nY, $nWidth, $nHeight)
    For $i = 0 To $nWidth
        $sColor = "0x" & StringFormat("%02X%02X%02X", $color1R+$nStepR*$i, $color1G+$nStepG*$i, $color1B+$nStepB*$i)
        GUICtrlSetGraphic(-1, $GUI_GR_COLOR, $sColor, 0xffffff)
        GUICtrlSetGraphic(-1, $GUI_GR_MOVE, $i, 0)
        GUICtrlSetGraphic(-1, $GUI_GR_LINE, $i, $nHeight)
    Next
EndFunc

make your own sidebar addons and post them here

Edited by ashley

Share this post


Link to post
Share on other sites



#3 ·  Posted (edited)

Use PaulIA's lib functions to get a transparent GUI etc. This could be way better :whistle:

ok ...

ill look...

i had a look.. but i cant seem to find much... can u tell me the file names... to use...

Anybody gona make there own

Edited by ashley

Share this post


Link to post
Share on other sites

你们好牛啊!可惜E文看不懂!

Share this post


Link to post
Share on other sites

#6 ·  Posted (edited)

I can not run this script on my laptop.

你们好牛啊!可惜E文看不懂!

Somebody explain this please? Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites

#8 ·  Posted (edited)

你们好牛啊!可惜E文看不懂!

Corrrect translation since I am a Chinese.

You guys rock. Too bad I can't understand English.

Edit:Step to step translation

你们=You guys/fellas/folks 好牛=Rock啊=to emphasize !可惜=Unfortunately/Too bad E文=English 看不懂=Cannot understand!

To JamesB: I never talked about it, but sometimes you'll see me replying some topic with Chinese characters.

Edited by Generator

Share this post


Link to post
Share on other sites

On Topic: Doesn't look bad, but to be able to drag it around would be nice.

Share this post


Link to post
Share on other sites

very good work men, the true is tha i like me you idea

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0