gui with inserts on it in tabs

[TomaSzz]

ok and there is no way to hide tab?

hide it in anyway from that click .. where u made.. it clicks exactly on tab .. and on my current gui the tabs are hidden but after u enter admin and pres button the mouse is clicked on second tab and that will make ppl find out about those tabs there..maybe even its posible to make the tab to select without mouse after input?

Edited May 23, 2010 by TomaSzz

[taietel]

On the previous page I wrote a link to a post. If you follow the post, on the bottom of the page there is another: READ IT and that solves your problem!

[edit] I also wrote you that posting code helps a lot the person who wants to help you. I was guessing what you were trying to do, so I've posted samples that you understand the idea. I'm sure you can manage it from here!

[edit] The link is http://www.autoitscript.com/forum/index.php?showtopic=105422

Edited May 23, 2010 by taietel

[TomaSzz]

On the previous page I wrote a link to a post. If you follow the post, on the bottom of the page there is another: READ IT and that solves your problem!

i just went through it and nothing i can see... maybe u mind directing me?

[TomaSzz]

whats wrong with it..i enter first time in that input box the 'admin' press button i get kicked to other window and in there i put another input box and when i write in it sumtin..guiust starts inserting the same letter many times in that input box.. heres how its done so far

expandcollapse popup

#AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <SendMessage.au3>
#include <GuiButton.au3>
#include <File.au3>
#include <IE.au3>
#include <INet.au3>
#include <StaticConstants.au3>
#include <ProgressConstants.au3>
#include <GuiTab.au3>
#include <TabConstants.au3>

Global Const $SC_DRAGMOVE = 0xF012
Global $iMemo

HotKeySet("{ESC}", "On_Exit") ; Press ESC to exit
Func On_Exit()
    Exit
EndFunc

Local $login
Local $btn, $chk, $rdo, $Msg, $exit
Local $file = "cabalmain.exe"
Local $forum, $oIE, $min, $w, $w1, $1Enter

$hGUI = GUICreate("launcher", 642, 493, -1, -1, $WS_POPUP, $WS_EX_LAYERED)
Opt("TrayIconHide", 1)

GUICtrlCreatePic("Launcher\GUI\gfx\MAIN.jpg", 0, 0, 642, 493)
GUICtrlSetState(-1, $GUI_DISABLE) ; Do not forget to disable the background
$hTab = GUICtrlCreateTab(0, 0, 0, 0)
$TabSheet1 = GUICtrlCreateTabItem("Acces")
$Label1 = GUICtrlCreateLabel("Bot Acces:", 0, 56, 100, 30)
$sInput = GUICtrlCreateInput("", 96, 54, 233, 21)
$TabSheet2 = GUICtrlCreateTabItem("BOT");here you can put more controls
$Label2 = GUICtrlCreateLabel("That's what you want to find?", 112, 96, 143, 17)
$login = GUICtrlCreateInput("", 237, 5, 200, 20)
GUICtrlCreateTabItem("")
$Enter = GUICtrlCreateButton("Button1", 272, 216, 120, 30, $BS_BITMAP)
_GUICtrlButton_SetImage($Enter, "Login.bmp")


GUISetState(@SW_SHOW)

MemoWrite("Button1 Image Handle: " & _GUICtrlButton_GetImage($btn))

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_PRIMARYDOWN ; Mouse button down
            _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0) ; Tell GUI to drag with the mouse
    $Msg = GUIGetMsg()
        If $Msg = $GUI_EVENT_CLOSE Then ExitLoop
        Case $1Enter
                WinActivate("CABAL")
                Sleep(400)
                Send(GUICtrlRead($login))
                Sleep(400)
                Send("{ENTER}")
        Case $Enter
    If GUICtrlRead($sInput) = "admin" Then
         _GUICtrlTab_ClickTab($hTab, 1, "left", True)
    Else
         MsgBox(64, "Error", "Wrong user!",2)
         Exit
    EndIf

    EndSwitch
            
WEnd

    Exit

; Write a line to the memo control
Func MemoWrite($sMessage)
    GUICtrlSetData($iMemo, $sMessage & @CRLF, 1)
EndFunc   ;==>MemoWrite

[taietel]

I have modified the Tab GUI: If you insert the correct user in the inputbox, in TabSheet1, you will get access to TabSheet2, otherwise the form will close.

On TabSheet2 you have another input box. You have an example to work with:

expandcollapse popup

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <GuiTab.au3>

$Form1 = GUICreate("Form2", 358, 252)
$hTab = GUICtrlCreateTab(8, 8, 345, 193)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Label1 = GUICtrlCreateLabel("Bla,bla:", 40, 56, 36, 17)
$sInput = GUICtrlCreateInput("", 96, 54, 233, 21)
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2");here you can put more controls
$sInput2 = GUICtrlCreateInput("", 70, 54, 233, 21)
$Label2 = GUICtrlCreateLabel("That's what you want to find?", 112, 96, 143, 17)
$btnTab2 = GUICtrlCreateButton("Just test", 152, 120, 99, 33, $WS_GROUP)
GUICtrlCreateTabItem("")
GUICtrlSetState($hTab, 128) ;Tab Disabled
$btnEnter = GUICtrlCreateButton("Check user", 272, 216, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
        Exit
    Case $btnEnter
        If GUICtrlRead($sInput) = "admin" Then
        GUICtrlSetState($hTab, 64); enable TabSheet2 if the user is admin
            _GUICtrlTab_SetCurFocus($hTab, 1)
        Else
            MsgBox(64, "Error", "Wrong answer!",2)
            Exit
        EndIf
    Case $btnTab2
        $sText2 = GUICtrlRead($sInput2)
        MsgBox(0,"","Here put your code for this button," & @CRLF & "to execute something according with the text from the input box above" & @CRLF & "[If $var=" & $sText2 & " Then BLA BLA BLA]")
    EndSwitch
WEnd