Notizbuch

  • Hallo Leute.

    Ich hab hier so ein Problem mit einem Notizprogramm das ich zuzeit habe.
    Ich würde es gerne haben, dass man ein ListViewItem löschen kann, und das man den Inhalt von Notizen lesen kann.
    Wenn möglich, dann gebt mir nicht gleich das Fertige Skript zurück, sondern sagt wie man es machen kann. :)
    ( Ich mags nicht so, wenn etwas fertig ist und ich es nicht wirklich selber geschrieben hab )
    Hier ist der Code:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    If Not FileExists("notepad.ini") Then
    IniWrite("notepad.ini","notenumber","notenumber",0)
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $number = IniRead("notepad.ini","notenumber","notenumber",0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Local $hHeight = 300
    Local $hWidth = 250
    Global $date = @MDAY & "." & @MON & "." & @YEAR

    [/autoit] [autoit][/autoit] [autoit]

    Global $hGUI = GUICreate("Notepad",$hWidth,$hHeight)

    [/autoit] [autoit][/autoit] [autoit]

    Global $hMenu = GUICtrlCreateMenu("Datei")
    Global $hMenuDI1 = GUICtrlCreateMenuItem("Neue Notiz erstellen",$hMenu)
    Global $hMenuDI2 = GUICtrlCreateMenuItem("Programm schließen",$hMenu)

    [/autoit] [autoit][/autoit] [autoit]

    GLobal $hMenu2 = GUICtrlCreateMenu("Bearbeiten")
    Global $hMenuBI1 = GUICtrlCreateMenuItem("Notiz löschen",$hMenu2)

    [/autoit] [autoit][/autoit] [autoit]

    Global $hMenu3 = GUICtrlCreateMenu("Hilfe")
    Global $hMenuHI1 = GUICtrlCreateMenuItem("Credits",$hMenu3)

    [/autoit] [autoit][/autoit] [autoit]

    Global $hList = GUICtrlCreateListView("Betreff|Erstellungsdatum",10,10,227,250)
    GUICtrlSendMsg($hList, $LVM_SETCOLUMNWIDTH,-1,0)
    GUICtrlSendMsg($hList, $LVM_SETCOLUMNWIDTH,-2,0)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    If $number <> 0 Then
    For $i = 1 to $number Step +1
    $listitem = GUICtrlCreateListViewItem(IniRead("notepad.ini",$i,"Betreff",0) & "|" & IniRead("notepad.ini",$i,"Erstellungsdatum",0),$hList)
    Next
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    While 1

    [/autoit] [autoit][/autoit] [autoit]

    $msg = GUIGetMsg()

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $hMenuDI2
    Exit
    Case $hMenuHI1
    Credits()
    Case $hMenuDI1
    NewNote()
    EndSwitch

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func Credits()

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(0,"Credits","Dieses Programm wurde von Bakku (http://www.autoit.de) geschrieben." & @CRLF & @CRLF & "Es kann weitergegeben und verändert, jedoch nicht verkauft werden.")

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;===> Credits()

    [/autoit] [autoit][/autoit] [autoit]

    Func NewNote()

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(0,$hGUI)

    [/autoit] [autoit][/autoit] [autoit]

    $dGUI = GUICreate("Neue Notiz erstellen", 250, 300)
    GUISetBkColor(0xCFE0E7)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel("Erstellt am : " & $date, 120, 280)
    GUICtrlSetFont(-1,8)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel("Betreff :", 20, 30)
    $betreff = GUICtrlCreateInput("", 100, 28, 100)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel("Inhalt :", 20, 80)
    $inhalt = GUICtrlCreateEdit("", 25, 110, 200, 100)

    [/autoit] [autoit][/autoit] [autoit]

    $savebutton = GUICtrlCreateButton("Speichern", 160, 250, 70, 25)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    While 1

    [/autoit] [autoit][/autoit] [autoit]

    $msg = GUIGetMsg()

    [/autoit] [autoit][/autoit] [autoit]

    Switch $msg
    Case $GUI_EVENT_CLOSE
    ExitLoop
    Case $savebutton
    $number = $number+1
    IniWrite("notepad.ini",$number,"Erstellungsdatum",$date)
    IniWrite("notepad.ini",$number,"Betreff",GUICtrlRead($betreff))
    IniWrite("notepad.ini",$number,"Inhalt",GUICtrlRead($inhalt))
    IniWrite("notepad.ini","notenumber","notenumber",$number)
    ExitLoop
    EndSwitch

    [/autoit] [autoit][/autoit] [autoit]

    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    GUIDelete($dGUI)
    GUISetState(@SW_SHOW,$hGUI)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateListViewItem(IniRead("notepad.ini",$number,"Betreff",0) & "|" & IniRead("notepad.ini",$number,"Erstellungsdatum",0),$hList)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    EndFunc ;===> NewNote()

    [/autoit]