Synapse 0 Posted October 5, 2007 (edited) Hello everyone...i want to present you a Vista Glass lookalike theme...no so complicated...a very simple thing...but with a lot of things that need to be improved...for that i`m looking for someone that would like to help me build this style that i think a lot of you would love to use it to design your GUIs...DONE:DraggingButton hover (needs improvement) Glass borderTO DO:embeded the close, minimize and maximize button in the udf (now they are separate)resizing (i didn`t tried, but i think it does not supports resizing)BUGSwhen rezolution is changed...the parent GUI separates from the child GUIThe UDF was made with some other UDFs found in this forum...i hope that the owner won`t be mad for using them...i`m don`t wanna take credit for them... SCREENSHOTS:DOWNLOADS:Example:expandcollapse popup#include <GUIConstants.au3> #include "_VistaGUI.au3" ;Define Buttons $CloseBtn0 = "res\close0.bmp" $CloseBtn1 = "res\close1.bmp" $CloseBtn2 = "res\close2.bmp" $MinBtn0 = "res\min0.bmp" $MinBtn1 = "res\min1.bmp" $MinBtn2 = "res\min2.bmp" ;Define Buttons $GUI = VistaGUI("Vista Gui", 500, 300, "0x328978", "0xffffff", $CloseBtn0, $MinBtn0) $btn_explore1 = GUICtrlCreateButton("Close", 185, 200, 75, 25, 0) _ControlHover(2, "", $winmin_sett);add the minimize image to the hover list _ControlHover(2, "", $winclose_sett);add the close image to the hover list While 1 AutoItSetOption("MouseCoordMode",0) $pos = MouseGetPos() $Over = _ControlHover(0, $GUI) If $Over = 1 Then $tempID = @extended _Over($winmin_sett, $MinBtn0,$MinBtn1) _Over($winclose_sett, $CloseBtn0,$CloseBtn1) EndIf Global $Click = _ControlHover(1, $GUI) If $Click = 1 And @extended = $winclose_sett Then GUICtrlSetImage($winclose_sett,$CloseBtn2) Sleep(200) If $tempID = $winclose_sett Then GUICtrlSetImage($winclose_sett,$CloseBtn1) Else GUICtrlSetimage($winclose_sett,$CloseBtn0) EndIf EndIf If $Click = 1 And @extended = $winmin_sett Then GUICtrlSetImage($winmin_sett,$MinBtn2) Sleep(138) If $tempID = $winmin_sett Then GUICtrlSetImage($winmin_sett,$MinBtn1) Else GUICtrlSetimage($winmin_sett,$MinBtn0) EndIf EndIf $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE,$btn_explore1,$winclose_sett Exit Case $winmin_sett GUISetState(@SW_MINIMIZE,$GUI) EndSwitch WEndThe images can be found here:http://download32.mediafire.com/ytmt5qzjjo...gtz1/close0.bmphttp://download32.mediafire.com/xyqnljmlww...ylcn/close1.bmphttp://download32.mediafire.com/120yuglymk...unvy/close2.bmphttp://download32.mediafire.com/2mfmtyxdjm...mmwlqj/min0.bmphttp://download32.mediafire.com/xjqnhdaujh...fh5tjj/min1.bmphttp://download32.mediafire.com/itj5yccdcd...vjygyj/min2.bmpNOTICE:- This is just an example....with the UDF i gave u, u can do whatever u want...like the program that i showed u in the screenshots.... Download TC-Backup (Example of what i did with this UDF...sorry..the prog it`s in italian...just check out the GUI) _VistaGUI.au3 Edited October 10, 2007 by Synapse Share this post Link to post Share on other sites
GaryFrost 18 Posted October 5, 2007 Moved to support, no script(s). SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference. Share this post Link to post Share on other sites
James 377 Posted October 5, 2007 I started work on something like this, but realised that it would take a few back windows or a graphic to make it look just right, this would/could result in a big file size. Looks nice though Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ Share this post Link to post Share on other sites
Greenhorn 0 Posted December 11, 2007 (edited) Hi, I did a trial in this way, but it's a little bit complicated I think, isn't it !? Source and pictures are packed in the attachment ... Example: expandcollapse popup#include 'AeroGUI.au3' AeroGUI('Window Title ...') While 1 Event_Buttons() Sleep(10) WEndoÝ÷ Ø« ejíÚºÚ"µÍÚ[ÛYK[ÛÙBÚ[ÛYH ÑÕRPÛÛÝ[Ë]LÉÝÂÒ[ÛYH ÐÛÛÝ[Ë]LÉÝÂ[H ÌÍÚÛ[ ÌÍÚÛÚ[ÌK ÌÍÚÛÚ[Ì ÌÍØÛÜÙK ÌÍØZ[ÈHÛÜÙH [ÈZ[[Z^H]Û[XYÙÂÌÍÐÛÜÙQY][H ÌÎNÚ[XYÙÉÌLØÛÜÙL ÌÎNÂÌÍÐÛÜÙRÛÝH ÌÎNÚ[XYÙÉÌLØÛÜÙLK ÌÎNÂÌÍÐÛÜÙPÛXÚÈH ÌÎNÚ[XYÙÉÌLØÛÜÙL ÌÎNÂÌÍÓZ[Y][H ÌÎNÚ[XYÙÉÌLÛZ[ ÌÎNÂÌÍÓZ[ÛÝH ÌÎNÚ[XYÙÉÌLÛZ[K ÌÎNÂÌÍÓZ[ÛXÚÈH ÌÎNÚ[XYÙÉÌLÛZ[ ÌÎNÂ[ÈYÑÕRJ ÌÍÝÕ]K ÌÍÙÝZ]ÚYH K ÌÍÙÝZZZYÚH L ÌÍÙÝZ[YHLK ÌÍÙÝZ]ÜHLK ÌÍÙ[YXÛÛÜH ][ÝÌÙ ][ÝÊBÈÕRHÜYÈÝ[B ÌÍÚÛ[HÕRPÜX]J ÌÍÝÕ]K ÌÍÙÝZ]ÚY ÌÍÙÝZZZYÚ ÌÍÙÝZ[Y ÌÍÙÝZ]Ü ÌÍÕÔ×ÔÔT BÕRTÙ]ÐÛÛÜ ÌÍÙ[YXÛÛÜBÕRPÝÜX]SX[ ÌÍÝÕ]KÍK Ë ÌÍÙÝZ]ÚYLLL BÕRPÝÙ]Û LKL ][ÝÕZÛXI][ÝÊBÕRTÙ]Ý]JÕ×ÑTÐPJBÕRTÙ]Ý]JÕ×ÔÒÕÊBÑÝZTÝ[ÛÜÊ ÌÍÚÛ[ K JBÚ[Ù][Ê ÌÍÚÛ[ ][ÝÉ][ÝËL BÈÕRHÜÛÜÙH[Z[[Z^H]Û ÌÍÚÛÚ[ÌHHÕRPÜX]J ÌÎNÉÌÎNË KMË ÌÍÙÝZ]ÚYH ÎKLÌ ÌÍÕÔ×ÔÔT ÌÍÕÔ×ÑVÓQPÒS ÌÍÚÛ[ B ÌÍØÛÜÙHHÕRPÝÜX]TXÊ ÌÍÐÛÜÙQY][ ËMÊBÕRPÝÙ]ÐÛÛÜLK ÌÍÑÕRWÐÐÓÓÔÕSÔTS B ÌÍØZ[HÕRPÝÜX]TXÊ ÌÍÓZ[Y][MÊBÕRPÝÙ]ÐÛÛÜLK ÌÍÑÕRWÐÐÓÓÔÕSÔTS BÕRTÙ]Ý]J ÌÍÑÕRWÑSPJBÕRTÙ]Ý]JÕ×ÔÒÕË ÌÍÚÛÚ[ÌJBÈÕRHÜÚ]][ÝHØ[ ÌÍÚÛÚ[ÌHÕRPÜX]J ÌÎNÉÌÎNË ÌÍÙÝZ]ÚYHN ÌÍÙÝZZZYÚHÎ K ÌÍÕÔ×ÔÔT ÌÍÕÔ×ÑVÓQPÒS ÌÍÚÛ[ BÕRTÙ]ÐÛÛÜ ÌÎNÌÌÎNË ÌÍÚÛÚ[ÌBÕRTÙ]Ý]JÕ×ÔÒÕË ÌÍÚÛÚ[ÌB[[ÈÏOIÝÐYÑÕRB[ÈÑÝZTÝ[ÛÜÊ ÌÍÚÝÚ[ ÌÍÚWÞK ÌÍÚWÞLK ÌÍÚWÞË ÌÍÚWÞLÊNÏOIÝ×ÑÝZTÝ[ÛÜÂ[H ÌÍÜÜË ÌÍÜ] ÌÍÜ] ÌÍÜÜÈHÚ[Ù]ÜÊ ÌÍÚÝÚ[B ÌÍÜ]HØ[ ][ÝÙÙLÌ ][ÝË ][ÝÛÛÉ][ÝË ][ÝÐÜX]TÝ[XÝÛ][ÝË ][ÝÛÛÉ][ÝË ÌÍÚWÞK ][ÝÛÛÉ][ÝË ÌÍÚWÞLK ][ÝÛÛÉ][ÝË ÌÍÜÜÖÌK ][ÝÛÛÉ][ÝË ÌÍÜÜÖÌ×K ][ÝÛÛÉ][ÝË ÌÍÚWÞË ][ÝÛÛÉ][ÝË ÌÍÚWÞLÊBY ÌÍÜ]ÌH[ ÌÍÜ]HØ[ ][ÝÝÙÌ ][ÝË ][ÝÛÛÉ][ÝË ][ÝÔÙ]Ú[ÝÔÛ][ÝË ][ÝÚÛ ][ÝË ÌÍÚÝÚ[ ][ÝÛÛÉ][ÝË ÌÍÜ]ÌK ][ÝÚ[ ][ÝËJBY ÌÍÜ]ÌH[]B[ÙB][Y[ÙB][Y[[ÈÏOIÝ×ÑÝZTÝ[ÛÜÂ[È][Ð]ÛÊ B ÌÍØÓÙÈHÕRQÙ]ÝÛÜ[Ê ÌÍÚÛÚ[ÌJBY ÌÍØÓÙÖÍHH ÌÍØÛÜÙH[ÕRPÝÙ][XYÙJ ÌÍØÛÜÙK ÌÍÐÛÜÙRÛÝB ÌÍØÓÙÈHÕRQÙ]ÝÛÜ[Ê ÌÍÚÛÚ[ÌJBÚ[H ÌÍØÓÙÖÍHH ÌÍØÛÜÙBYÕRQÙ]ÙÊ HH ÌÍØÛÜÙH[ÕRPÝÙ][XYÙJ ÌÍØÛÜÙK ÌÍÐÛÜÙPÛXÚÊBÛY ML B^][YÛY L B ÌÍØÓÙÈHÕRQÙ]ÝÛÜ[Ê ÌÍÚÛÚ[ÌJBÑ[ÕRPÝÙ][XYÙJ ÌÍØÛÜÙK ÌÍÐÛÜÙQY][ B[ÙRY ÌÍØÓÙÖÍHH ÌÍØZ[[ÕRPÝÙ][XYÙJ ÌÍØZ[ ÌÍÓZ[ÛÝB ÌÍØÓÙÈHÕRQÙ]ÝÛÜ[Ê ÌÍÚÛÚ[ÌJBÚ[H ÌÍØÓÙÖÍHH ÌÍØZ[YÕRQÙ]ÙÊ HH ÌÍØZ[[ÕRPÝÙ][XYÙJ ÌÍØZ[ ÌÍÓZ[ÛXÚÊBÛY L BZ[[Z^J B[YÛY L B ÌÍØÓÙÈHÕRQÙ]ÝÛÜ[Ê ÌÍÚÛÚ[ÌJBÑ[ÕRPÝÙ][XYÙJ ÌÍØZ[ ÌÍÓZ[Y][ B[Y[[ÈÏOIÝÑ][Ð]ÛÂ[ÈZ[[Z^J BÕRTÙ]Ý]JÕ×ÓRSSRVK ÌÍÚÛ[ BÕRTÙ]Ý]JÕ×ÓRSSRVK ÌÍÚÛÚ[ÌJBÕRTÙ]Ý]JÕ×ÓRSSRVK ÌÍÚÛÚ[ÌB[[ÈÏOIÝÓZ[[Z^ Greetz Greenhorn Edited December 11, 2007 by Greenhorn Share this post Link to post Share on other sites
