Glass CMD for Windows Vista/Seven

[komalo]

I was posting the source on deviantArt but i thought it should be here since

it is considered as an example script for auto it , i hope any one find it useful

credits for the function Real Vista Aero Glass - Two functions, It's the real deal! by JamesBrooks

a screen shot added by JamesBrooks

Download & Reviews : http://komalo.deviantart.com/art/Glass-CMD...Vista-121457868

Current Exe Source :Glass_CMD___Current_Exe__.au3

Update Source : Glass_CMD___Updated__.au3

Edited May 27, 2009 by komalo

[monoceres]

Very nice. I'm going to add this to my startup folder since it looks surprisingly good

[UEZ]

Good job! My cmd backround was white and I wondered why I wasn't able to see the effect

UEZ

[MilesAhead]

Looks really nice. I don't know how good Vista is about unhooking windows that have been destroyed. I added an autoexit and an icon to it and put it in my startup folder. Very cool.

Func OnAutoItExit()
    If $hGui Then
        ShellHookWindow($hGui, 0)
    EndIf
EndFunc  ;==>OnAutoItExit

[trancexx]

I just tried it on some other windows and looks like shit but for command prompt looks really interesting. Nice.

That ClearMemory() will not work on win7. Microsoft says that they changed the name and dll from which called function is exported. Maybe like this would be better to do it in AutoIt:

Func ClearMemory()
    
    Local $hProcess = -1
    
    Local $aCall = DllCall("kernel32.dll", "hwnd", "GetCurrentProcess")
    If Not @error Then
        $hProcess = $aCall[0]
    EndIf
    
    $aCall = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'hwnd', $hProcess)
    If @error Then
        $aCall = DllCall("kernel32.dll", 'int', 'K32EmptyWorkingSet', 'hwnd', $hProcess)
        If @error Then
            Return SetError(1, 0, 0)
        EndIf
    EndIf

    If $aCall[0] Then
        Return SetError(0, 0, 1)
    EndIf

    Return SetError(0, 0, 0) ; redundant line

EndFunc

edit: no -> not

Edited May 11, 2009 by trancexx

[Xand3r]

a definate keeper nice job!

[wraithdu]

EmptyWorkingSet still exists in psapi.dll in Windows 7. Use a DLL export viewer to see it. I know some functions moved around in Win7, but I think most of the original DLLs/functions are there and redirect to the new locations.

Edited May 11, 2009 by wraithdu

[RomanK]

not useful, but very nice

Unfortunately I don't have any use for it, as I use the CMD barely.

[komalo]

Very nice. I'm going to add this to my startup folder since it looks surprisingly good

thanks , glad that you liked it

Good job! My cmd backround was white and I wondered why I wasn't able to see the effect

UEZ

change the background to black

Looks really nice. I don't know how good Vista is about unhooking windows that have been destroyed. I added an autoexit and an icon to it and put it in my startup folder. Very cool.

Func OnAutoItExit()
     If $hGui Then
         ShellHookWindow($hGui, 0)
     EndIf
 EndFunc ;==>OnAutoItExit

thanks , i will add that now

[komalo]

I just tried it on some other windows and looks like shit but for command prompt looks really interesting. Nice.

That ClearMemory() will not work on win7. Microsoft says that they changed the name and dll from which called function is exported. Maybe like this would be better to do it in AutoIt:

Func ClearMemory()
    
    Local $hProcess = -1
    
    Local $aCall = DllCall("kernel32.dll", "hwnd", "GetCurrentProcess")
    If Not @error Then
        $hProcess = $aCall[0]
    EndIf
    
    $aCall = DllCall("psapi.dll", 'int', 'EmptyWorkingSet', 'hwnd', $hProcess)
    If @error Then
        $aCall = DllCall("kernel32.dll", 'int', 'K32EmptyWorkingSet', 'hwnd', $hProcess)
        If @error Then
            Return SetError(1, 0, 0)
        EndIf
    EndIf

    If $aCall[0] Then
        Return SetError(0, 0, 1)
    EndIf

    Return SetError(0, 0, 0) ; redundant line

EndFunc

edit: no -> not

that's because vista replace the black color with the blur

a definate keeper nice job!

thanks

EmptyWorkingSet still exists in psapi.dll in Windows 7. Use a DLL export viewer to see it. I know some functions moved around in Win7, but I think most of the original DLLs/functions are there and redirect to the new locations.

yep

http://msdn.microsoft.com/en-us/library/ms682606(VS.85).aspx

Edited May 11, 2009 by komalo

[komalo]

not useful, but very nice

Unfortunately I don't have any use for it, as I use the CMD barely.

i know , but there are some people who use cmd and love this

[MilesAhead]

i know , but there are some people who use cmd and love this

I use a dialog with combo boxes in a couple of my apps to let the user

change the hotkey. After hours messing around with the blur enable

and changing the colors and text colors on button if OS >=Vista I just

about had it working. Unfortunately ComboBoxes don't let you set the

color. After a combo box selection is made you can't read it!! It's a

shame because it looks really cool.

Edited May 11, 2009 by MilesAhead

[RomanK]

as soon as you apply glass, the controls on it are like disabled. You can get around this by making a child window with disabled labels that are underlying the controls that shall be usable.

[torels]

this won't work in any way under XP right ?

[Skrip]

this won't work in any way under XP right ?

Exactly.

[MilesAhead]

as soon as you apply glass, the controls on it are like disabled. You can get around this by making a child window with disabled labels that are underlying the controls that shall be usable.

Wouldn't I have to do user drawn combo box? afaik in AutoIt you can't set the color of combo boxes. The buttons looked washed out too but by changing the colors I could at least make them usable.

[trancexx]

EmptyWorkingSet still exists in psapi.dll in Windows 7. Use a DLL export viewer to see it. I know some functions moved around in Win7, but I think most of the original DLLs/functions are there and redirect to the new locations.

I'm interested... is new psapi.dll just calling K32EmptyWorkingSet from kernel32 or is there a real function left? Could you check that (see imports maybe)? I don't have Windows 7.

One more thing. If you write some code (e.g. c++) with EmptyWorkingSet and follow instructions given by Microsoft on that link that komalo is "yep"-ing, what funtion gets called?

edit:

@komalo, hope you don't mind me being a bit off-topic now. it's just interesting to see the differences with systems.

Edited May 11, 2009 by trancexx

[MilesAhead]

Wouldn't I have to do user drawn combo box? afaik in AutoIt you can't set the color of combo boxes. The buttons looked washed out too but by changing the colors I could at least make them usable.

I used VistaGlass.au3. Looks almost as cool.

[torels]

I used VistaGlass.au3. Looks almost as cool.

Link Please

[AdmiralAlkex]

Link Please

Looks like THIS by JamesBrooks