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. autoBert

Beiträge von autoBert

  • Problem: Rechtevergabe in Win7

    • autoBert
    • 15. November 2010 um 16:31

    Hallo tklausl,

    vermutlich generiert die Firewall einen Hash (MD5, oder ähnliches) und dieser ist ja jedesmal verschieden,

    mfg autoBert

  • Wörter Suchmaschine!

    • autoBert
    • 15. November 2010 um 16:26

    Hallo Wonder,

    in eigenen Skripten kannst du dafür Funktionen der GuiRichEdit.au3 nehmen. Hier kannst du dir die Hilfe herunterladen, die Funktionen findest du unter GuiRichEdit Management bei den beutzerdefinierten Funktionen. Nützlich hierfür

    [autoit]

    _GUICtrlRichEdit_FindText
    _GUICtrlRichEdit_SetCharAttributes

    [/autoit]

    .
    Falls es eine Fremdanwendung ist, solltest du etwas genauer werden nicht dass alle ihre Glaskugel putzen müssen um dir eine Lösung anbieten zu können,

    mfg autoBert

  • function soll immer wiederhol werden bis benutzerabbruch

    • autoBert
    • 15. November 2010 um 16:16

    Hallo rewejo,

    das leeren von Arrays kannst du auch durch eine Neudeklaration erreichen, wenn du also

    [autoit]

    Global $avArray[1], $loesung[1]

    [/autoit]

    in die func aufgabe nimmst und meinen vorherigen Post (#5) beachtest sollte alles klappen ,

    mfg autoBert

  • Serverprohramm konsole Hiden

    • autoBert
    • 15. November 2010 um 16:10
    Zitat von johnnyboyy

    ist es schlimm wenn ich etwas Poste um den thread am leben zu erhalten?false ja , beleehrt mich ums bessere , da das Fileread problemm weiterhin besteht


    führt in der Regel dazu, dass der Thread ignoriert wird. 24 h sind hier meines Erachtens nach mind. angebracht,

    mfg autoBert

  • Nach hinzufügen eines Link geht ein Button nicht mehr

    • autoBert
    • 15. November 2010 um 16:00

    Hallo Ophiel,

    tausche Func _Read_LinksFile gegen diese:

    [autoit]

    Func _Read_LinksFile()
    _FileReadToArray(@ScriptDir & "\data\links.txt", $aRecords) ;<==================================0
    If IsArray($aRecords) Then
    ;_ArrayDisplay($aRecords)
    If $aRecords[0] > 1 Then
    For $x = 1 To $aRecords[0]
    GUICtrlSetData($list, $aRecords[$x])
    Next
    EndIf
    EndIf
    EndFunc ;==>_Read_LinksFile

    [/autoit]

    PS.: mit den Bildern sieht es richtig gut aus,

    Edit: mit dem Abbrechen-Button gefällt mir die Optik besser

    mfg autoBert

  • Oscars FileExplorer hat einen Fehler UND ICH FINDE IHN EINFACH NICHT!

    • autoBert
    • 15. November 2010 um 15:48

    Hallo Mr_gitarre,

    da Oscar keinen Zufallsgenerator eingebaut hat, sollte es eigentlich unmöglich sein auf einem Rechner zu 2 Verschiedenen Ergebnissen zu kommen. Besorge dir die Ausgabe 24 von CT mit CD (€ 3,70) da sind Hardware-Diagnose Programme dabei. Ich tippe nämlich auf einen Hardware- bzw. Treiberfehler auf deinem System, da ausser dir ja noch niemand mit diesem Tool-Probleme hatte,

    mfg autoBert

  • Stoppuhr im hundertstel bereich

    • autoBert
    • 15. November 2010 um 15:21

    @Grossvater: setze die ms auf 5 oder 10, denn bei mir sind die Werte mit 1 ms schlechter als mit 2.

    @Fr34k: nur nicht übertreiben, den im Skript sind 2 ms eingestellt also 5* wäre optimal, selbst wenn du auf 1 ms heruntergegangen bist sind es <= 10

    denke aber, für exakte Timings gibt es bessere Sprachen

    @Threadersteller setze bitte das Thema auf gelöst,

    mfg autoBert

  • Nach hinzufügen eines Link geht ein Button nicht mehr

    • autoBert
    • 15. November 2010 um 15:10

    Hallo ophiel,

    hier die überarbeitete Version:

    Spoiler anzeigen
    [autoit]

    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=C:\Users\PC\Desktop\Logo Test\2\Etarus.ico
    #AutoIt3Wrapper_Res_Description=Suchmaschinen Optimierer
    #AutoIt3Wrapper_Res_Fileversion=1.0.0.0
    #AutoIt3Wrapper_Res_LegalCopyright=Copyright by Etarus
    #AutoIt3Wrapper_Res_Language=1031
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****

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

    #include <GUIConstants.au3>
    #include <IE.au3>
    #include <Array.au3>
    #include <File.au3>

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

    Global $list
    Global $aRecords[1] ;<==================== muss ein Array sein

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

    $frmMain = GUICreate("Suchmaschinen Optimierer - Startseite", 600, 420)
    GUISetFont(14, 400, 0, "Comic Sans MS")
    $mnuFile = GUICtrlCreateMenu("Datei")
    $mnuStart = GUICtrlCreateMenuItem("Start", $mnuFile)
    $mnuExit = GUICtrlCreateMenuItem("Schließen", $mnuFile)
    $mnuVw = GUICtrlCreateMenu("Verwaltung")
    $mnuVw_links = GUICtrlCreateMenuItem("Link verwaltung", $mnuVw)
    $mnuInfo = GUICtrlCreateMenu("Info")
    $mnuHelp = GUICtrlCreateMenuItem("Hilfe", $mnuInfo)
    GUICtrlCreatePic(@ScriptDir & "\sdk\bk_main.jpg", 0, 0, 600, 400)
    GUICtrlSetState(-1, $GUI_DISABLE)
    $picStartMain = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 120, 260, 150, 50)
    $picStartMain = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 330, 260, 150, 50)
    $lblStartMain = GUICtrlCreateLabel("Start", 145, 260, 100, 40)
    GUICtrlSetFont(-1, 28, 400, 0, "MV Boli")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    $lblExitMain = GUICtrlCreateLabel("Beenden", 335, 260, 140, 40)
    GUICtrlSetFont(-1, 28, 400, 0, "MV Boli")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlCreateLabel("Gebrauchsanweisung:", 180, 15, 250, 35)
    GUICtrlSetFont(-1, 20, 400, 4, "MV Boli")
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlCreateLabel('Um einen neuen Link hinzuzufügen, wählen Sie unter "Verwaltung" den Menüpunkt "Link Verwaltung" aus. Nun wird ihnen ein neues Fenster gezeigt, in dem Sie ihre Links bequem verwalten können.', 10, 55, 580, 100)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

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

    GUISetState(@SW_SHOW)

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

    $frmVw = GUICreate("Suchmaschinen Optimierer - Link Verwaltung", 600, 400)
    GUISetBkColor(0xd19b07)
    GUISetFont(14, 400, 0, "Comic Sans MS")
    GUICtrlCreateLabel("Link Verwaltung", 210, 5, 200, 35)
    GUICtrlSetFont(-1, 18, 400, 0, "Comic Sans MS")
    $list = GUICtrlCreateList("", 10, 40, 580, 250)
    GUICtrlSetFont(-1, 14, 400, 0, "Arial")
    $picSaveVw = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 25, 340, 250, 50)
    $lblSaveVw = GUICtrlCreateLabel("Speichern", 90, 350, 120, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")
    $picInsertVw = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 25, 285, 250, 50)
    $lblInsertVw = GUICtrlCreateLabel("Link hinzufügen", 55, 295, 200, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")
    $picDeleteVw = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 325, 285, 250, 50)
    $lblDeleteVw = GUICtrlCreateLabel("Link entfernen", 360, 295, 200, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")
    $picCancelVw = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 325, 340, 250, 50)
    $lblCancelVw = GUICtrlCreateLabel("Abbrechen", 385, 350, 125, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")
    _Read_LinksFile() ;<===================
    GUISetState(@SW_HIDE)

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

    $frmIns = GUICreate("Suchmashienen Optimierer - Link hinzufügen", 400, 200)
    GUISetFont(14, 400, 0, "Comic Sans MS")
    GUISetBkColor(0xd19b07)
    GUICtrlCreateLabel("Bitte geben Sie den neuen Link an.", 50, 20, 300, 35)
    GUICtrlCreateLabel("Link:", 15, 60, 50, 20)
    $inpUrl = GUICtrlCreateInput("", 80, 57, 250, 24)
    GUICtrlSetFont(-1, 10, 400, 0, "")
    $picOkIns = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 25, 100, 165, 50)
    $lblOkIns = GUICtrlCreateLabel("Bestätigen", 40, 110, 135, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")
    $picCancelIns = GUICtrlCreatePic(@ScriptDir & "\sdk\bk_button.jpg", 210, 100, 165, 50)
    $lblCancelIns = GUICtrlCreateLabel("Abbrechen", 230, 110, 135, 45)
    GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
    GUICtrlSetFont(-1, 20, 400, 0, "MV Boli")

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

    GUISetState(@SW_HIDE)

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

    While 1
    $msg = GUIGetMsg(1)
    Switch $msg[1]
    Case $frmMain
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE, $picStartMain, $lblExitMain, $mnuExit
    Exit
    Case $picStartMain, $lblStartMain, $mnuStart
    MsgBox(0, "Test", "TestText")
    Case $mnuVw_links
    _Read_LinksFile() ;<=============== wäre meine Erachtens nach sinnvoll
    GUISetState(@SW_SHOW, $frmVw)
    EndSwitch
    Case $frmVw
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE, $picCancelVw, $lblCancelVw
    GUISetState(@SW_HIDE, $frmVw) ;<==================
    Case $picDeleteVw, $lblDeleteVw
    If GUICtrlRead($list) <> "" Then
    $realy_delete = MsgBox(260, "Suchmashinen Optimierer - Link Verwaltung", 'Möchten Sie den Link: "' & GUICtrlRead($list) & '" wirklich aus der Liste entfernen?')
    If $realy_delete = 6 Then
    _ArrayDeleteInhalt($aRecords, GUICtrlRead($list))
    EndIf
    Else
    MsgBox(0, "Suchmashinen Optimierer - Link Verwaltung", "Fehler - Bitte wählen Sie einen Link in der oberigen Liste aus.")
    EndIf
    GUICtrlSetData($list, "")
    If $aRecords <> "" Then
    For $y = 1 To UBound($aRecords) - 1
    GUICtrlSetData($list, $aRecords[$y])
    Next
    EndIf
    Case $picSaveVw, $lblSaveVw
    FileDelete(@ScriptDir & "\data\links.txt")
    FileWrite(@ScriptDir & "\data\links.txt", "")
    If $aRecords <> "" Then
    For $y = 1 To UBound($aRecords) - 1
    FileWriteLine(@ScriptDir & "\data\links.txt", $aRecords[$y])
    Next
    EndIf
    GUISetState(@SW_HIDE, $frmVw)
    Case $picInsertVw, $lblInsertVw
    GUISetState(@SW_SHOW, $frmIns)
    EndSwitch
    Case $frmIns
    Switch $msg[0]
    Case $GUI_EVENT_CLOSE, $picCancelIns, $lblCancelIns
    GUISetState(@SW_HIDE, $frmIns) ;<============
    Case $picOkIns, $lblOkIns
    _ArrayAdd($aRecords, GUICtrlRead($inpUrl))
    GUICtrlSetData($list, "")
    If $aRecords <> "" Then
    For $y = 1 To UBound($aRecords) - 1
    GUICtrlSetData($list, $aRecords[$y])
    Next
    EndIf
    GUISetState(@SW_HIDE, $frmIns)
    EndSwitch
    EndSwitch
    WEnd

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

    Func _Read_LinksFile();<==================================
    _FileReadToArray(@ScriptDir & "\data\links.txt", $aRecords)
    If $aRecords <> "" Then
    For $x = 1 To $aRecords[0]
    GUICtrlSetData($list, $aRecords[$x])
    Next
    EndIf
    EndFunc ;==>_Read_LinksFile

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

    Func _ArrayDeleteInhalt(ByRef $array, $inhalt)
    For $i = UBound($array) - 1 To 0 Step -1
    If $array[$i] = $inhalt Then _ArrayDelete($array, $i)
    Next
    EndFunc ;==>_ArrayDeleteInhalt

    [/autoit]

    die wichtigsten Änderungen sind mit ;<========== gekennzeichnet, desweiteren habe ich den Variablen in einer SearchAndReplace-Session mir angenehmere Namen gegeben,

    PS.: kannst du bitte die Bilder zu den PIC-Controls einstellen
    mfg autoBert

  • Stoppuhr im hundertstel bereich

    • autoBert
    • 15. November 2010 um 14:10

    @Großvater,

    ich habe es extra getestet, da ich auch erwartet hatte nicht unter 10 ms zu kommen, hier die Konsolenausgabe dazu:

    Spoiler anzeigen
    Code
    00:00:00.00
    00:00:00.00
    00:00:00.01
    00:00:00.01
    00:00:00.01
    00:00:00.01
    00:00:00.01
    00:00:00.02
    00:00:00.02
    00:00:00.02
    00:00:00.02
    00:00:00.03
    00:00:00.03
    00:00:00.03
    00:00:00.03
    00:00:00.03
    00:00:00.04
    00:00:00.04
    00:00:00.04
    00:00:00.04
    00:00:00.04
    00:00:00.05
    00:00:00.05
    00:00:00.05
    00:00:00.06
    00:00:00.06
    00:00:00.06
    00:00:00.06
    00:00:00.07
    00:00:00.07
    00:00:00.07
    00:00:00.08
    00:00:00.08
    00:00:00.08
    00:00:00.09
    00:00:00.09
    00:00:00.09
    00:00:00.10
    00:00:00.10
    00:00:00.10
    00:00:00.11
    00:00:00.11
    00:00:00.11
    00:00:00.11
    00:00:00.11
    00:00:00.12
    00:00:00.12
    00:00:00.12
    00:00:00.12
    00:00:00.12
    00:00:00.13
    00:00:00.13
    00:00:00.13
    00:00:00.13
    00:00:00.13
    00:00:00.14
    00:00:00.14
    00:00:00.14
    00:00:00.14
    00:00:00.14
    00:00:00.15
    00:00:00.15
    00:00:00.15
    00:00:00.15
    00:00:00.16
    00:00:00.16
    00:00:00.16
    00:00:00.16
    00:00:00.16
    00:00:00.17
    00:00:00.17
    00:00:00.17
    00:00:00.17
    00:00:00.18
    00:00:00.18
    00:00:00.18
    00:00:00.18
    00:00:00.18
    00:00:00.19
    00:00:00.19
    00:00:00.19
    00:00:00.19
    00:00:00.19
    00:00:00.20
    00:00:00.20
    00:00:00.20
    00:00:00.21
    00:00:00.22
    00:00:00.22
    00:00:00.22
    00:00:00.23
    00:00:00.23
    00:00:00.23
    00:00:00.23
    00:00:00.24
    00:00:00.24
    00:00:00.24
    00:00:00.24
    00:00:00.25
    00:00:00.25
    00:00:00.25
    00:00:00.25
    00:00:00.25
    00:00:00.26
    00:00:00.26
    00:00:00.26
    00:00:00.26
    00:00:00.27
    00:00:00.27
    00:00:00.27
    00:00:00.27
    00:00:00.27
    00:00:00.28
    00:00:00.28
    00:00:00.28
    00:00:00.28
    00:00:00.28
    00:00:00.29
    00:00:00.29
    00:00:00.30
    00:00:00.30
    00:00:00.31
    00:00:00.31
    00:00:00.31
    00:00:00.31
    00:00:00.32
    00:00:00.32
    00:00:00.32
    00:00:00.32
    00:00:00.32
    00:00:00.33
    00:00:00.33
    00:00:00.33
    00:00:00.33
    00:00:00.34
    00:00:00.35
    00:00:00.35
    00:00:00.36
    00:00:00.36
    00:00:00.36
    00:00:00.37
    00:00:00.37
    00:00:00.37
    00:00:00.37
    00:00:00.37
    00:00:00.38
    00:00:00.38
    00:00:00.38
    00:00:00.38
    00:00:00.39
    00:00:00.39
    00:00:00.39
    00:00:00.39
    00:00:00.39
    00:00:00.40
    00:00:00.40
    00:00:00.40
    00:00:00.40
    00:00:00.40
    Alles anzeigen

    Skript ist weiter oben.

    mfg autoBert

  • If oder If Not - das ist hier die Frage

    • autoBert
    • 15. November 2010 um 13:56
    Zitat von m-obi

    autoBert: siehe mein Post ;)


    ja gleiches Prinzip, schon oft probiert, nur durch ExitLoop spar ich ein paar ms

    Zitat von Fr34k

    Dann nimm meine Version, welche von autoBert abgeändert wurde... Oder ist es seine Version?^^
    Kp, nimm die von autoBerts Post, dann gehts :)

    deine Version kann nicht laufen da EXIT

    Zitat von i2c

    Ich dachte mehr in diese Richtung

    ideale Lösung, da nochmals ein paar ms eingespart werden.

    noch eine Lösung:

    Spoiler anzeigen
    [autoit]

    Global $sUser = EnvGet("Username")
    MsgBox($sUser)
    Global $pfad = "G:\Installationen\Installationen.exe"
    Global $abenutzername[3] = ["autoBert", "i2c", "m-obi"]

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

    _ArraySearch($abenutzername, $sUser)
    If @error Then
    MsgBox(0, "angemeldet als " & $sUser, "Sie sind zur Installation nich berechtigt!")
    Exit
    EndIf

    [/autoit]

    hier wird keine TXT-Datei verwendet, der User hat sich ja der Windowsanmeldung unterzogen,

    mfg autoBert

  • Variable in netsh cmdline

    • autoBert
    • 15. November 2010 um 13:23

    Dann muss das Skript so aussehen:

    Spoiler anzeigen
    [autoit]

    ;...
    $Input1 = GUICtrlCreateInput("", 136, 96, 169, 21)
    $Input2 = GUICtrlCreateInput("", 136, 128, 169, 21)
    ;...

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

    $sCom =@ComSpec & " /c netsh firewall add portopening TCP " & GUICtrlRead($Input1) & " " & GUICtrlRead($Input2)
    RunWait($sCom, @SystemDir, @SW_HIDE)
    ConsoleWrite($sCom & @CRLF);zur Syntax-Kontrolle

    [/autoit]

    mfg autoBert

  • Autoit Script um gleiche abläufe zu Optimieren

    • autoBert
    • 15. November 2010 um 13:15
    Zitat von CodeBase

    Hallo

    erstmal danke für die Antwort. Ich habe mal gelesen das man Variablen aus dem Speicher lesen kann stimmt das ?

    Stimmt prinzipiell, wird hier aber nicht gerne supportet > 90% zu Spiele-Bots verwendet. Wenn du die Software selbst schreibst, ist es doch kein Problem über TXT, INI, Registry oder direkt in der DB die Rückgaben zu hinterlegen. Schaffst du es denn mit BATch-Dateien die Errorlevel deiner Tools abzufragen, dann kannst du auch runwait, shellexecutewait nehmen
    Du solltest also etwas mehr Angaben zu deinem Projekt machen, dann findet sich sicher eine Lösung.

    mfg autoBert

  • Variable in netsh cmdline

    • autoBert
    • 15. November 2010 um 13:02

    Hallo Hikonia,

    so sollte es klappen:

    [autoit]

    $sCom =@ComSpec & " /c netsh firewall add portopening TCP " & $Variable1 & " " & $Variable2
    RunWait($sCom, @SystemDir, @SW_HIDE)
    ConsoleWrite($sCom & @CRLF); zur Kontrolle

    [/autoit]

    Anhand der Consoleausgabe kannst du überprüfen ob die Syntax richtig ist

    mfg autoBert

  • Mehrere Sounds gleichzeitig abspielen

    • autoBert
    • 15. November 2010 um 12:54

    Hallo cloncker,

    du kannst in einer mit AdlibRegister regsitrierten Func mit _SoundPos und _SoundLength prüfen ob das Lied zu Ende ist und wenn ja dann halt neu starten,

    mfg autoBert

  • If oder If Not - das ist hier die Frage

    • autoBert
    • 15. November 2010 um 12:48

    nimm stattdessen ExitLoop und eine Bool

    Spoiler anzeigen
    [autoit]

    Local $tmp = @ScriptDir & "\tmp.txt"
    Local $atmp
    _FileReadToArray($tmp, $atmp)
    Global $pfad = "G:\Installationen\Installationen.exe"
    Global $abenutzername[4] = ["Benutzer1", "Benutzer2", "Benutzer3", "Benutzer4"], $bAllowed = False

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

    For $e = 1 To Ubound($atmp) - 1
    For $r = 0 To Ubound($abenutzername) - 1
    If $abenutzername[$r] = $atmp[$e] Then
    $bAllowed = True
    ExitLoop
    EndIf
    Next
    Next

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

    if not $bAllowed then
    MsgBox(0, "", "Sie sind zur Installation nicht berechtigt!")
    exit
    EndIf

    [/autoit]

    mfg AutoBert

  • Datei in Exe importieren

    • autoBert
    • 15. November 2010 um 12:32
    Zitat von Striscia

    Greenhorn:
    Thx aber mit Fileinstall klappt das nicht.
    Es kommt immer eine Fehlermeldung dass die Datei nicht gefunden wird...


    Dann hast du FileInstall falsch angewendet!

    Zitat von Striscia

    @ XP-User:
    Deine Methode probier ich seit ner stunde aus, will nicht hinhauen xD
    Ich melde mich sobald ich es hab xD


    Edit:
    Die Datei wird zwar exportiert, aber nicht gleich geöffnet.
    und ich hätte eben dass er die Datei gleich öffnet.

    im Anhang das ergänzte Skript (Passwortabfrage musst du noch einbauen) zum Umwandeln deiner MP3-Datei lies dir ;Fremddateien "includen" (ohne FileInstall) von BugFix durch,


    mfg autoBert

    Dateien

    TestMp3Inline.au3 121,69 kB – 225 Downloads
  • GetSelectedIndices -> controlid

    • autoBert
    • 15. November 2010 um 03:39

    Hallo Raupi ,

    Zitat von Raupi

    Beim erstellen von Einträgen mit _GUICtrlListView_AddItem wird sowieso kein Controlid erzeugt, die Rückgabe ist der Indexeintrag.

    dies habe ich leider nicht in der Hilfe nachgeschlagen, dadurch ist das obige Skript für den Papierkorb da ich von der ControlID als Rückgabe ausging.

    Hier eine geänderte Version, die Einträge erzeuge ich jetzt mit GUICtrlCreateListViewItem:

    [spoiler][autoit];#AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #include <GuiConstantsEx.au3>
    #include <GuiListView.au3>
    #include <Array.au3>

    Opt('MustDeclareVars', 1)

    $Debug_LV = False ; Check ClassName being passed to ListView functions, set to True and use a handle to another control to see it work

    _Main()

    Func _Main()
    Local $hListView, $aRes, $lvItems[10], $aRes2[1][2], $msg

    GUICreate("ListView Get Selected Indices", 400, 300)
    $hListView = GUICtrlCreateListView("", 2, 2, 394, 268, BitOR($LVS_SHOWSELALWAYS, $LVS_REPORT))
    GUISetState()
    ; Add columns
    _GUICtrlListView_AddColumn($hListView, "Column 1", 100)

    ; Add items
    For $i = 0 To 9
    $lvItems[$i] = GUICtrlCreateListViewItem("Item " & $i,$hListView)
    If Random(0, 1, 1) = 1 Then
    _GUICtrlListView_SetItemSelected($hListView, $i) ; Select this item
    ConsoleWrite("ControlId: " & $lvItems[$i] & " ist selktiert!" & @CRLF)
    Else
    ;Item is not selected
    EndIf
    Next
    $aRes = _GUICtrlListView_GetSelectedIndices($hListView, True)
    Local $j = $aRes[0], $s1, $s2
    ReDim $aRes2[$j + 1][2]
    For $i = 1 To UBound($aRes) - 1
    $s1 = _GUICtrlListView_GetItemText($hListView, $aRes[$i])
    For $j = 0 To 9
    $s2 = _GUICtrlListView_GetItemText($hListView, $j)
    If $s1 = $s2 Then
    $aRes2[$i][0] = $i
    $aRes2[$i][1] = $j+$lvItems[0]
    EndIf
    Next
    Next
    $aRes2[0][0] = "Index"
    $aRes2[0][1] = "Control-ID"
    _ArrayDisplay($aRes2)
    ; Loop until user exits
    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    GUIDelete()
    EndFunc ;==>_Main
    [autoit][spoiler]anhand der Kontrolausgabe der IDs in der Konsole siehst du dass diese mit dem ArrayDisplay übereinstimmen. Mir fällt aber auch kein Grund ein die ControlID eines LV-Items zu ermitteln ein, da alle mir bekannten Funktionen zu LV-Items mit dem Index arbeiten,

    mfg autoBert

  • GetSelectedIndices -> controlid

    • autoBert
    • 15. November 2010 um 01:26

    Hallo DankeSchön,

    hier eine Methode um über den Index an die ID zu kommen:

    Spoiler anzeigen

    Skript entfernt neue Version siehe [ offen ] GetSelectedIndices -> controlid

    diese Methode funktioniert aber leider nur wenn der Text des Items eindeutig ist. Aber wie Raupi schon schrieb ist die ID unnötig, da alle _GUICtrlListView_ Funktionen die LV-Items betreffen auf dem Index aufbauen,

    mfg autoBert

  • Fenster im Vordergrund, vor anderen GUIs

    • autoBert
    • 14. November 2010 um 23:02

    Hallo MidStarter,

    ich erstelle meine GUIs so, [list][*]Main

    [autoit]

    $idfrmMain = GUICreate($sProgTitel & $sProgVer, $iWidht, $iHeight, IniRead($sLiz, "Pos", "x", "20"), IniRead($sLiz, "Pos", "y", "20"))

    [/autoit]

    [*]Child

    [autoit]

    $idfrmInit = GUICreate($sProgTitel & " Einstellungen", 300, 275, -1, -1, BitOR($DS_MODALFRAME, $DS_SETFOREGROUND, $WS_SYSMENU), $WS_EX_TOOLWINDOW, $idfrmMain)

    [/autoit]

    desweiteren deaktiviere ich noch die MainGUI mit

    [autoit]

    GUISetState(@SW_DISABLE, $idfrmMain)

    [/autoit]

    aber was hat das ganze mit Datenbanken zu tun?

    mfg autoBert

  • function soll immer wiederhol werden bis benutzerabbruch

    • autoBert
    • 14. November 2010 um 21:46

    Hallo rewejo,

    einfach in der func loesung das exit weglassen und in der while-Schleife hinter loesung aufgabe() einfügen,

    @stayawaknight & developer30: er möchte einen Mathetrainer für skripten. Oscar hat einen Mathe-Trainer (Grundrechenarten) gemacht, rewejo ist in der Schule aber schon etwas weiter

    mfg autoBert

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™