1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Ilse

Beiträge von Ilse

  • Combobox mehrspaltig?

    • Ilse
    • 19. Januar 2011 um 14:06

    Hallo,

    ich habe mnal wieder ein Problem mit einer Combobox.
    Kurze Erklärung:
    Die Combobox hat 2 Spalten. (sollte 2 Spalten lesen)
    In der ersten Spalte sind die Hauptbegriffe
    und in der 2. Spalte sind spezielle Nummern.

    Was ich brauche ist folgendes:
    Wenn in der Combobox etwas gewählt wurde
    dann soll eine dazugehörige Nr. erscheinen.

    Zitat

    Schäferhund | 2011
    Dackel |44557

    Die Nummer sollte man aber bei der Auswahl nicht sehen

    [autoit]


    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    $Form1 = GUICreate("Form1", 615, 440, 192, 124)
    $Combo1 = GUICtrlCreateCombo("Combo1", 40, 44, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "Collie|Schäferhund|Dackel")
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Combo1
    MsgBox(4,"Nr", GUICtrlRead ($Combo1) & " hat die Nr.")
    EndSwitch
    WEnd

    [/autoit]

    Muß ich da eine csv machen und irgendwie die Spalten lesen?


    Liebe Grüße
    Ilse ;)

  • abhängige Comboboxen

    • Ilse
    • 18. Januar 2011 um 12:11

    Hallo Autobert,

    merci für deine Hilfe.
    Dein Beispiel klappt prima!

    Aber mal eine Frage:

    Ich dachte da irgendwie an einen Zahlenindex!
    Also eine riesige Tabelle wo man so etwas übersichtlich eintragen kann.

    Combobox 1

    Zitat

    Index;Land;Stadt
    1= Deutschland
    2= Frankreich

    das erfassen und die Zuordnung
    macht mir noch etwas zu schaffen.

    Kannst du mir da noch einen Tipp geben?
    Damit das ganze nicht im Chaos endet.


    Liebe Grüße
    Ilse ;)

  • abhängige Comboboxen

    • Ilse
    • 18. Januar 2011 um 10:17

    Guten Morgen zusammen,

    ich glaube ich habe ein großes Problem.
    Ich habe eine sehr umfangreiche Combobox mit vielen Daten.

    Aus dieser 1. Combobox muß ich einen Haupt-Eintrag wählen
    und dann sollen die dazugehörigen Werte in der 2. Combobox ausgewählt werden.

    Beispiel mit Städten:
    Deutschland = Berlin, Köln, Düsseldorf....
    Frankreich = Paris, Lyon...


    Also die erste Box ist bereits voller Daten (sehr viele)
    Aber wie kann man die 2. Box die alle Daten enthält filtern.
    Beispiel 2. Box: Berlin, Köln, Düsseldorf, Paris, Lyon

    macht man das so?

    Ich habe mal ein Beispiel gemacht:

    [autoit]


    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    $Form1 = GUICreate("Form1", 419, 84, 192, 124)
    $Ausbilder = GUICtrlCreateCombo("Auswahl", 28, 32, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "Deutschland|Frankreich|Italien")
    $Stadt = GUICtrlCreateCombo("Auswahl", 208, 32, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
    GUICtrlSetState(-1, $GUI_DISABLE)
    $Label1 = GUICtrlCreateLabel("Land", 28, 12, 28, 17)
    $Label2 = GUICtrlCreateLabel("Stadt", 208, 8, 29, 17)
    GUISetState(@SW_SHOW)

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

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

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

    EndSwitch
    WEnd

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

    Meine Frage:

    Zitat

    Wo bringe ich meine Daten unter? (Tabelle, Ini....?)
    Wie kann ich das ganze abhängig machen?
    Muß ich alles mit If oder case machen? (wäre ein großer Aufwand)

    Wäre toll wenn Ihr mir einige Tipps geben könnt,
    wie man dieses Problem lösen kann?

    Liebe Grüße
    Ilse ;)

  • StringBetween Problem

    • Ilse
    • 17. Januar 2011 um 16:19

    @ alle DANKE!!!!

    Super Lösungen...

    Merci, an alle Helfer!

    Liebe Grüße
    Ilse ;)

  • StringBetween Problem

    • Ilse
    • 17. Januar 2011 um 15:15

    Hallo,

    folgendes Problem:
    In meiner Zwischenablage ist ein Text der sieht so aus:

    Zitat

    <option value="375">Dackel</option>
    <option value="800">Collie</option>
    <option value="900">Schäferhund</option>

    natürlich eine größere Liste...

    Meine Frage:
    Wie kann ich die Werte in meine Zwischenablage bekommen
    damit sie so aussehen?

    Dackel
    Collie
    Schäferhund


    Mein Code-Versuche:

    [autoit]


    #include <String.au3>

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

    $Speicher=ClipGet()

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

    $result =_StringBetween($Speicher,'<>','"') ; da komme ich nicht weiter....

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

    hm..das Ergebnis muß noch in die Zwischenablage

    Liebe Grüße
    Ilse ;)

  • Menü neue Datei erstellen und öffnen

    • Ilse
    • 5. Januar 2011 um 18:08

    danke für den erlösenden Tipp, das werde ich gleich probieren.


    Liebe Grüße
    Ilse ;)

  • Menü neue Datei erstellen und öffnen

    • Ilse
    • 5. Januar 2011 um 17:44

    Die Frage ist: wo kann der Benutzer:

    • lalala eingeben
    • png oder jpg wählen


    Beispiel Scite speichern unter...

    • Man kann im Menü speichern wählen
    • Man kann den Dateinamen eintragen
    • Man kann den Dateityp bestimmen

    Geht das auch mit Datei Neu???

    ?( Ilse

  • Menü neue Datei erstellen und öffnen

    • Ilse
    • 5. Januar 2011 um 17:30

    Hallo Milla,

    mit _FileCreate hatte ich auch schon probiert,
    Benötige ich zusätzlich eine Inputbox für den Dateinamen?

    Das Problem ist der Dateiname und das wählbare Suffix.

    Angenommen ich erstelle eine Datei.csv mit dem Menü.

    Kannst du mir ein Beispiel machen?


    Grüße
    Ilse ;)

  • Menü neue Datei erstellen und öffnen

    • Ilse
    • 5. Januar 2011 um 16:36

    Hallo,

    ich möchte mit dem Menü eine neue Datei: TXT, CSV, JPG, PNG... erzeugen.
    Wenn ich die Datei öffnen will, möchte ich die Dateien filtern. (...wie in Scite)

    Habe alles mögliche versucht, kann mir jemand mal ein Beispiel machen,
    wie man das korrekt lösen kann?


    Hier mein Menü:

    [autoit]


    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    $Form1_1 = GUICreate("Form1", 615, 440, 245, 143)
    $Datei = GUICtrlCreateMenu("&Datei")
    $mnNew = GUICtrlCreateMenuItem("&Neu", $Datei)
    $mnOpen = GUICtrlCreateMenuItem("&Öffnen", $Datei)
    GUISetState(@SW_SHOW)

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

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

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

    Case $Datei
    Case $mnNew
    Case $mnOpen
    EndSwitch
    WEnd

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

    Grüße
    Ilse ;)

  • Loop mit Liste?

    • Ilse
    • 5. Januar 2011 um 13:18

    ...ich hab's
    nach einer halben Stunde probieren
    ein Zeichen entfernt (&)

    [autoit]


    $sItems = _GUICtrlListBox_GetText($List1, $aItems[$iI])

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

    ich glaube irgendwann wird man wahnsinnig, oder? ?(

    Danke Oscar für deine Lösung.
    und natürlich die Tipps aller....

    Liebe Grüße
    Ilse ;)

  • Loop mit Liste?

    • Ilse
    • 5. Januar 2011 um 12:48

    erstmal Danke!

    @ name22
    leider stimmt meine msgbox nicht.
    Wie kann ich immer nur einen Eintrag anzeigen lassen.
    Also der aktuelle im Loop

    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    $Form1 = GUICreate("Form1", 287, 230, 232, 162)
    $List1 = GUICtrlCreateList("", 8, 28, 161, 149, BitOR($GUI_SS_DEFAULT_LIST,$LBS_MULTIPLESEL))
    GUICtrlSetData(-1, "Eintrag 01|Eintrag 02|Eintrag 03|Eintrag 04|Eintrag 05|Eintrag 06|Eintrag 07|Eintrag 08|Eintrag 09|Eintrag 10")
    $Label1 = GUICtrlCreateLabel("Bitte auswählen", 8, 8, 79, 17)
    $Start = GUICtrlCreateButton("Start", 180, 112, 75, 61)
    $Alle = GUICtrlCreateButton("Alle", 180, 32, 75, 25)
    $Keine = GUICtrlCreateButton("Keine", 180, 64, 75, 25)
    GUISetState(@SW_SHOW)

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

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

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

    Case $Start
    $aItems = _GUICtrlListBox_GetSelItems($List1)
    $sItems = ""
    For $iI = 1 To $aItems[0]
    If $iI > 1 Then $sItems &= ", "
    $sItems &= _GUICtrlListBox_GetText($List1, $aItems[$iI])

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

    MsgBox(4160, "Information", "Bearbeitet wird der Eintrag: " & $sItems)

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

    Next

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

    Case $Alle
    Case $Keine
    EndSwitch
    WEnd

    [/autoit]

    Grüße
    Ilse ;)

  • Loop mit Liste?

    • Ilse
    • 4. Januar 2011 um 20:51

    Hallo autoBert,

    bin so froh daß du dich meldest.
    Ich kann heute nicht mehr klar denken.

    Habe mir nochmals die Hilfe angesehen
    Klappt leider immer noch nicht. Bin am Ende...

    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    $Form1 = GUICreate("Form1", 287, 230, 232, 162)
    $List1 = GUICtrlCreateList("", 8, 28, 161, 149, BitOR($GUI_SS_DEFAULT_LIST,$LBS_MULTIPLESEL))
    GUICtrlSetData(-1, "Eintrag 01|Eintrag 02|Eintrag 03|Eintrag 04|Eintrag 05|Eintrag 06|Eintrag 07|Eintrag 08|Eintrag 09|Eintrag 10")
    $Label1 = GUICtrlCreateLabel("Bitte auswählen", 8, 8, 79, 17)
    $Start = GUICtrlCreateButton("Start", 180, 112, 75, 61)
    $Alle = GUICtrlCreateButton("Alle", 180, 32, 75, 25)
    $Keine = GUICtrlCreateButton("Keine", 180, 64, 75, 25)
    GUISetState(@SW_SHOW)

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

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

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

    Case $Start
    $aItems = _GUICtrlListBox_GetSelItems($List1)
    For $iI = 1 To $aItems[0]
    If $iI > 1 Then $sItems &= ", "
    $sItems &= $aItems[$iI]
    Next
    MsgBox(4160, "Information", "Items Selected: " & $sItems)
    Case $Alle
    Case $Keine
    EndSwitch
    WEnd

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

    Grüße
    Ilse ;)

  • Loop mit Liste?

    • Ilse
    • 4. Januar 2011 um 18:14

    Hallo,

    kann mir jemand sagen wie ich einen Loop mit einer Liste machen kann?
    Die Listeneinträge kann man frei anklicken.
    Es können also 2, 4, 8.... ausgewählt sein.

    Ich meine z.B. so:
    Msgbox Eintrag 01 gewählt
    Msgbox Eintrag 02 gewählt
    Msgbox fertig!

    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    $Form1 = GUICreate("Form1", 287, 230, 232, 162)
    $List1 = GUICtrlCreateList("", 8, 28, 161, 149, BitOR($GUI_SS_DEFAULT_LIST,$LBS_MULTIPLESEL))
    GUICtrlSetData(-1, "Eintrag 01|Eintrag 02|Eintrag 03|Eintrag 04|Eintrag 05|Eintrag 06|Eintrag 07|Eintrag 08|Eintrag 09|Eintrag 10")
    $Label1 = GUICtrlCreateLabel("Bitte auswählen", 8, 8, 79, 17)
    $Start = GUICtrlCreateButton("Start", 180, 112, 75, 61)
    $Alle = GUICtrlCreateButton("Alle", 180, 32, 75, 25)
    $Keine = GUICtrlCreateButton("Keine", 180, 64, 75, 25)
    GUISetState(@SW_SHOW)

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

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

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

    Case $Start
    Case $Alle
    Case $Keine
    EndSwitch
    WEnd

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

    Habe im Forum das gefunden

    Spoiler anzeigen


    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>


    $Form1 = GUICreate("ListView-Test", 532, 280, 347, 164)
    $list = GUICtrlCreateListView("List ", 16, 16, 345, 209)
    GUICtrlCreateListViewItem("Test",$list)
    GUICtrlCreateListViewItem("Fest",$list)
    GUICtrlCreateListViewItem("Rest",$list)
    $Button1 = GUICtrlCreateButton("GetSelectedItem", 368, 64, 145, 25)
    GUISetState(@SW_SHOW)


    While Sleep(30)
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1

    _check()
    EndSwitch
    WEnd


    Func _check()
    $item = StringTrimRight(GUICtrlRead(guictrlread($list)),1)
    If $item = "" Then
    MsgBox(0,"Error","No Item selected!")
    Else
    MsgBox(0,"",$item)
    EndIf
    EndFunc


    Bringt mich leider nicht weiter.

    Was ich auch nicht weiß:
    Wie kann man alle selektieren oder keine?

    Viele Grüße
    Ilse ;)

  • csv Datei generieren

    • Ilse
    • 4. Januar 2011 um 10:42

    Morgen BugFix,

    merci für den Link. Zum editieren prima Lösung.
    Eine Frage:
    Jetzt muß da nur noch meine.csv da rein!

    Spoiler anzeigen


    #include<StaticConstants.au3>
    #include<GUIConstantsEx.au3>
    #include<ListViewConstants.au3>
    #include<StructureConstants.au3>
    #include<WindowsConstants.au3>
    #include <GUIListView.au3>

    Global $currentItem[2], $title, $currentOpt[2] = ["none"]

    $GUI = GUICreate('test')
    $hListView = GUICtrlCreateListView('Spalte1|Spalte2|Spalte3', 10, 10, 300, 200, $LVS_REPORT)
    _GUICtrlListView_SetColumnWidth($hListView, 0, 70)
    _GUICtrlListView_SetColumnWidth($hListView, 1, 60)
    _GUICtrlListView_SetColumnWidth($hListView, 2, $LVSCW_AUTOSIZE_USEHEADER )
    For $i = 1 To 9
    GUICtrlCreateListViewItem('Z. ' & $i & ' - Sp. 1|Z. ' & $i & ' - Sp. 2|Z. ' & $i & ' - Sp. 3', $hListView)
    Next

    $EditBox = GUICreate('', 200, 30, -1, -1, BitOR($WS_POPUP,$WS_BORDER), $WS_EX_TOPMOST)
    $dummy = GUICtrlCreateDummy()
    $hEdit = GUICtrlCreateInput('', 5, 5, 190, 20, $SS_CENTER)
    HotKeySet('{ESC}', '_EscEdit')
    Global $AccelKeys[1][2]=[["{ENTER}", $dummy]]
    GUICtrlSetOnEvent($dummy, "_EditEnter")
    GUISetAccelerators($AccelKeys)

    GUISetState(@SW_SHOW, $GUI)
    GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")

    While True
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit
    WEnd

    Func _LeftDblClick($Info)
    If $Info[3] = -1 Then Return
    If $currentOpt[0] = "none" Then
    $currentOpt[0] = Opt('GUICoordMode', 1)
    $currentOpt[1] = Opt("GUIOnEventMode", 1)
    EndIf
    GUICtrlSetOnEvent($hEdit, '_EditEnter')
    _GUICtrlListView_SetSelectedColumn($Info[1], $Info[4])
    $title = WinGetTitle($GUI)
    Local $mouse = MouseGetPos(), $posEdit = WinGetPos($EditBox)
    Local $posGUI = WinGetPos($GUI), $posLV = ControlGetPos($GUI, '', $hListView)
    Local $colInfo = _GUICtrlListView_GetColumn($Info[1], $Info[4]), $sumWidth = 0, $tmp
    WinSetTitle($GUI, '', 'Editiere: Zeile ' & $Info[3]+1 & ', ' & $colInfo[5])
    For $i = 0 To $Info[4]
    $tmp = _GUICtrlListView_GetColumn($Info[1], $i)
    $sumWidth += $tmp[4]
    Next
    $sumWidth -= $colInfo[4]
    Local $xPos = $posGUI[0]+$posLV[0]+$sumWidth
    If $xPos+$colInfo[4]+10 > @DesktopWidth Then $xPos = @DesktopWidth - ($colInfo[4] + 10)
    If $xPos < 0 Then $xPos = 0
    WinMove($EditBox, '', $xPos, $mouse[1]-$posEdit[3], $colInfo[4]+10)
    GUICtrlSetData($hEdit, _GUICtrlListView_GetItemText($Info[1], $Info[3], $Info[4]))
    $currentItem[0] = $Info[3]
    $currentItem[1] = $Info[4]
    GUISetState(@SW_SHOW, $EditBox)
    EndFunc

    Func _EscEdit()
    WinSetTitle($GUI, '', $title)
    Opt('GUICoordMode', $currentOpt[0])
    Opt("GUIOnEventMode", $currentOpt[1])
    $currentOpt[0] = "none"
    GUISetState(@SW_HIDE, $EditBox)
    EndFunc

    Func _EditEnter()
    WinSetTitle($GUI, '', $title)
    Opt('GUICoordMode', $currentOpt[0])
    Opt("GUIOnEventMode", $currentOpt[1])
    $currentOpt[0] = "none"
    _GUICtrlListView_SetItemText($hListView, $currentItem[0], GUICtrlRead($hEdit), $currentItem[1])
    GUISetState(@SW_HIDE, $EditBox)
    EndFunc

    Func WM_NOTIFY($hWnd, $iMsg, $iwParam, $ilParam)
    Local $hWndFrom, $iIDFrom, $iCode, $tNMHDR, $hWndListView
    $hWndListView = $hListView ; ID des LV
    If Not IsHWnd($hListView) Then $hWndListView = GUICtrlGetHandle($hListView) ; ID des LV
    $tNMHDR = DllStructCreate($tagNMHDR, $ilParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $iCode = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
    Case $hWndListView
    Switch $iCode
    Case $NM_DBLCLK
    Local $tInfo = DllStructCreate($tagNMITEMACTIVATE, $ilParam)
    Local $aInfo[5] = [$hWndFrom, $iIDFrom, $iCode, DllStructGetData($tInfo, "Index"), _
    DllStructGetData($tInfo, "SubItem")]
    _LeftDblClick($aInfo)
    EndSwitch
    EndSwitch
    Return $GUI_RUNDEFMSG
    EndFunc ;==>WM_NOTIFY


    Muß ich das mit der autoBert-Funktion
    einlesen der Textdatei in die Listview:
    kombinieren?

    Ich bin immer noch mit _FileWriteFromArray am kämpfen.
    Kannst du da mal drübersehen?

    [autoit]


    #include<File.au3>

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

    dim $aRasse[4]
    $aRasse[0]="Boxer"
    $aRasse[1]="Collie"
    $aRasse[2]="Schäferhund"
    $aRasse[3]="Spitz"

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

    $sFile = @ScriptDir & "\Test.txt"

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

    ;For $i =1 to UBound ($aRasse,1)-1
    _FileWriteFromArray($sFile, $aRasse, -1)
    ;next

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

    Run("notepad.exe " & $sFile)

    [/autoit]

    noch eine Frage hierzu:
    wie kann ich einen einzelnen Wert schreiben?

    [autoit]


    _FileWriteFromArray($sFile, $aRasse[3], -1)

    [/autoit]

    das geht leider nicht!
    Viele Grüße
    Ilse ;)

  • csv Datei generieren

    • Ilse
    • 4. Januar 2011 um 09:49

    Guten Morgen zusammen,
    mußte gestern leider wieder los.

    Danke für die Tipps.

    Hier mal mein fehlerhafter Versuch mit _FileWriteFromArray
    (Habt erbarmen...Arrays machen mir noch das Leben schwer)

    [autoit]


    dim $aRasse[4]
    $aRasse[0]="Boxer"
    $aRasse[1]="Collie"
    $aRasse[2]="Schäferhund"
    $aRasse[3]="Spitz"

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

    $sFile = @ScriptDir & "\Test.txt"

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

    For $i =1 to UBound ($aRasse,1)-1
    _FileWriteFromArray($sFile, $aRasse[$i], 1)
    next

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

    Run("notepad.exe " & $sFile)

    [/autoit]

    Wenn ich ehrlich bin, ich habe diesen Loop nicht verstanden!

    [autoit]


    For $i =1 to UBound ($aRasse,1)-1 ; also ich starte mit 1, ermittle mit UBound die Anzahl der Variable $aRasse und dann ????????1,-1
    _FileWriteFromArray($sFile, $aRasse[$i], 1) ; ich schreibe in das File $sFile, $aRasse??????
    next

    [/autoit]

    @ autoBert

    Ich habe mir die beiden Dateien heruntergeladen (dein Link)

    Zitat

    ListViewEIP.au3
    _EIPListView.au3


    im gleichen Ordner abgespeichert...
    erhalte aber eine Fehermeldung.
    ERROR: $HDN_FIRST previously declared as a 'Const'

    Ich kann das Script nicht starten.

    Jetzt brauch ich einen starken Kaffee ?(

    Liebe Grüße
    Ilse ;)

  • csv Datei generieren

    • Ilse
    • 3. Januar 2011 um 15:38

    ...zum editieren prima
    vielleicht hat ja jemand noch Tipps
    zum anfügen größerer Datenmengen :(

    Das würde die Arbeit wirklich erleichtern.

    Liebe Grüße
    Ilse ;)

  • csv Datei generieren

    • Ilse
    • 3. Januar 2011 um 14:56

    Hallo zusammen,

    folgendes Problem:
    Ich muß sehr oft gleiche Daten in eine Tabelle schreiben.
    Jetzt wage ich mich mal ganz vorsichtig an autoit
    Ich hoffe daß man das Problem damit lösen kann.
    z.B. 10 Boxer Welpen, alle ohne Papiere, nicht geimpft...= 10 Einträge u.s.w.
    Hier mal meine Grundidee:

    • Ich öffne eine leere csv Datei
    • Ich wähle die Hunde z.B. Collies
    • Dann fülle ich eine einzige Zeile der Listview aus
    • Dann wähle ich meine Anzahl

    Wenn ich nun auf eintragen klicke, dann sollte die Liste.csv
    z.B. 10xBoxer Welpen, Papiere keine...haben
    Die Rasse wäre quasie die erste Spalte.


    Hier ist mein Rohbau:

    [autoit]


    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <ListViewConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    $Form2 = GUICreate("Form1", 629, 487, 297, 172)
    $List1 = GUICtrlCreateList("", 36, 120, 173, 84, BitOR($GUI_SS_DEFAULT_LIST,$LBS_MULTIPLESEL))
    GUICtrlSetData(-1, "Boxer|Collie|Dackel|Schäferhund")
    $Label1 = GUICtrlCreateLabel("Bitte auswählen", 36, 92, 79, 17)
    $Katalog = GUICtrlCreateButton("Katalog Auswahl", 36, 20, 107, 25)
    $KatPfad = GUICtrlCreateInput("", 36, 56, 389, 21)
    $ListView1 = GUICtrlCreateListView("Hundename|Papiere|Bild|Kinderlieb|geimpft|Gesundheit|Bemerkung", 36, 248, 574, 186)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 3, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 4, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 5, 50)
    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 6, 50)
    $Alle = GUICtrlCreateButton("Alle", 212, 120, 75, 25)
    $Keine = GUICtrlCreateButton("Keine", 212, 152, 75, 25)
    $KatNeu = GUICtrlCreateButton("Neuer Katalog anlegen", 192, 20, 131, 25)
    $Eintragen = GUICtrlCreateButton("Eintragen", 212, 184, 75, 57)
    $Anzeige = GUICtrlCreateButton("Katalog anzeigen", 492, 216, 115, 25)
    $Anzahl = GUICtrlCreateInput("1", 292, 204, 29, 21)
    $Label2 = GUICtrlCreateLabel("leere csv Datei", 332, 28, 75, 17)
    $Label3 = GUICtrlCreateLabel("x", 324, 208, 9, 17)
    GUISetState(@SW_SHOW)

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

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

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

    Case $Katalog
    $Kat = FileOpenDialog("", @WindowsDir & "\", "Kataloge (*.csv;*.txt)", 1 + 4 )
    GUICtrlSetData($KatPfad, $Kat)
    Case $ListView1
    Case $Alle
    Case $Keine
    Case $KatNeu
    Case $Eintragen
    Case $Anzeige
    EndSwitch
    WEnd

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

    Wenn man die Daten auch irgendwie in die Listview einlesen und editieren kann,
    das wäre natürlich super. Ich bin noch mit der Listview am lesen, probieren...

    Freue mich über jeden Tipp

    Liebe Grüße
    Ilse ;)

  • Ordnerinhalte auslesen

    • Ilse
    • 3. Januar 2011 um 12:09

    @alle

    klappt jetzt alles super

    Sage 1000 Dank!

    Liebe Grüße
    Ilse ;)

  • Ordnerinhalte auslesen

    • Ilse
    • 3. Januar 2011 um 11:26

    @ name22

    toll deine Tipps,
    mir geht jedesmal ein "Lichtlein auf"

    [autoit]


    #Include <File.au3>
    #Include <Array.au3>

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

    $filepath = "C:\Users\Public\Pictures\Sample Pictures"
    $OST_OSA =_FileListToArray($filepath,"*.jpg",1)
    ;$OST_OSA2 =_FileListToArray($filepath,"*.gif",1)

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

    If @Error= 1 Then
    MsgBox (0,"","Path not found or invalid",1)
    Exit
    EndIf
    If @Error= 4 Then
    MsgBox (0,"","No Files Found.",1)
    Exit
    EndIf
    _ArrayDisplay($OST_OSA,"$FileList")

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

    For $x = 1 to $OST_OSA[0]
    Msgbox(0,'Record:', $OST_OSA[$x],1)
    Next

    [/autoit]

    Weißt du wie man in dieser For Schleife
    auch den kpl. Pfad ausgeben kann?

    [autoit]


    For $x = 1 to $OST_OSA[0]
    Msgbox(0,'Record:', $OST_OSA[$x],1)
    Next

    [/autoit]
  • Ordnerinhalte auslesen

    • Ilse
    • 3. Januar 2011 um 11:04

    hab das ganze geändert
    aber es werden immer noch keine Dateien gezeigt!

    [autoit]


    #Include <File.au3>
    #Include <Array.au3>

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

    $filepath = "C:\Users\Public\Pictures\Sample Pictures"
    $OST_OSA =_FileListToArray($filepath,"*.jpg",1)
    $OST_OSA2 =_FileListToArray($filepath,"*.gif",1)

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

    If @Error= 1 Then
    MsgBox (0,"","Path not found or invalid",1)
    Exit
    EndIf
    If @Error= 4 Then
    MsgBox (0,"","No Files Found.",1)
    Exit
    EndIf
    _ArrayDisplay($OST_OSA,"$FileList")

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

    For $x = 1 to $OST_OSA[0]
    Msgbox(0,'Record:', $OST_OSA[$x],1)
    Next

    [/autoit]


    Grüße
    Ilse ;)

    P.S. mit den Arrays bin ich noch am lernen!

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™