Jump to content

App GUI


Recommended Posts

Please review and let me know what you think. It's very simple and could be useful I think. I was thinking of creating a dropdown list with varies application to select and depeding on the selection to display the product key would be display. This project would be for personal use only. Let me know if you like it. Thanks in advance.

#include <GuiConstants.au3>

$Title = GuiCreate("Software Libary Selection", 682, 177,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
WinSetTrans($Title, "", 220) 
GUISetBkColor(0x0080FF)  
$OfficeXP_1 = GuiCtrlCreateButton("Office XP Professional", 20, 50, 220, 50)
GUICtrlSetState(-1,$GUI_FOCUS)  
$Officelabel_2 = GuiCtrlCreateButton("Display Key", 270, 50, 70, 50)
GUICtrlSetState(-1,$GUI_FOCUS)  
$ShowKey_3 = GuiCtrlCreateInput("", 370, 60, 290, 30)
GUICtrlSetState(-1,$GUI_FOCUS)  
$Group_4 = GuiCtrlCreateGroup("Software Application", 10, 30, 240, 90)
GUICtrlSetBkColor($Group_4,0xFFFFFF)
$Group_5 = GuiCtrlCreateGroup("Get Key", 260, 30, 90, 90)
GUICtrlSetBkColor($Group_5,0xFFFFFF)
$Group_6 = GuiCtrlCreateGroup("Product Key", 360, 30, 310, 90)
GUICtrlSetBkColor($Group_6,0xFFFFFF)
$OfficeKey = '1111-1111-1111-1111'
GUICtrlSetFont($ShowKey_3,18,700,0,"Courier New")


GuiSetState()
While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg = $OfficeXP_1
      Run("OfficeXP\Setup.exe")
    Case $msg = $Officelabel_2
      GuiCtrlSetData($ShowKey_3, $OfficeKey)
    EndSelect
WEnd
Exit
Link to comment
Share on other sites

I like the basic layout and colouring.

However the transparency effect makes it near unreadable for me. I would either get rid of the tranparency or at least tone it down a bit :)

Cheers, E.

Edited by Ebenezer
Link to comment
Share on other sites

Thank you for the feedback. I will do that. Well, take care. I don't think I'm going to get that many replies with this script. I will just need to think deeper in providing a more useful tool for everyone to use.

I like the basic layout and colouring.

However the transparency effect makes it near unreadable for me. I would either get rid of the tranparency or at least tone it down a bit :)

Cheers, E.

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...