Beiträge von Ilse

  • If Abfrage Problem

    Hallo,

    ich kämpfe schon den ganzen Morgen mit einer If Abfrage
    Hab mich irgendwie mit else + elseif total verwirrt!
    So ist der Grundaufbau:

    Spoiler anzeigen

    If _FFSearch("Hunde") Then
    Msgbox(0,"Ergebnis", "Hunde gefunden")
    else
    Msgbox(0,"Ergebnis", "keine Hunde gefunden")
    endif

    So und jetzt beschreibe ich mal bin schon ganz durcheinander:

    1. Wenn er das Wort "Hunde" nicht findet beende das ganze!
    2. Findet er "Hunde" dann geht's weiter suche Collies oder Pudel! Findet er keine der beiden, dann beende das ganze!
    3. Findet er Collies, dann suche "Welpen"...

    Macht man das besser mit Case?

  • Koda Problem mit Arrays

    Hallo m_obi,

    merci, es klappt alles prima!

    Zitat

    Global $aInput[10] ; 10 = 10 Felder, du musst es nur hier ändern

    ja, das wußte ich
    nur Micha hat diesen Code

    Zitat

    Global $array[1] ;<<< hier

    obwohl mehrere Inputfelder angesprochen wurden.
    Und es geht trotzdem. Das habe ich nicht verstanden.

    Egal, es klappt.
    Ich bin schon den ganzen morgen an einer IF Abfrage am kämpfen.
    Wenn ich es in einer Stunde nicht hinkriege, dann melde ich mich wieder.

    Liebe Grüße
    Ilse ;)

  • Koda Problem mit Arrays

    @Micha,

    habe noch einen Fehler entdeckt, $Input ersetzt...
    jetzt klappt alles.

    Aber was ich am Code nicht verstehe:
    Global $array[1] ;<<< hier

    Wieso muß da [1] hin, es sind doch 3 Felder?

    @m_obi
    merci, hab ich mir nochmals angesehen
    deswegen versteh ich das Global $array irgendwie nicht!
    Dachte bei 10 Feldern $array[10]...

    Viele Grüße
    Ilse

  • Koda Problem mit Arrays

    ...mmh immer noch nicht!
    Habe mal beim Menüpunkt öffnen die arrays integriert!

    Spoiler anzeigen


    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    Global $Input[3]
    #region
    $Form1 = GUICreate("Form1", 517, 170, 303, 240)
    $MenuItem1 = GUICtrlCreateMenu("Datei")
    $men_open = GUICtrlCreateMenuItem("Öffnen", $MenuItem1)
    $men_save = GUICtrlCreateMenuItem("speichern", $MenuItem1)
    #cs
    $Input[0] = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input[1] = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input[2] = GUICtrlCreateInput("Input3", 272, 80, 185, 21)
    #ce

    $Input1 = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input2 = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input3 = GUICtrlCreateInput("Input3", 272, 80, 185, 21)


    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###
    $i=1
    while isdeclared("Input"&$i)
    $array[$i]=eval("Input"&$i)
    $i=$i+1
    wend

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

    Case $men_open
    $openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
    If @error Then
    MsgBox(4096, "", "No File(s) chosen")
    Else
    $openini = StringReplace($openini, "|", @CRLF)

    For $i=0 to UBound($array)-1
    $MeineIni = IniRead($openini, "Felder", $i, "NotFound")
    GUICtrlSetData($array[$i],$MeineIni)
    msgbox(4096,$array[$i],$MeineIni)
    $MeineIni = ""

    Next
    EndIf
    Case $men_save
    $saveini = FileSaveDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 16)
    If @error Then
    MsgBox(4096, "", "No File(s) chosen")
    Else
    For $i=0 To UBound($Input)-1
    IniWrite($saveini,"Felder",$i,GUICtrlRead($Input[$i]))
    Next
    EndIf
    EndSwitch
    WEnd

  • Koda Problem mit Arrays

    Hallo zusammen
    und danke für all eure Tipps.

    Aber ich hab's so leider noch nicht zum Laufen gebracht!

    Spoiler anzeigen


    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    Global $Input[3]
    #region
    $Form1 = GUICreate("Form1", 517, 170, 303, 240)
    $MenuItem1 = GUICtrlCreateMenu("Datei")
    $men_open = GUICtrlCreateMenuItem("Öffnen", $MenuItem1)
    $men_save = GUICtrlCreateMenuItem("speichern", $MenuItem1)
    #cs
    $Input[0] = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input[1] = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input[2] = GUICtrlCreateInput("Input3", 272, 80, 185, 21)
    #ce

    $Input1 = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input2 = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input3 = GUICtrlCreateInput("Input3", 272, 80, 185, 21)


    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###
    $i=0
    while isdeclared("Input"&$i)
    $array[$i]=eval("Input"&$i)
    $i=$i+1
    wend

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

    Case $men_open
    $openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4)
    If @error Then
    MsgBox(4096, "", "No File(s) chosen")
    Else
    $openini = StringReplace($openini, "|", @CRLF)

    For $i=0 to UBound($Input)-1
    $MeineIni = IniRead($openini, "Felder", $i, "NotFound")
    GUICtrlSetData($Input[$i],$MeineIni)
    msgbox(4096,$Input[$i],$MeineIni)
    $MeineIni = ""

    Next
    EndIf
    Case $men_save
    $saveini = FileSaveDialog("Bitte wählen Sie einen Katalog:", @ScriptDir & "\", "Einstellungen (*.ini;*.txt)", 16)
    If @error Then
    MsgBox(4096, "", "No File(s) chosen")
    Else
    For $i=0 To UBound($Input)-1
    IniWrite($saveini,"Felder",$i,GUICtrlRead($Input[$i]))
    Next
    EndIf
    EndSwitch
    WEnd

  • Koda Problem mit Arrays

    Hallo,

    wenn man in KODA zahlreiche Inputfelder hat

    z.B.:

    Spoiler anzeigen


    $Input1 = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input2 = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input3 = GUICtrlCreateInput("Input3", 272, 80, 185, 21)...

    diese aber als Arrays darstellen muß
    dann geht das innherhalb von KODA nicht!
    Klar, man kann Sie von Hand in SCite ändern: $Input[1]

    Innerhalb von Koda kann man das aber so nicht angeben!
    Bei den Namen sind keine [ ] zuläsig!

    Jetzt aber das Problem:
    Wenn KODA aktualisiert wird, dann sind alle Arrays plötzlich weg!
    aus $Input[1] wird wieder $Input1...

    Wenn ich die Arrays außerhalb von KODA (in SCite nach der Koda-Region) benenne, geht es aber auch nicht:

    Spoiler anzeigen


    $Input1="$Input[1]"
    $Input2="$Input[2]"
    $Input3="$Input[3]"

    Habt Ihr eine Idee wie man dieses Problem lösen kann?

    Grüße
    Ilse

  • Ini in Gui Felder einlesen

    Hallo,

    habe nochmals Arrays integriert,
    aber es klappt einfach nicht!

    Spoiler anzeigen


    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region
    $Form1 = GUICreate("Form1", 517, 170, 303, 240)
    $MenuItem1 = GUICtrlCreateMenu("Datei")
    $men_open = GUICtrlCreateMenuItem("Öffnen", $MenuItem1)
    $men_save = GUICtrlCreateMenuItem("speichern", $MenuItem1)
    $Input1 = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input2 = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input3 = GUICtrlCreateInput("Input3", 272, 80, 185, 21)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    Case $men_open
    $openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @Scriptdir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4 )
    If @error Then
    MsgBox(4096,"","No File(s) chosen")
    Else
    $openini = StringReplace($openini, "|", @CRLF)

    $Feld1 = IniRead($openini, "Suchkriterium", "1", "NotFound")
    $Feld2 = IniRead($openini, "Suchkriterium", "2", "NotFound")
    MsgBox(4096, "test", $Feld1)
    ;$Input1=$Feld1
    Global $i=0
    ;Hier beginnt der Loop
    Do

    $i +=1
    Dim $input[3];
    $input[0] = GUICtrlCreateInput("", 88, 96, 217, 24)
    $input[1] = GUICtrlCreateInput("", 88, 120, 217, 24)
    $input[2] = GUICtrlCreateInput("", 88, 144, 217, 24)

    GuictrlsetData($input[$i], $Feld1)


    Until $i = 3
    EndIf


    Case $men_save
    EndSwitch
    WEnd

  • Ini in Gui Felder einlesen

    Hallo m-obi,

    ich habe mal das ganze bereinigt und ein neues Script gemacht!

    So ist z.B. die ini

    Spoiler anzeigen


    [Felder]
    1=Text1
    2=Text2
    3=Text3
    4=Text4
    5=Text5
    6=Text6
    7=Text7
    8=Text8
    9=Text9
    10=Text10

    Das ist die Gui mal mit 3 Feldern:

    Spoiler anzeigen


    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region
    $Form1 = GUICreate("Form1", 517, 170, 303, 240)
    $MenuItem1 = GUICtrlCreateMenu("Datei")
    $men_open = GUICtrlCreateMenuItem("Öffnen", $MenuItem1)
    $men_save = GUICtrlCreateMenuItem("speichern", $MenuItem1)
    $Input1 = GUICtrlCreateInput("Input1", 272, 16, 185, 21)
    $Input2 = GUICtrlCreateInput("Input2", 272, 48, 185, 21)
    $Input3 = GUICtrlCreateInput("Input3", 272, 80, 185, 21)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    Case $men_open
    $openini = FileOpenDialog("Bitte wählen Sie einen Katalog:", @Scriptdir & "\", "Einstellungen (*.ini;*.txt)", 1 + 4 )
    If @error Then
    MsgBox(4096,"","No File(s) chosen")
    Else
    $openini = StringReplace($openini, "|", @CRLF)

    EndIf


    Case $men_save
    EndSwitch
    WEnd

    Die Felder sollten mit dem Inhalt der ini angezeigt werden
    und falls möglich per Inputbox im Menüpunkt gespeichert werden.

  • Inputbox im Vordergrund

    Hallo,

    meine Gui habe ich mit
    WinSetOnTop($Form1_1, "", 1)
    in den Vordergrund gesetzt!

    Wenn ich nun einen Menüpunkt mit einer Inputbox anwähle
    erscheint die Inputbox hinder der Gui-Form!

    Wie kann ich die Inputbox vor die Gui die (always on Top ist) bekommen?

    Spoiler anzeigen


    Case $men_new

    $value = InputBox("Test", "Bitte geben Sie ein oder zwei Zeichen ein.", "", " M2")
    WinSetOnTop($value, "", 1)

    das klappt leider nicht!

    Grüße
    Ilse :(

  • Ini in Gui Felder einlesen

    Hallo,

    das mit den Arrays hat leider nicht funktioniert!

    Spoiler anzeigen


    Global $i=0

    Do

    $i +=1

    $MeineIni = IniRead($openini, "Suchkriterium", $i, "NotFound")

    Dim $txtlink[4];Die Gui hat 10 Felder zum Test 4

    $txtlink[0] = GUICtrlCreateInput()
    $txtlink[1] = GUICtrlCreateInput()
    $txtlink[2] = GUICtrlCreateInput()

    GuictrlsetData($txtlink[$i], $MeineIni)


    Until $i = 4

    GuiCtrlCreateInput...das versteh ich nicht ganz,
    diese Zeilen wurden bereits mit Koda erstellt!
    Muß ich die mit den Positionen neu setzen?

    Grüße
    Ilse

  • Ini in Gui Felder einlesen

    Danke für die Superschnelle Antwort!

    GuictrlsetData das hat mir gefehlt!

    Folgendes Problem habe ich noch:
    Die Felder heißen txtFeld
    und diese sind alle nummeriert!
    Also, txtFeld1, txtFeld2...

    [autoit]


    $Feld = "txtfeld"
    ;MsgBox(4096, $Feld, $rot)
    GuictrlsetData($Feld&$i, $rot)

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

    das geht irgendwie nicht!
    Grüße
    Ilse ;)

  • Ini in Gui Felder einlesen

    Hallo,

    wie kann man eine ini in Gui Felder einlesen?

    So öffne ich die ini:

    [autoit]


    $rot = IniRead($openini, "Farben", $i, "NotFound")
    MsgBox(4096, "INI", $rot)

    [/autoit]

    das geht,

    meine Gui hat nun Textfelder
    und in diese Felder soll der Wert!

    z.B. so:

    GuiFeld1= $rot

    Grüße
    Ilse :(

  • IniWrite Gui Variable

    Hallo,

    nach etlichem erfolglosen Probieren muß ich mich wieder melden:

    • Ich habe ein Textfeld in meiner Gui mit dem Inhalt: (meineDaten.ini)
    • Ich möchte mit einem Klick diese Datei anlegen

    mein Code

    [autoit]


    $Inipfad=GUICtrlRead($txtinipfad) ;das Gui Feld mit dem Inhalt MeineDaten.ini
    IniWrite(@ScriptDir & "/MeineDaten.ini","sektion2", "Schlüssel", "Das ist ein neuer Wert") ; das funktioniert!

    [/autoit]

    Wie ist die korrekte Syntax um MeineDaten.ini mit der Variablen zu ersetzen?
    IniWrite(@ScriptDir & "/" $Inipfad, geht nicht!

    Bekomm es heute morgen einfach nicht hin!

    Liebe Grüße
    Ilse

  • Fenster-Fokus Problem

    Hallo XovoxKingdom,

    suuuper! Funktioniert prima!
    Ich hatte mir gestern ff.au3 installiert.

    Was mir noch etwas unklar ist:
    Wenn man eine *.exe macht,
    genügt es dann, daß der user per include die ff.au3 bekommt,
    oder muß er auch Mozrepl installieren?

    Viele Grüße
    Ilse ;)

  • Fenster-Fokus Problem

    Hallo,

    ich habe ein Problem mit der Fensteraktivierung!
    WinActivate...geht nicht, da sich die Fenster wechseln!

    Zur Info:
    Eine Gui ist immer im Vordergrund:

    [autoit]


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 349, 115, 431, 187)
    $btnbrowser = GUICtrlCreateButton("Internet-Browser", 88, 40, 195, 25)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    WinSetOnTop($Form1, "", 1)

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

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

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

    Case $btnbrowser
    EndSwitch
    WEnd

    [/autoit]

    Im Hintergrund befindet sich Firefox mit mehreren Tabs!

    Ich wähle in Firefox einen Tab
    und klicke auf die Gui-Schaltfläche, die dann in diesem Firefox-Tab etwas machen soll!
    Dazu benötigt dieses Fenster und der Tab den Fokus!

    Wie kann ich nun den Fokus von der Gui wieder zurück auf Firefox setzen?
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    Die Titelleiste ist ja jedesmal unterschiedlich!

    Grüße
    Ilse