AutoHotkey Homepage AutoHotkey Community
Let's help each other out
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

a new kind of desk top (COMPLEATED)

 
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Ask for Help
View previous topic :: View next topic  
Author Message
etopsirhc



Joined: 12 Mar 2008
Posts: 32
Location: OR
PostPosted: Mon Sep 08, 2008 8:40 am    Post subject: a new kind of desk top (COMPLEATED) Reply with quote
YAY i've finaly finished it

http://www.autohotkey.net/~etopsirhc/Crystal%20Desktop.zip

if any 1 can find a way to make the icons inviable while keeping the program just above the desktop and not other programs plz say something cause that's 1 of the things i really wanted to incorporate in it

Code:

#NoTrayIcon
#SingleInstance ,force

gui, add, pic,x0 y0 ,%A_ScriptDir%\around.PNG
Gui, Add, Pic,x489 y297 gEIGHT,%A_ScriptDir%\crystal 8.PNG
Gui, Add, Pic,x605 y317 gSEVEN,%A_ScriptDir%\crystal 7.PNG
Gui, Add, Pic,x372 y317 gSIX,%A_ScriptDir%\crystal 6.PNG
Gui, Add, Pic,x672 y333 gFIVE,%A_ScriptDir%\crystal 5.PNG
Gui, Add, Pic,x299 y333 gFOUR,%A_ScriptDir%\crystal 4.PNG
Gui, Add, Pic,x632 y356 gTHREE,%A_ScriptDir%\crystal 3.PNG
Gui, Add, Pic,x330 y356 gTWO,%A_ScriptDir%\crystal 2.PNG
Gui, Add, Pic,x479 y383 gONE,%A_ScriptDir%\crystal 1.PNG
gui, color , 0x000001
Gui,show ,,MyNewDesk
gui +lastfound
winset, transcolor, 0x000001
WinSet:=AlwaysAtBottom(WinExist("A"))
Gui -Caption
gui,2:show,maximize,,Fixer
Gui,2:destroy
return

ONE:
IniRead, OE, %A_ScriptDir%\Desk.ini , Files, one
FileSelectFile, F1 , S3, %OE%\
run,%F1%
return

TWO:
IniRead, TO, %A_ScriptDir%\Desk.ini , Files, two
run,%TO%
return

THREE:
IniRead, TE, %A_ScriptDir%\Desk.ini , Files, three
run,%TE%
return

FOUR:
IniRead, FR, %A_ScriptDir%\Desk.ini , Files, four
run,%FR%
return

FIVE:
IniRead, FE, %A_ScriptDir%\Desk.ini , Files, five
run,%FE%
return

SIX:
IniRead, SX, %A_ScriptDir%\Desk.ini , Files, six
run,%SX%
return

SEVEN:
IniRead, SN, %A_ScriptDir%\Desk.ini , Files, seven
run,%SN%
return

EIGHT:
IniRead, ET, %A_ScriptDir%\Desk.ini , Files, eight
run,%ET%
return


!1::
FileSelectFolder, OE ,C:\Documents and Settings\%A_UserName%\Desktop, S3
IniWrite, %OE%, %A_ScriptDir%\Desk.ini , Files, one
return

!2::
FileSelectFile, TO ,C:\Documents and Settings\%A_UserName%\Desktop, , S3
IniWrite, %TO%, %A_ScriptDir%\Desk.ini , Files, two
return

!3::
FileSelectFile, TE ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %TE%, %A_ScriptDir%\Desk.ini , Files, three
return

!4::
FileSelectFile, FR ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %FR%, %A_ScriptDir%\Desk.ini , Files, four
return

!5::
FileSelectFile, FE ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %FE%, %A_ScriptDir%\Desk.ini , Files, five
return

!6::
FileSelectFile, SX ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %SX%, %A_ScriptDir%\Desk.ini , Files, six
return

!7::
FileSelectFile, SN ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %SN%, %A_ScriptDir%\Desk.ini , Files, seven
return

!8::
FileSelectFile, ET ,C:\Documents and Settings\%A_UserName%\Desktop, ,S3
IniWrite, %ET%, %A_ScriptDir%\Desk.ini , Files, eight
return

^!`::
exitapp
;shutdown,1
return

^`::exitapp

AlwaysAtBottom(Child_ID)
 {
  WinGet, Desktop_ID, ID, ahk_class Progman
  Return DllCall("SetParent", "uint", Child_ID, "uint", Desktop_ID)
}


Last edited by etopsirhc on Fri Sep 12, 2008 7:28 am; edited 5 times in total
Back to top
View user's profile Send private message Visit poster's website
Serenity



Joined: 07 Nov 2004
Posts: 1276
PostPosted: Mon Sep 08, 2008 1:54 pm    Post subject: Reply with quote
It would be better to hide the desktop icons as other methods might affect the next step. You can use DllCall/SetParent to "attach" a window to the desktop. Search the forum. Use WinSet, Transcolor to make a particular colour transparent. You can create and show a menu with the Menu command. Use OnExit with Shutdown to shutdown your computer when the script exits.
_________________
"Anything worth doing is worth doing slowly." - Mae West
Back to top
View user's profile Send private message Visit poster's website
etopsirhc



Joined: 12 Mar 2008
Posts: 32
Location: OR
PostPosted: Mon Sep 08, 2008 2:22 pm    Post subject: Reply with quote
Serenity wrote:
It would be better to hide the desktop icons as other methods might affect the next step. You can use DllCall/SetParent to "attach" a window to the desktop. Search the forum. Use WinSet, Transcolor to make a particular colour transparent. You can create and show a menu with the Menu command. Use OnExit with Shutdown to shutdown your computer when the script exits.


it may be better but i have absolutely no clue what a DllCall or SetParent is let alone how to use them >.<
1 thing i noticed though about the WinSet is that it will not affect images in a window (unless i've some how messed that up some how)
Back to top
View user's profile Send private message Visit poster's website
Serenity



Joined: 07 Nov 2004
Posts: 1276
PostPosted: Mon Sep 08, 2008 2:48 pm    Post subject: Reply with quote
There have been examples posted on the forum. If you use WinSet, TransColor after Gui, Show it will make that colour transparent throughout the gui.
_________________
"Anything worth doing is worth doing slowly." - Mae West
Back to top
View user's profile Send private message Visit poster's website
etopsirhc



Joined: 12 Mar 2008
Posts: 32
Location: OR
PostPosted: Fri Sep 12, 2008 1:13 am    Post subject: Reply with quote
ok now that thats fixed along with some other stuff i should be able to post a copy here if any 1 wants it but first i need to tweak it a little more
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    AutoHotkey Community Forum Index -> Ask for Help All times are GMT
Page 1 of 1

 
Jump to:  
You can post new topics in this forum
You can reply to topics in this forum


Powered by phpBB © 2001, 2005 phpBB Group