Jump to content

Recommended Posts

Posted

Hello all,

what im trying to do is a bit hard and i dont know if autoit can do it, I hop so.

What i want is a new DVD data base of all 650 DVDs I got at home.

program one

-----------

ADD DVD.exe

i can build the menu easly, once clicked add the data wites to a xml file.

sample code here

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 436, 298, 192, 124)
$Label1 = GUICtrlCreateLabel("Add DVD", 192, 24, 49, 17)
$Label2 = GUICtrlCreateLabel("Title", 40, 64, 24, 17)
$Label3 = GUICtrlCreateLabel("Rating", 192, 72, 35, 17)
$Label4 = GUICtrlCreateLabel("Year", 344, 64, 26, 17)
$Label5 = GUICtrlCreateLabel("Location To Image", 16, 144, 93, 17)
$Title_INPUT = GUICtrlCreateInput("Title_INPUT", 16, 88, 121, 21)
$RATING_INPUT = GUICtrlCreateInput("RATING_INPUT", 160, 88, 121, 21)
$YEAR_INPUT = GUICtrlCreateInput("YEAR_INPUT", 304, 88, 121, 21)
$Button1 = GUICtrlCreateButton("Browse", 128, 136, 75, 25)
$IMAGE_LOCATION = GUICtrlCreateInput("IMAGE_LOCATION", 16, 176, 185, 21)
$Button2 = GUICtrlCreateButton("ADD DVD", 104, 256, 75, 25)
$Button3 = GUICtrlCreateButton("VIEW HOLE LIST", 208, 256, 91, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
                Case $Button2
                      wite dvd to xml file
    EndSwitch
WEnd

XML FILE example

<CATALOG>

<DVD>

<ID>01</ID>

<TITLE>Family Guy</TITLE>

<RATING>15</RATING>

<GENRE>Comdey</GENRE>

<YEAR>????</YEAR>

<IMAGE>c:\dvd\images\Family_Guy01.jpg</IMAGE>

</DVD>

.......And So On.

</CATALOG>

program 2

CAT_VIEWER.exe

this will allow me to all dvds in the file all 650 of them LOL and allow me to edit, delete them and allow a search.

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form2 = GUICreate("Form1", 405, 294, 378, 190)
$List_of_all_650_DVDS_list_here = GUICtrlCreateEdit("", 16, 40, 369, 185)
GUICtrlSetData(-1, "List_of_all_650_DVDS_list_here")
$Label1 = GUICtrlCreateLabel("The Hole List", 136, 16, 67, 17)
$Button1 = GUICtrlCreateButton("Edit", 72, 248, 75, 25)
$Button2 = GUICtrlCreateButton("Delete", 232, 248, 75, 25)
$Button3 = GUICtrlCreateButton("View DVD", 152, 248, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

and then finaly

program 3

DVD_VIWER.exe

once i have chosesn on dvd from CAT_VIEWER.exe i can then click on it and have reload with this dvd on showing the title and information and image.

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiImageList.au3>
#include <ImageListConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form3 = GUICreate("Form1", 405, 294, 302, 218)
$ImageList1 = _GUIImageList_Create(16, 16, 5)
$Label1 = GUICtrlCreateLabel("DVD ?????", 136, 24, 60, 17)
$Label2 = GUICtrlCreateLabel("Year", 56, 112, 26, 17)
$Label3 = GUICtrlCreateLabel("Info", 168, 112, 22, 17)
$Button1 = GUICtrlCreateButton("Close Window", 136, 248, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

i guess im asking a lot here and im sorry but if you guys can help me then that would be grate.

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
×
×
  • Create New...