Jump to content

Problem with child Window


Recommended Posts

i have used this before ( many times ) ...

but i cant get it to work

*** press "view all Customers"

#include <GuiConstants.au3>
#Include <File.au3>

Dim $File_Location = @ScriptDir & "\Address.ini"
Dim $num = 0, $Input_[10]
;If Not FileExists($File_Location) Then Set_Ini()


$main = GUICreate("  Postal Express   by Valuater", 612, 412, -1, -1);, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)

$Group_1 = GUICtrlCreateGroup("Customer Panel", 10, 10, 250, 390)
$Group_2 = GUICtrlCreateGroup("Customer Information", 280, 10, 320, 390)
$Group_3 = GUICtrlCreateGroup("Search", 20, 30, 230, 140)
$Group_4 = GUICtrlCreateGroup("Controls", 20, 180, 230, 210)

$Combo_3 = GUICtrlCreateCombo("Search by...", 80, 50, 100, 21)
$Input_11 = GUICtrlCreateInput("Search Criteria", 45, 85, 180, 20)
$Label_10 = GUICtrlCreateLabel("Customer #: " & $num, 440, 30, 120, 25)
GUICtrlSetFont(-1, 9.5, 550)
$Label_12 = GUICtrlCreateLabel("Name", 300, 40, 70, 20)
$Input_[1] = GUICtrlCreateInput("", 300, 60, 280, 20)
$Label_14 = GUICtrlCreateLabel("Address", 300, 90, 90, 20)
$Label_15 = GUICtrlCreateLabel("Street Name", 380, 90, 140, 20)
$Input_[2] = GUICtrlCreateInput("", 300, 110, 70, 20)
$Input_[3] = GUICtrlCreateInput("", 380, 110, 200, 20)
$Label_18 = GUICtrlCreateLabel("City", 300, 140, 50, 20)
$Label_19 = GUICtrlCreateLabel("County/Providence", 430, 140, 120, 20)
$Input_[4] = GUICtrlCreateInput("", 300, 160, 110, 20)
$Input_[5] = GUICtrlCreateInput("", 430, 160, 150, 20)
$Label_22 = GUICtrlCreateLabel("State", 300, 190, 70, 20)
$Label_23 = GUICtrlCreateLabel("Zip + 4", 390, 190, 110, 20)
$Input_[6] = GUICtrlCreateInput("", 300, 210, 80, 20)
$Input_[7] = GUICtrlCreateInput("", 390, 210, 190, 20)
$Edit_26 = GUICtrlCreateLabel("Notes", 300, 240, 80, 20)
$Edit_26 = GUICtrlCreateEdit("", 300, 260, 280, 120)

; controls
$Button_9 = GUICtrlCreateButton("Start Search", 45, 120, 180, 30)
$Button_10 = GUICtrlCreateButton("Add Customer", 45, 210, 180, 30)
$Button_11 = GUICtrlCreateButton("Update Customer", 45, 250, 180, 30)
$Button_12 = GUICtrlCreateButton("View All Customers", 45, 290, 180, 30)
$Button_13 = GUICtrlCreateButton("Alpha Sort Customers", 45, 330, 180, 30)

GUISetState()

GUICtrlSetData($Combo_3, "Customer #|Name|Address|Street|City|County|Zip+4|Notes")

$viewer = GUICreate("", 602, 402, 5, 5, BitOR($WS_CHILD, $WS_BORDER, $DS_SETFOREGROUND), -1, $main)
$Listview = GUICtrlCreateListView("Customer #|Name|Address|Street|City|County|Sate|Zip+4|Notes", 10, 10, 582, 382)
GUISetState(@SW_HIDE)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $msg = $Button_9
            Set_Customers()
        Case $msg = $Button_10
            Set_Customers()
        Case $msg = $Button_11
            Set_Customers()
        Case $msg = $Button_12
            GUISetState(@SW_SHOW, $viewer)
    ;;;
    EndSelect
WEnd

8)

Edited by Valuater

NEWHeader1.png

Link to comment
Share on other sites

@Valuater

yes i know you want the child window and i'm really confused, i'm missing something here, i have 2 examoles of parent-child gui's (not my scripts) and neither one uses $WS_CHILD. i guess i'm gonna learn something today!

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...