scorch Posted April 6, 2009 Share Posted April 6, 2009 (edited) i was wondering how do i go about applying PNG to my current GUI. i wanted it to look like the one in this post but i dont know where to even start. example: http://www.autoitscript.com/forum/index.ph...st&p=357042here is my script below any advice etc... is really appreciatedexpandcollapse popup#AutoIt3Wrapper_outfile=Hot Key RDC.exe #AutoIt3Wrapper_UseUpx=n #AutoIt3Wrapper_Add_Constants=n #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <ComboConstants.au3> #Include <GuiComboBox.au3> #Include <GuiToolbar.au3> #include <ButtonConstants.au3> ;third row def. production disk2 builders Global $Button_PD1, $Button_PD2 ;Below third row 4th column DISK2 TEST and disk to pst Global $Button_CC1, $Button_CC2, $Button_CC3, $Button_CC4, $Button_CC5 ;Below third row 5th column DISK2 TEST and disk to pst Global $Button_SC1, $Button_SC2, $Button_SC3, $Button_SC4 ;Below 1st row 2nd column spreadsheets Global $Button_SP1, $Button_SP2, $Button_SP3 ;Below 2st row 2nd column spreadsheets Global $Button_WS1, $Button_WS2, $Button_WS3, $Button_WS4, $Button_WS5, $Button_WS6, $Button_WS7, $Button_WS8, $Button_WS9 Global $Button_MMGO, $Button_TSTGO, $Button_PSTGO, $Button_DSK2GO ;*************************************************************************************************** ************************************************************* ;top label HEADERS and specifying that this window is rezisable $GUI = GUICreate("Data Operations QUICK KEYS", 450, 460, -1, -1, $WS_SIZEBOX + $WS_SYSMENU) ;context menu $contextMenu = GuiCtrlCreateContextMenu() GuiCtrlCreateMenuItem("Context Menu", $contextMenu) GuiCtrlCreateMenuItem("", $contextMenu);separator GuiCtrlCreateMenuItem("&Properties", $contextMenu) ;resize function GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKBOTTOM) GuiCtrlCreatePic("\\finch\ceregen_it\JEGONZ\Public\pics\TPS-pic.JPG", 0, 0, 0, 0) ;SETTING BACKGROUND COLOR OF GUI GUISetBkColor(0xFFFFFF) ;*************************************************************************************************** ************************************************************* ;GUICtrlCreateLabel("DATA OPERATIONS LAYOUT", 135, 10) $font = "Arial Bold" GUISetFont(9, 400, 0, $font) GUICtrlCreateLabel("Test Virtual Servers", 10, 85) GUICtrlCreateLabel("Post Prod Machines", 10, 135) GUICtrlCreateLabel("Disk2 Builders", 10, 185) GUICtrlCreateLabel("Sync Servers", 10, 235) GUICtrlCreateLabel("Console Controls", 188, 85) GUICtrlCreateLabel("Quick Scripts", 200, 235) GUICtrlCreateLabel("Tools", 220, 360) GUICtrlCreateLabel("Spread Sheets", 338, 85) GUICtrlCreateLabel(" Web Sites", 350, 185) GUICtrlCreateLabel("RDC Midas Masters", 10, 285) GUISetFont(8.5, 400, 0, "") ;*************************************************************************************************** ************************************************************* ; INPUT $MMInput = GuiCtrlCreateInput("Prog", 15, 300, 35, 20) $TSTInput =GuiCtrlCreatecombo("Choose Machine", 10, 100, 105, 20) GUICtrlSetData(-1, "MMH1TESTVM1 |MMMETESTVM1 |MMD1TESTVM2 |MMD2TESTVM2 |MMCATESTVM3|MMEZTESTVM3 |MMM3TESTVM4 |MMEFTESTVM4 |MM8TTESTVM5 |MMSDTESTVM5 |MME8TESTVM6 |MMOXTESTVM6 |MM9ZTESTVM7 |MM9QTESTVM7 |MMBYTESTVM8 |MMDNTESTVM8 |MMCQTESTVM9 |MMF1TESTVM9") $PSTInput =GuiCtrlCreatecombo("Choose Machine", 10, 150, 105, 20) GUICtrlSetData(-1, "TPS-TRAIN-01|TPS-TRAIN-02|TPS-TRAIN-03|TPS-TRAIN-04|TPS-TRAIN-05|TPS-TRAIN-06|TPS-TRAIN-07|TPS-TRAIN-08|TPS-TRAIN-09|TPS-TRAIN-10|TPS-TRAIN-11|TPS-TRAIN-12|TPS-TRAIN-13|TPS-TRAIN-14|TPS-TRAIN-15|TPS-TRAIN-16|TPS-TRAIN-17|TPS-TRAIN-18") $DSK2Input =GuiCtrlCreatecombo("Choose Machine", 10, 200, 105, 20) GUICtrlSetData(-1, "DISK2|DISK2-PRD|LWHERM-PST|DISK2-TEST|CCHURS-TESTING") $SNCInput =GuiCtrlCreatecombo("Choose Machine", 10, 250, 105, 20) GUICtrlSetData(-1, "BLUE JAY|GREEN JAY|BROWN JAY|SALMON|MIDASTRNSRV02") ;*************************************************************************************************** ************************************************************* ;first row of buttons Opt("GUICoordMode", 1) ;SETTING COLOR OF BUTTONS GUICtrlSetDefBkColor(0xD1D9E5) ;*************************************************************************************************** ************************************************************* $Button_PD1 = GUICtrlCreateButton("MDMT2", 175, 375, 125) $Button_PD2 = GUICtrlCreateButton("MDMT2 Test", 175, 400, 125) ;Below 4th row second column DISK2 TEST and disk to pst $Button_CC1 = GUICtrlCreateButton("Post Prod Machines", 175, 100, 125) $Button_CC2 = GUICtrlCreateButton("Training Laptops", 175, 125, 125) $Button_CC3 = GUICtrlCreateButton("Test VMs & Hosts", 175, 150, 125) $Button_CC4 = GUICtrlCreateButton("Sync Servers", 175, 175, 125) $Button_CC5 = GUICtrlCreateButton("Disk2 Builders", 175, 200, 125) ;Below 5th row second column DISK2 TEST and disk to pst $Button_SC1 = GUICtrlCreateButton("BO Common Error Fix", 175, 250, 125) $Button_SC2 = GUICtrlCreateButton("User Overwritten Script", 175, 275, 125) $Button_SC3 = GUICtrlCreateButton("Sql Version Check", 175, 300, 125) $Button_SC4 = GUICtrlCreateButton("Number of Triggers", 175, 325, 125) ;Below 1st row second column spreadsheet $Button_SP1 = GUICtrlCreateButton("Midas Master Programs", 315, 100, 125) $Button_SP2 = GUICtrlCreateButton("Midas Passwords", 315, 125, 125) $Button_SP3 = GUICtrlCreateButton("PST Training Room", 315, 150, 125) ;Below 2nd row second column WEBSITES $Button_WS1 = GUICtrlCreateButton("Team Track", 315, 200, 125) $Button_WS2 = GUICtrlCreateButton("Team Space", 315, 225, 125) $Button_WS3 = GUICtrlCreateButton("Magic Helpdesk", 315, 250, 125) $Button_WS4 = GUICtrlCreateButton("Zabbix", 315, 275, 125) $Button_WS5 = GUICtrlCreateButton("Site Scope", 315,300, 125) $Button_WS6 = GUICtrlCreateButton("Prod Polling", 315, 325, 125) $Button_WS7 = GUICtrlCreateButton("Altris Midas Report", 315, 350, 125) $Button_WS8 = GUICtrlCreateButton("Lyceum", 315, 375, 125) $Button_WS9 = GUICtrlCreateButton("ETL Advance Monitor", 315, 400, 125) ;Below 1st row 3rd column prog name $Button_MMGO = GUICtrlCreateButton("GO", 50, 297, 50) $Button_TSTGO = GUICtrlCreateButton("GO", 115, 97, 50) $Button_PSTGO = GUICtrlCreateButton("GO", 115, 147, 50) $Button_DSK2GO = GUICtrlCreateButton("GO", 115, 197, 50) $Button_SNCGO = GUICtrlCreateButton("GO", 115, 247, 50) ;*************************************************************************************************** ************************************************************* GUISetState() While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $Button_PD1 ShellExecute( @ProgramFilesDir & "\Monsanto\MDMT2\mdmt windows application.exe") Case $msg = $Button_PD2 ShellExecute( @ProgramFilesDir & "\Monsanto\MDMT2 Test\mdmt windows application.exe") Case $msg = $Button_CC1 ShellExecute("mmc.exe",'"\\finch\ceregen_it\JEGONZ\Public\Consoles\Training Lab Post Prod.msc"') Case $msg = $Button_CC2 ShellExecute("mmc.exe",'"\\finch\ceregen_it\JEGONZ\Public\Consoles\Training Laptops.msc"') Case $msg = $Button_CC3 ShellExecute("mmc.exe",'"\\finch\ceregen_it\JEGONZ\Public\Consoles\VM Test Environment.msc"') Case $msg = $Button_CC4 ShellExecute("mmc.exe",'"\\finch\ceregen_it\JEGONZ\Public\Consoles\Servers.msc"') Case $msg = $Button_CC5 ShellExecute("mmc.exe",'"\\finch\ceregen_it\JEGONZ\Public\Consoles\disk2.msc"') Case $msg = $Button_SC1 ShellExecute("isqlw.exe") Sleep(1000) ShellExecute("notepad.exe", "\\finch\ceregen_it\JEGONZ\Public\db scripts\BO_Common_cleanup_bad_messages.sql") Case $msg = $Button_SC2 ShellExecute("isqlw.exe") Sleep(1000) ShellExecute("notepad.exe", "\\finch\ceregen_it\JEGONZ\Public\db scripts\user overwritten.txt") Case $msg = $Button_SC3 ShellExecute("isqlw.exe") Sleep(1000) ShellExecute("notepad.exe", "\\finch\ceregen_it\JEGONZ\Public\db scripts\sql version check.txt") Case $msg = $Button_SC4 ShellExecute("isqlw.exe") Sleep(1000) ShellExecute("notepad.exe", "\\finch\ceregen_it\JEGONZ\Public\db scripts\Number of Triggers.txt") Case $msg = $Button_SP1 ShellExecute( @ProgramFilesDir & "http://w3dom.monsanto.com/teamspace/tm4139.nsf/0/49C56BD9C400330B8625754B0015E069/$file/MIDASMasterProgramInfo.xlsx?OpenElement", "", "") Case $msg = $Button_SP2 ShellExecute( @ProgramFilesDir & "http://w3.monsanto.com/asp/ts4.asp?tsid=4139&resid=BD14183C86C3CA2886257547006CED60R", "", "") Case $msg = $Button_SP3 ShellExecute("EXCEL.EXE") Sleep(500) ShellExecute("\\FINCH\IT_PROJECTS\DeploymentandSupport\TechnicalServices\Private\Training room setup.xlsx", "", "") Case $msg = $Button_WS1 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://w3.teamtrack.monsanto.com/tmtrack/tmtrack.dll?", "", "") Case $msg = $Button_WS2 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://w3.monsanto.com/asp/ts4.asp?tsid=4139", "", "") Case $msg = $Button_WS3 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://screechowl/magicsshd", "", "") Case $msg = $Button_WS4 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://stpuxa00/zabbix/screens.php?fullscreen=0&screenid=81", "", "") Case $msg = $Button_WS5 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://164.144.128.44:8888/SiteScope/userhtml/DetailTPSPROD.html", "", "") Case $msg = $Button_WS6 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://mbkmx2d1/ProdPolling/PollingMain.asp", "", "") Case $msg = $Button_WS7 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://na1000ans00/Altiris/NS/Admin/Reports/report_summary.aspx?Guid=303d60d7-f3be-4b6d-ac6f-593023155711", "", "") Case $msg = $Button_WS8 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://w3.lyceum.monsanto.com/signin", "", "") Case $msg = $Button_WS9 ShellExecute( @ProgramFilesDir & "\Internet Explorer\IEXPLORE.EXE", "http://w3t.rubicon.monsanto.com/etl-admin/displayEnvSelection.do", "", "") ;*************************************************************************************************** ************************************************************* Case $msg = $Button_MMGO $MMName = GUICtrlRead($MMInput) $MMList = IniRead("\\finch\ceregen_it\JEGONZ\Public\DB access\machines.ini","Machines",$MMName, 1) If $MMList = 0 Then ShellExecute("mstsc.exe") WinWaitActive("Remote Desktop Connection", "", 30) sleep(500) send($MMList) sleep(500) Send('{ENTER}') Else MsgBox(0,"Error","No Machine Listed for this Program",-1,$GUI) EndIf Case $msg = $Button_TSTGO $TSTName = GUICtrlRead($TSTInput) $TSTList=IniRead("\\finch\ceregen_it\JEGONZ\Public\DB access\TestRDC.ini", "TestVM", $TSTName, 1) If $TSTList = 0 Then ShellExecute("mstsc.exe") WinWaitActive("Remote Desktop Connection", "", 30) sleep(500) send($TSTList) sleep(500) Send('{ENTER}') Else MsgBox(0,"Unable to Connect ","The specified remote computer could not be reached",-1,$GUI) EndIf Case $msg = $Button_PSTGO $PSTName = GUICtrlRead($PSTInput) $PSTList=IniRead("\\finch\ceregen_it\JEGONZ\Public\DB access\PSTRDC.ini", "TrainMachines", $PSTName, 1) If $PSTList = 0 Then ShellExecute("mstsc.exe") WinWaitActive("Remote Desktop Connection", "", 30) sleep(500) send($PSTList) sleep(500) Send('{ENTER}') Else MsgBox(0,"Unable to Connect ","The specified remote computer could not be reached",-1,$GUI) EndIf Case $msg = $Button_DSK2GO $DSK2Name = GUICtrlRead($DSK2Input) $DSK2List=IniRead("\\finch\ceregen_it\JEGONZ\Public\DB access\DSK2.ini", "DSK2", $DSK2Name, 1) If $DSK2List = 0 Then ShellExecute("mstsc.exe") WinWaitActive("Remote Desktop Connection", "", 30) sleep(500) send($DSK2List) sleep(500) Send('{ENTER}') Else MsgBox(0,"Unable to Connect ","The specified remote computer could not be reached",-1,$GUI) EndIf Case $msg = $Button_SNCGO $SNCName = GUICtrlRead($SNCInput) $SNCList=IniRead("\\finch\ceregen_it\JEGONZ\Public\DB access\SNC.ini", "SNC", $SNCName, 1) If $SNCList = 0 Then ShellExecute("mstsc.exe") WinWaitActive("Remote Desktop Connection", "", 30) sleep(500) send($SNCList) sleep(500) Send('{ENTER}') Else MsgBox(0,"Unable to Connect ","The specified remote computer could not be reached",-1,$GUI) EndIf EndSelect WEnd Edited April 6, 2009 by scorch Link to comment Share on other sites More sharing options...
Yashied Posted April 6, 2009 Share Posted April 6, 2009 http://www.autoitscript.com/forum/index.php?s=&showtopic=92675&view=findpost&p=666005 => Example3. My UDFs: iKey | FTP Uploader | Battery Checker | Boot Manager | Font Viewer | UDF Keyword Manager | Run Dialog Replacement | USBProtect | 3D Axis | Calculator | Sleep | iSwitcher | TM | NetHelper | File Types Manager | Control Viewer | SynFolders | DLL Helper Animated Tray Icons UDF Library | Hotkeys UDF Library | Hotkeys Input Control UDF Library | Caret Shape UDF Library | Context Help UDF Library | Most Recently Used List UDF Library | Icons UDF Library | FTP UDF Library | Script Communications UDF Library | Color Chooser UDF Library | Color Picker Control UDF Library | IPHelper (Vista/7) UDF Library | WinAPI Extended UDF Library | WinAPIVhd UDF Library | Icon Chooser UDF Library | Copy UDF Library | Restart UDF Library | Event Log UDF Library | NotifyBox UDF Library | Pop-up Windows UDF Library | TVExplorer UDF Library | GuiHotKey UDF Library | GuiSysLink UDF Library | Package UDF Library | Skin UDF Library | AITray UDF Library | RDC UDF Library Appropriate path | Button text color | Gaussian random numbers | Header's styles (Vista/7) | ICON resource enumeration | Menu & INI | Tabbed string size | Tab's skin | Pop-up circular menu | Progress Bar without animation (Vista/7) | Registry export | Registry path jumping | Unique hardware ID | Windows alignment More... Link to comment Share on other sites More sharing options...
scorch Posted April 6, 2009 Author Share Posted April 6, 2009 http://www.autoitscript.com/forum/index.php?s=&showtopic=92675&view=findpost&p=666005 => Example3. ok so that im on the right page with you.i take the icon.au3 file and save it to my include folder right?then i copy and paste example 3 script into mine but how exactly do i interlaced that into my script? Link to comment Share on other sites More sharing options...
Yashied Posted April 6, 2009 Share Posted April 6, 2009 ok so that im on the right page with you.i take the icon.au3 file and save it to my include folder right?then i copy and paste example 3 script into mine but how exactly do i interlaced that into my script?If you use BMP, JPG or GIF, it is sufficient GUICtrlCreatePic().GuiCtrlCreatePic("\\finch\ceregen_it\JEGONZ\Public\pics\TPS-pic.JPG", 0, 0, 0, 0) - this is wrong.GuiCtrlCreatePic("\\finch\ceregen_it\JEGONZ\Public\pics\TPS-pic.JPG", 0, 0, 450, 460) My UDFs: iKey | FTP Uploader | Battery Checker | Boot Manager | Font Viewer | UDF Keyword Manager | Run Dialog Replacement | USBProtect | 3D Axis | Calculator | Sleep | iSwitcher | TM | NetHelper | File Types Manager | Control Viewer | SynFolders | DLL Helper Animated Tray Icons UDF Library | Hotkeys UDF Library | Hotkeys Input Control UDF Library | Caret Shape UDF Library | Context Help UDF Library | Most Recently Used List UDF Library | Icons UDF Library | FTP UDF Library | Script Communications UDF Library | Color Chooser UDF Library | Color Picker Control UDF Library | IPHelper (Vista/7) UDF Library | WinAPI Extended UDF Library | WinAPIVhd UDF Library | Icon Chooser UDF Library | Copy UDF Library | Restart UDF Library | Event Log UDF Library | NotifyBox UDF Library | Pop-up Windows UDF Library | TVExplorer UDF Library | GuiHotKey UDF Library | GuiSysLink UDF Library | Package UDF Library | Skin UDF Library | AITray UDF Library | RDC UDF Library Appropriate path | Button text color | Gaussian random numbers | Header's styles (Vista/7) | ICON resource enumeration | Menu & INI | Tabbed string size | Tab's skin | Pop-up circular menu | Progress Bar without animation (Vista/7) | Registry export | Registry path jumping | Unique hardware ID | Windows alignment More... Link to comment Share on other sites More sharing options...
scorch Posted April 6, 2009 Author Share Posted April 6, 2009 (edited) yea but wat i am trying to do is make my GUI have this apprearance http://www.autoitscript.com/forum/index.ph...st&id=15076 Edited April 6, 2009 by scorch Link to comment Share on other sites More sharing options...
scorch Posted April 8, 2009 Author Share Posted April 8, 2009 anybody have some input? Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now