Jump to content

Horizontal Menu button


Recommended Posts

I have this menu that has several buttons in it, but its veritcal. Can someone tell me what I need to do to switch it to horizontal?

; Script Start - Add your code below here
#include <GuiConstants.au3>

; GUI

GuiCreate("FICS Processing", 88, 320)
GUISetBkColor (0x8597cb)

; BUTTON
GuiCtrlCreateGroup("FICS Menu", 8, 10, 73, 300)
$batch=GuiCtrlCreateButton("Batch", 15,30, 60, 30)
$lockbox=GuiCtrlCreateButton("LockBox", 15, 60, 60, 30)
$status=GuiCtrlCreateButton("Status", 15, 90, 60, 30)
$history=GuiCtrlCreateButton("History", 15, 120, 60, 30)
$gl=GuiCtrlCreateButton("GL", 15, 150, 60, 30)
$filemove=GuiCtrlCreateButton("Move", 15, 180, 60, 30)
$image=GuiCtrlCreateButton("Image", 15, 210, 60, 30)
$psr=GuiCtrlCreateButton("PSR", 15, 240, 60, 30)
$html=GuiCtrlCreateButton("Html", 15, 270, 60, 30)
;$symitar=GuiCtrlCreateButton("Symitar", 15, 300, 60, 30) 


GUICtrlCreateGroup ("",-99,-99,1,1) ;close group

; GUI MESSAGE LOOP
GuiSetState()
While GuiGetMsg() <> $GUI_EVENT_CLOSE
   While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
    Case $msg = $Batch
        Opt("MustDeclareVars", 1)
        Dim $itemCount, $counter

        MsgBox(64, "Symitar Batch List", "Press OK to remove Symitar's Batch List!")

        $itemCount = RegRead("HKEY_CURRENT_USER\Software\Symitar\SFW\2.0\Batch Control\Recent", "Item Count")
        if $itemCount = 'a' Then $itemCount = 10
        $counter = $itemCount - 1

        While $counter >= 0
        RegDelete("HKEY_CURRENT_USER\Software\Symitar\SFW\2.0\Batch Control\Recent", "Item " &                                  String($counter))
        $counter = $counter - 1
        WEnd

        RegDelete("HKEY_CURRENT_USER\Software\Symitar\SFW\2.0\Batch Control\Recent", "Item Count")
        MsgBox(64, "Symitar Batch List", "Batch List Purged!")
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...