Sign in to follow this  
Followers 0
terraya

Read Input and Save [with some options]

2 posts in this topic

Hello everyone,

 

i am working atm at a small programm,

i want to make it work like this:

I click on "NEW" i can add a new Customer,

i want to read the input and save it (the thing is i want to make it

work for me and my friend in the internet so i think we need a internet database but firstly

i want to make it work on my laptop only for me)

 

i dont know in what to save it cuz "txt" is a bit weird , why?

becouse later i want to make a button which search for the "customer"

 

if i press on the other button not "NEW", if i press on "Search", then i have to

write the customers name in, and the info i got from the customer has to show  up

and be changeable.

 

i hope someone understand my poor english xD ,

well here is the script which is not finisht cuz i dont know how to finish the idea.

 

 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$GUI = GUICreate("Form1", 429, 148, 249, 151)
$NEW = GUICtrlCreateButton("NEW", 48, 24, 75, 25)
$Search = GUICtrlCreateButton("Search", 48, 54, 75, 25)
$SAVE = GUICtrlCreateButton("SAVE", 328, 112, 75, 25)
$EDIT = GUICtrlCreateButton("EDIT", 328, 112, 75, 25)
GUISetState(@SW_SHOW, $GUI)
GUICtrlSetState ($SAVE, $GUI_HIDE)
GUICtrlSetState ($EDIT, $GUI_HIDE)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
         Case $NEW
            GUICtrlSetState ($SAVE, $GUI_SHOW)
            _NewCustomer()
         Case $Search
            GUICtrlSetState ($EDIT, $GUI_SHOW)
            _SearchCustomer()
         Case $SAVE
            ;not completed yet cuz i dont know in which format to save it to
            ;read it again in the GUI to make it edit able.


    EndSwitch
WEnd

Func _SearchCustomer()

   $Input2 = GUICtrlCreateInput("", 136, 57, 121, 21)

EndFunc

Func _NewCustomer()

   $Input1 = GUICtrlCreateInput("", 136, 27, 121, 21)

EndFunc

 

test functions.au3

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

You are no reason to create a control every time like in _SearchCustomer and _NewCustomer funcs. I writte an very noob example saving the data in Ini files in your computer.

When you save you need first read the value in input control, you can do it using GuiCtrlRead($Input1). $Input1 are nothing more than a variable that stores the control ID to use in functions like GuiCtrlRead, GuiCtrlSetState, GuiCtrlSetColor, etc

 

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 405, 438, 192, 124)
$Label1 = GUICtrlCreateLabel("Name:", 8, 8, 35, 17)
$InputName = GUICtrlCreateInput("", 72, 8, 185, 21)
$Label = GUICtrlCreateLabel("Credit Card:", 8, 40, 59, 17)
$InputCreditCard = GUICtrlCreateInput("", 71, 34, 185, 21)
$Label3 = GUICtrlCreateLabel("Age:", 40, 72, 26, 17)
$InputAge = GUICtrlCreateInput("", 72, 72, 185, 21)
$ButtonSave = GUICtrlCreateButton("Save", 88, 112, 169, 33)
$List1 = GUICtrlCreateList("", 8, 192, 153, 227)
$Label4 = GUICtrlCreateLabel("Name:", 168, 200, 35, 17)
$LabelName = GUICtrlCreateLabel("", 208, 200, 188, 20)
$Label6 = GUICtrlCreateLabel("Credit Card:", 168, 232, 59, 17)
$LabelCreditCard = GUICtrlCreateLabel("", 232, 232, 164, 20)
$Label8 = GUICtrlCreateLabel("Age:", 168, 264, 59, 17)
$LabelAge = GUICtrlCreateLabel("", 232, 264, 164, 20)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$aSecNames = IniReadSectionNames("Customer.ini")

For $i = 2 to UBound($aSecNames)

    GUICtrlSetData($List1,$aSecNames[$i-1])

Next

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $ButtonSave
            $Name = GUICtrlRead($InputName)
            $CreditCard = GUICtrlRead($InputCreditCard)
            $Age = GUICtrlRead($InputAge)

            IniWrite("Customer.ini",$Name,"CreditCard",$CreditCard)
            IniWrite("Customer.ini",$Name,"Age",$Age)

            $aSecNames = IniReadSectionNames("Customer.ini")

            For $i = 2 to UBound($aSecNames)

                GUICtrlSetData($List1,$aSecNames[$i-1])

            Next
        Case $List1
            $Name = GUICtrlRead($List1)
            $CreditCard = IniRead("Customer.ini",$Name,"CreditCard","None")
            $Age = IniRead("Customer.ini",$Name,"Age","None")

            GUICtrlSetData($LabelName,$Name)
            GUICtrlSetData($LabelCreditCard,$CreditCard)
            GUICtrlSetData($LabelAge,$Age)

    EndSwitch
WEnd

 

Edited by GordonFreeman

Share this post


Link to post
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
Sign in to follow this  
Followers 0

  • Similar Content

    • nacerbaaziz
      By nacerbaaziz
      Hello guys
      Today I'll give you three functions to manage the list View items
      These functions will help you to do some works in your list view items
      1. list view Read
      To get the selected item text  
      2. listView_checke
      To checke an item
      3. isListViewChecked
      To see if the item is checked
      All of these functions will be illustrated by the following example
      You can download the include file from the link below
      Now with the example
      #include <easy_listView_functions.au3> #include <GUIConstantsEx.au3> #include <GuiListView.au3> #include <MsgBoxConstants.au3> Example() Func Example()  Local $idListview  GUICreate("ListView Get Item Checked State", 1000, 700)  $idListview = GUICtrlCreateListView("", 50, 30, 250, 120, 50)  _GUICtrlListView_SetExtendedListViewStyle($idListview, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES)) ; Add items $item1 = GUICtrlCreateListViewItem("item1", $idListview) $item2 = GUICtrlCreateListViewItem("item2", $idListview) _listview_Checke($idListview, "item1") $btn = GUICtrlCreateButton("&read", 100, 150, 50, 50) $btn2 = GUICtrlCreateButton("&if checked", 100, 200, 100, 50)  GUISetState(@SW_SHOW) while 1 switch GUIGetMSG() case $GUI_EVENT_CLOSE  GUIDelete() exit case $btn $read = _ListView_read($idListView) if $read then msgBox(0, "read listview", $read) else msgBox(0, "read listview", "no text ditected") endIf case $btn2 if _isListviewChecked($idListView, "item1") then msgBox(0, "get", "the item is checked") else msgBox(0, "get", "the item isn't checked") endIf endSwitch wend EndFunc   ;==>Example
       
      easy_listView_functions.au3
    • fosil
      By fosil
      Hi everyone.

      I'm currently working a program that constantly prints out log files through "consolewrite" and the "#AutoIt3Wrapper_Change2CUI=y" wrapper.

      Part of this program requires me to run a batch script.

      My issue is the batch script launches from the same window as consolewrite. I need the batch file to be launched through a different window as currently this causes an issue with the logs (which need to be very precise) but also causes the batch file to produce some funny behavior...

      Does anyone know how I can force the file to run on a second DOS window?

      Thanks in advance!!!
       
      Edit: Im using the "run" command if that helps. I tried "shellexecute" but that seemed to not launch the batch scripts at all.
    • nacerbaaziz
      By nacerbaaziz
      Hello guys
      I have an inquiry regarding bass.dll
      I wanted to record an audio file and did not know the way
      As well as I want to save the file after applying the effects
      can you help me?
      am sorry for my english
      With my greetings and best wishes
    • kenny4896
      By kenny4896
      Hi All,
      I tried my best to looking a solution from this forum or others, but I have no luck. The imagesearch dll working fine in my 64 bits machine, whenever I move the scripts to Win 7 (32 bits), it crashes. ImageSearchDLL.dll, ImageSearch.au3 and my simple scripts are in the same working directory. For win 7 (32 bits) machine, I'm using 32 bits ImageSearchdll.dll, the simple scripts as below:
      #include <ImageSearch.au3>
      Global $y = 0, $x = 0
      Local $search = _ImageSearch("C:\Program Files\AutoIt3\Examples\Images\mypc.PNG", 0, $x, $y, 0)
      if $search = 1 then
         MsgBox(0,"Found","Found my target here..." & $x & "," & $y)
         MouseMove($x, $y, 10)
      Else
         msgbox(0, "Not found","")
      Endif
      However, I received error message below when running the script. Anyone here got clue? 
      Problem Event Name:    APPCRASH
        Application Name:    AutoIt3.exe
        Application Version:    3.3.14.2
        Application Timestamp:    55fc1979
        Fault Module Name:    AutoIt3.exe
        Fault Module Version:    3.3.14.2
        Fault Module Timestamp:    55fc1979
        Exception Code:    c0000005
        Exception Offset:    00020e42
        OS Version:    6.1.7601.2.1.0.256.4
        Locale ID:    17417
        Additional Information 1:    0a9e
        Additional Information 2:    0a9e372d3b4ad19135b953a78882e789
        Additional Information 3:    0a9e
        Additional Information 4:    0a9e372d3b4ad19135b953a78882e789
    • Hanukka
      By Hanukka
      Hello there,
      https://stackoverflow.com/questions/901712/how-to-check-whether-a-checkbox-is-checked-in-jquery
      I want to check the checkbox in the frame which pops up after choosing "run code snippet" option. ( Internet Explorer one would be prefered )
      Can you please please send the right code or some snippet here..