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

  • Oscar hat Geburtstag.

    • autoBert
    • 18. Januar 2010 um 02:35

    Happy Birthday Oscar,

    herzlichen Glückwunsch zu deinem 43. . Es ist mir ein ganz besonderes Anliegen dir zur gratulieren, denn ohne dich hätte ich vielleicht den Weg zu AutoIt verpasst :!: Also alles Gute vor allem Gesundheit wünscht dir

    mfg (Auto)Bert

  • KopfrechenTrainer v.0.2

    • autoBert
    • 18. Januar 2010 um 01:49

    Hallo,

    Zitat von nof@ker2

    Meine Statistik :

    du solltest das No aus deinem Namen streichen :!:

    Zitat von xp_fan

    Sehr schön :thumbup: !
    Warum benutzt Du keine Radiobuttons für die Auswahl der Rechenart?

    vielleicht kommt ja noch eine Version bei der man mehrere Rechenarten auswählen kann und diese dann per Zufall ausgewählt wird :?:

    mfg (Auto)Bert

  • Listview - KeyUP & KeyDown abfangen und die Markierung verschieben

    • autoBert
    • 18. Januar 2010 um 01:23

    HGallo nuts,

    Zitat von nuts

    Mal ein Schubs nach oben. ^^

    naja nach fst einem Tag darf man das.
    Ich habe veschiedenes ausprobiert leider ohne Erfolg, mir kommt es so vor als wenn die Taste 2* abgefeuert würde,

    mfg (Autro)Bert

  • Processclose Problem

    • autoBert
    • 18. Januar 2010 um 01:17

    Hallo EmEx,

    kann keinen Unterscgied der beiden Skripts feststellen -> Lösung?
    Klinke mich aber aus, da ich keinerlei Erfarung in diesen Speilen habe

    mfg (Auto)Bert

  • Processclose Problem

    • autoBert
    • 18. Januar 2010 um 00:38

    Hallo EmE,

    Zitat von EmEx

    jo ok hab das processwaitclose mit processclose ausgetauscht klappt gut und is viel kürzer.
    ABER, das große aber 4-Client.exe bleibt immer noch gestartet das will er einfach net beenden.
    Es steht auch nichts anderes im script drinn als bei den anderen, also 1-Client.exe und so weiter.

    dann bleibt dir wohl nichst anderes übrig als den Source von 4-Client.au3 zu posten.
    Oder verwendest du darin vielleicht Msg-,InputBox oder ähnliches dann siehe

    mfg (Auto)Bert

  • Entfernte Funktionen?!

    • autoBert
    • 17. Januar 2010 um 23:59

    Hallo

    Zitat von LilProgger208

    Warum werden so plötzlich funktionen entfernt? Noch dazu alle samt welche, die ich in manchen meiner Skripte nutze?!

    du musst ja nicht auf > 3.3.3.0 updaten, dann entgehen dir aber die Vorteile der neuen Version. Bei InetGet können jetzt z.B. mehrere Downloads gleichzeitig im Hintergrund laufen, mehrere AdLibs sind jetzt auch gleichzeitig möglich. Als wenn du die Vorteile nutzen willst solltest du deine Skripts anpassen (geht sehr schnell, für AdLibEn-/disable kannst du sogar Search | Replace verwenden -> fertig und läuft danach)

    mfg (Auto)Bert

  • Software Pack mit Auswahloption versehen

    • autoBert
    • 17. Januar 2010 um 23:44

    Hallo Schwaidler

    in einer switch-case Abfrage wird automatisch nach dem 1. gefundenem case (Ausnahme nach ContinueCase, aber das kannst dur dir später einmal anschauen) abgebrochen dein Source musst du lso folgendermassen ändern:

    [autoit]


    .
    .
    Case $Button1
    If BitAND(GUICtrlRead($Checkbox5), $GUI_CHECKED) = $GUI_CHECKED Then
    SplashTextOn("Installation", "Entferne Werbung aus ICQ...", 250, 100, -1, 25, 49)
    #include <source\icqbannerremover.au3>
    SplashOff()
    EndIf
    If BitAND(GUICtrlRead($Checkbox9), $GUI_CHECKED) = $GUI_CHECKED Then
    SplashTextOn("Installation", "Installiere Skype", 250, 100, -1, 25, 49)
    #include <source\skype.au3>
    SplashOff()
    EndIf
    .
    .

    [/autoit]


    @ideas2code,

    Zitat von ideas2code

    Was macht der User wenn er mehrere Programme installieren möchte? Das Skript nach jeder Installation neu starten?[/quote möchte er ja gerade nicht

    warum verstecken, ich würde mir den Fortschritt z.B.mit Label und Progress auf Gui anzeigen lassen und dafür SplashTexte weglassen (aber das ist Geschmackssache)

    [quote='ideas2code',index.php?page=Thread&postID=132980#post132980]Dateien inkludiert man am Anfang eines Skripts. Es ist auch nicht unbedingt well formed, die skype.au3 direkt auszuführen. Ruf lieber die Funktion der .au3 auf,.

    üblicherweise wird es so gemacht, ist aber nicht verboten und die skype.au3 enthälz warscheins nur ein AutoItSkript ohne Aufruf, also was solls?

    mfg (Auto)Bert

  • Software Pack mit Auswahloption versehen

    • autoBert
    • 17. Januar 2010 um 21:44

    Hallo Waidler,

    herzlich willkommen im Forum. Am besten liest/arbeitest du dir die Kapitel:

    • GUI-Referenz - GUI_Konzepte
    • GUI Controlerstellung Funktionsreferenz, hier natürlich besonders GUICtrlCreateCheckbox und GUICtrlCreateButton
    • GUI Control Management Funktionsreferenz, hier besonders GuiCtrlRead und GuiCrlSeData

    durch.
    auch das lesen anderer Post (SuFu oder Google benutzen) kann sehr hilfreich sein.

    Viel Spass mit AutoIt wünscht mfg (Auto)Bert

    edit: sehe gerad deinen neuen Post, hier ein Demo-Skript im MessageLoop-Modus:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 553, 165, 236, 264)
    $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 352, 48, 97, 17)
    $Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 352, 72, 97, 17)
    $Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 352, 96, 97, 17)
    $Button1 = GUICtrlCreateButton("Button1", 352, 120, 75, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Button2", 432, 120, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox1 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox1 ", "ist nicht angeCHECKED")
    EndIf

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

    If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox2 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox2 ", "ist nicht angeCHECKED")
    EndIf
    If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox3 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox3 ", "ist nicht angeCHECKED")
    EndIf

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

    EndSwitch
    WEnd

    [/autoit]

    Edit2: und hier das ganze im OnEvent-Modus:

    Spoiler anzeigen
    [autoit]

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

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

    Opt('MustDeclareVars', 1)
    Opt("GUIOnEventMode", 1)

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

    #Region ### START Koda GUI section ### Form=
    Global $Form1 = GUICreate("Form1", 553, 165, 236, 264)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
    Global $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 352, 48, 97, 17)
    Global $Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 352, 72, 97, 17)
    Global $Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 352, 96, 97, 17)
    Global $Button1 = GUICtrlCreateButton("Button1", 352, 120, 75, 25, $WS_GROUP)
    GUICtrlSetOnEvent(-1, "_Check")
    Global $Button2 = GUICtrlCreateButton("Be&enden", 432, 120, 75, 25, $WS_GROUP)
    GUICtrlSetOnEvent(-1, "_Exit")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1 ;idle-looop damit das Programm nicht sofort beendet wird

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

    Sleep(1000)
    WEnd

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

    Func _Exit()
    Exit
    EndFunc ;==>_Exit

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

    Func _Check()
    If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox1 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox1 ", "ist nicht angeCHECKED")
    EndIf

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

    If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox2 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox2 ", "ist nicht angeCHECKED")
    EndIf
    If BitAND(GUICtrlRead($Checkbox3), $GUI_CHECKED) = $GUI_CHECKED Then
    MsgBox(0, "Checkbox3 ", "ist angeCHECKED")
    Else
    MsgBox(0, "Checkbox3 ", "ist nicht angeCHECKED")
    EndIf
    EndFunc ;==>_Check

    [/autoit]
  • Google Suchergebniss auslesen bzw. speichern

    • autoBert
    • 17. Januar 2010 um 20:09

    Hallo Bladerunner85,

    lies dir die Hilfe InetGet durch und such mal hier nach Ergo von Andy, dieses Skript könne dir auch weiterhelfen,

    mfg (Auo)Bert

  • TCPListen() - Verbindung von jeder IP??

    • autoBert
    • 17. Januar 2010 um 18:54

    Hallo

    Zitat von ChrisEU

    Aber ich möchte, dass die IP-Addresse egal ist, d.h. dass von jeder IP-Adresse eine Verbindung kommen kann und ich sie vorher nichtfestlegen muss.

    wieviele eigene Ip-Adressen hast du den?

    mfg (Auo)Bert

  • Script wirft Probleme mit MessageLoop und mit OnEvent Modus auf

    • autoBert
    • 17. Januar 2010 um 18:13

    Hallo Karill Endusa,

    du müsstest die CursorInfo noch mit _GUICtrlTreeView_HitTest weiter auswerten und die dadurch gewonnene ID des TREEviewItems zwischenspeichern. Wie man _GUICtrlTreeView_HitTest einsetzen kann siehst du in _GUICtrlTreeView_CreateDirectory ... von Oscar , der Windowsstandard zum bedienen ist allerdins erst das ewünschte selektieren und danach (z.B. Rechtsklick oder Buttonklick) auswerten, Oscar hält sich auch daran der Link ist nur dazu gedacht damit du HitTest anhand eines Beispiels nachvollziehen kannst.
    Ich habe auch mein Beispiel nocheinmal etwas verändert, vielleicht bringt dich das ja auf eine Idee wie du es dir einfacher machen kannst:

    Spoiler anzeigen
    [autoit]

    #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #include <GuiConstantsEx.au3>
    #include <GuiTreeView.au3>
    #include <GuiImageList.au3>
    #include <WindowsConstants.au3>

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

    Opt('MustDeclareVars', 1)
    Opt("GUIOnEventMode", 1)

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

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

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

    Global $hGui, $hImage, $hStateImage, $hTreeView, $hbtnInfo, $iItemIndex = -99, $iItemIndexOld = 0

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

    main()
    Func main()

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

    Local $hItem[10], $hChildItem[30], $iYItem = 0
    Local $iStyle = BitOR($TVS_TRACKSELECT, $TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES)

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

    GUICreate("TreeView Get Text", 400, 350)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
    GUISetOnEvent($GUI_EVENT_SECONDARYDOWN, "_RightClick")

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

    $hTreeView = GUICtrlCreateTreeView(2, 2, 396, 268, $iStyle, $WS_EX_CLIENTEDGE)
    $hbtnInfo = GUICtrlCreateButton("&Aktuelles Item?", 2, 320, 100, 25)
    GUICtrlSetOnEvent(-1, "_Info")
    ;_GUICtrlTreeView_SetUnicodeFormat($hTreeView, False)
    GUISetState()

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

    _CreateNormalImageList()
    _GUICtrlTreeView_SetNormalImageList($hTreeView, $hImage)

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

    _CreateStateImageList()
    _GUICtrlTreeView_SetStateImageList($hTreeView, $hStateImage)

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

    _GUICtrlTreeView_BeginUpdate($hTreeView)
    For $x = 0 To 9
    $hItem[$x] = _GUICtrlTreeView_Add($hTreeView, 0, StringFormat("[%02d] New Item", $x), 4, 5)
    _GUICtrlTreeView_SetStateImageIndex($hTreeView, $hItem[$x], 1)
    For $y = 1 To 3
    $hChildItem[$iYItem] = _GUICtrlTreeView_AddChild($hTreeView, $hItem[$x], StringFormat("[%02d] New Child from {%02d]", $y, $x), 0, 3)
    _GUICtrlTreeView_SetStateImageIndex($hTreeView, $hChildItem[$iYItem], 1)
    $iYItem += 1
    Next
    Next
    _GUICtrlTreeView_EndUpdate($hTreeView)

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

    _GUICtrlTreeView_SelectItem($hTreeView, $hItem[0])
    _GUICtrlTreeView_SetStateImageIndex($hTreeView, $hItem[0], 2)
    $iItemIndex = 0
    ; Idle-Loop
    While 1
    If $iItemIndex <> -99 Then
    $iItemIndex = _GUICtrlTreeView_GetSelection($hTreeView)
    If $iItemIndex <> $iItemIndexOld Then
    $iItemIndexOld = $iItemIndex
    MsgBox(0, "Information IDLE-LOOP", _GUICtrlTreeView_GetText($hTreeView, $iItemIndex),0,$hGui)
    EndIf
    EndIf
    Sleep(1000)
    WEnd
    EndFunc ;==>main

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

    Func _Exit()
    Exit
    EndFunc ;==>_Exit

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

    Func _RightClick()
    ;BuFix http://www.autoit.de/index.php?page…4782#post114782
    Local $cursor = GUIGetCursorInfo($hGui)
    ConsoleWrite('Rechtsklick auf Control' & @LF & 'ID: ' & $cursor[4] & @LF & _
    'Text: ' & ControlGetText($hGui, '', $cursor[4]) & $hTreeView & @CRLF)
    MsgBox(0, "Information Rechtsklick", _GUICtrlTreeView_GetText($hTreeView, $iItemIndex),0,$hGui)
    EndFunc

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

    Func _Info()
    ; Local $iItemIndex
    $iItemIndex = _GUICtrlTreeView_GetSelection($hTreeView)
    ConsoleWrite($iItemIndex & @CRLF)
    MsgBox(0, "Information Button", _GUICtrlTreeView_GetText($hTreeView, $iItemIndex),0,$hGui)
    EndFunc ;==>_Info

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

    Func _CreateNormalImageList()
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 165)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 168)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 146)
    EndFunc ;==>_CreateNormalImageList

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

    Func _CreateStateImageList()
    $hStateImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hStateImage, "shell32.dll", 3)
    _GUIImageList_AddIcon($hStateImage, "shell32.dll", 4)
    EndFunc ;==>_CreateStateImageList

    [/autoit]

    PS.: wenn "G's" fehlen nicht wundern, muss meine Tastatur reinigen
    mfg (Auto)Bert

  • Problem mit der Monitoranordnung nach Auflösungsänderung

    • autoBert
    • 17. Januar 2010 um 04:50

    Hallo Jescho,

    Zitat von Jescho

    Bis jetzt bin ich soweit, dass er die Aüflösung ändert,

    ja dank der func von psandu.ro, PartyPooper und den Modifications von bobchernow

    Zitat von Jescho

    Ich habe mal zwei Bilder sowie meinen bisherigen Code zum Verständniss angefühgt.

    Bilder fehlen :!:

    Zitat von Jescho

    Ich denke mal das mann die Position der Monitore auch übergeben kann, aber wo?.

    versuch doch einfach die Daten des darzustellenden Ausschnitts des virtuellen Gesamtdesktops einzusetzen anstelle der absoluten Daten der Monitore,mehr als ein Neustart kann ja nicht passieren. Auch solltest du mit @error prüfen ob die Aufrufe der func erfolreich waren.
    Oder benutze einfach einmal die SuFu Oscar hat soetwas schon einmal gepostet.

    mfg (Auto)Bert

  • ComboBox und ScrollBars mit $CBS_DROPDOWNLIST?

    • autoBert
    • 17. Januar 2010 um 03:38

    Hallo Deepred92,

    nimm den Style $WS_VSCROLL mit dazu,

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <ComboConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <GUIComboBox.au3>
    #include <GUIComboBoxEx.au3>

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

    Global $ZweiteKombination = "A|B|C|D|E|F|G|H|I|J|K|L|M|N|O|P|Q|R|S|T|U|V|W|X|Y|Z|0|1|2|3|4|5|6|7|8|9|+|-|F1|F2|F3|F4|F5|F6|F7|F8|F9|F10|F11|F12"

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

    $Form1 = GUICreate("Hotkey", 400, 200)

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

    $Combo6 = GUICtrlCreateCombo("", 100, 104, 100, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL,$WS_VSCROLL))
    GUICtrlSetData(-1, $ZweiteKombination, "A")
    _GUICtrlComboBox_SetMinVisible($Combo6, 20)

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

    GUISetState(@SW_SHOW)

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

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

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

    EndSwitch
    WEnd

    [/autoit]

    mfg (Auto)Bert

    mfg (Auto)Bert

  • Script wirft Probleme mit MessageLoop und mit OnEvent Modus auf

    • autoBert
    • 17. Januar 2010 um 00:36

    Halo Karill Endusa,

    schau dir diesen Thread Rechtsklick auf Controls auswerten an,

    mfg (Auto)Bert

  • Script wirft Probleme mit MessageLoop und mit OnEvent Modus auf

    • autoBert
    • 16. Januar 2010 um 23:40
    Zitat von Karill Endusa
    [autoit]

    $M_datei = GUICtrlCreateMenu("Datei")
    $MI_beenden = GUICtrlCreateMenuItem("Beenden", $M_datei)
    GUISetOnEvent($MI_beenden, "fClose")

    [/autoit]


    Verwende statt GUISetOnEvent GUICtrlSetOnEvent und es klappt,

    mfg (Auto)Bert

  • Zeile in Edit löschen

    • autoBert
    • 16. Januar 2010 um 22:23

    Hallo sc4ry,

    nach GuiCtrlSetData kann man meines Wissens nach kein _GUICtrlEdit_Undo mehr benutzen, _GUICtrlEdit_SetText sollte aber funktionierenfunktioniert auch nicht (siehe),

    mfg (Auto)Bert

  • Problem

    • autoBert
    • 16. Januar 2010 um 22:07

    Hallo oOBecksOo,

    herzlich willkommen im Forum.

    Zitat

    Ich hab die Hilfedatei vor mir aber komme nicht weiter :s gibt es die auch in Deutsch?


    ja hier
    du solltest dich allerdins mit etwas nützlicherem beschäftigen als zu spamen also Hinweis von Cartan12 beachten und hier der absolute Link für SPAMMER


    mfg (Auto)Bert

  • Script wirft Probleme mit MessageLoop und mit OnEvent Modus auf

    • autoBert
    • 16. Januar 2010 um 21:58

    Hallo nuts,

    ja, da er anscheinend meinen damaligen Link nicht gelesen hat,habe ich ihm das Skriptbeispiel mit _GUICtrlTreeView_GetSelection diesmal direkt gepostet,

    @Karill Endusa, _GUICtrlTreeView_GetSelection funktioniert auch im OnEvent-Modus

    mfg (Auto)Bert

  • Script wirft Probleme mit MessageLoop und mit OnEvent Modus auf

    • autoBert
    • 16. Januar 2010 um 21:43

    Hallo Karill Endusa,

    hier mal ein Beispiel zu _GUICtrlTreeView_GetSelection (auf Button klicken):

    Spoiler anzeigen
    [autoit]

    #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #include <GuiConstantsEx.au3>
    #include <GuiTreeView.au3>
    #include <GuiImageList.au3>
    #include <WindowsConstants.au3>

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

    Opt('MustDeclareVars', 1)

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

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

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

    Global $hImage, $hStateImage

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

    _Main()
    exit

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

    Func _Main()

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

    Local $hItem[10], $hChildItem[30], $iYItem = 0, $iRand, $hTreeView, $hbtnInfo, $iItemIndex, $msg
    Local $iStyle = BitOR($TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES)

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

    GUICreate("TreeView Get Text", 400, 350)

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

    $hTreeView = GUICtrlCreateTreeView(2, 2, 396, 268, $iStyle, $WS_EX_CLIENTEDGE)
    $hbtnInfo = GUICtrlCreateButton("&Aktuelles Item?",2,320,100,25)
    ;_GUICtrlTreeView_SetUnicodeFormat($hTreeView, False)
    GUISetState()

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

    _CreateNormalImageList()
    _GUICtrlTreeView_SetNormalImageList($hTreeView, $hImage)

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

    _CreateStateImageList()
    _GUICtrlTreeView_SetStateImageList($hTreeView, $hStateImage)

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

    _GUICtrlTreeView_BeginUpdate($hTreeView)
    For $x = 0 To 9
    $hItem[$x] = _GUICtrlTreeView_Add($hTreeView, 0, StringFormat("[%02d] New Item", $x), 4, 5)
    ;_GUICtrlTreeView_SetStateImageIndex($hTreeView, $hItem[$x], 1)
    For $y = 1 To 3
    $hChildItem[$iYItem] = _GUICtrlTreeView_AddChild($hTreeView, $hItem[$x], StringFormat("[%02d] New Child from {%02d]", $y, $x), 0, 3)
    ;_GUICtrlTreeView_SetStateImageIndex($hTreeView, $hChildItem[$iYItem], 1)
    $iYItem += 1
    Next
    Next
    _GUICtrlTreeView_EndUpdate($hTreeView)

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

    _GUICtrlTreeView_SelectItem($hTreeView, $hItem[0])
    ;_GUICtrlTreeView_SetStateImageIndex($hTreeView, $hItem[0], 2)

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

    $iRand = Random(0, 9, 1)
    MsgBox(4160, "Information", StringFormat("Text for Item %d: %s", $iRand, _GUICtrlTreeView_GetText($hTreeView, $hItem[$iRand])))

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

    ; Loop until user exits
    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE
    GUIDelete()
    Exit
    Case $hbtnInfo
    $iItemIndex = _GUICtrlTreeView_GetSelection($hTreeView)
    MsgBox(0, "Information", _GUICtrlTreeView_GetText($hTreeView, $iItemIndex))
    EndSwitch
    WEnd
    EndFunc ;==>_Main

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

    Func _CreateNormalImageList()
    $hImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 110)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 131)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 165)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 168)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 137)
    _GUIImageList_AddIcon($hImage, "shell32.dll", 146)
    EndFunc ;==>_CreateNormalImageList

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

    Func _CreateStateImageList()
    $hStateImage = _GUIImageList_Create(16, 16, 5, 3)
    _GUIImageList_AddIcon($hStateImage, "shell32.dll", 3)
    _GUIImageList_AddIcon($hStateImage, "shell32.dll", 4)
    EndFunc ;==>_CreateStateImageList

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

    ,

    mfg (Auto)Bert

  • updater

    • autoBert
    • 16. Januar 2010 um 20:33

    Hallo @Leon,

    hier mal ein Quick and Dirty Beispiel mit Progress, der sich am echten DownLoad orientiert:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <array.au3>

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

    $Form1 = GUICreate("Update ziehen", 295, 133, 193, 125)
    $Progress1 = GUICtrlCreateProgress(20, 56, 260, 17)

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

    $Label1 = GUICtrlCreateLabel("Update ...", 20, 37, 260, 17)
    GUISetState(@SW_SHOW)

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

    ;aus Hilfedatei-Beispielen zusammenkopiert Dateinamen also anpassen
    $Source = "http://www.autoitscript.com/cgi-bin/getfile.pl?autoit3/autoit-v3.3.4.0-setup.exe"
    $aFile = StringSplit($Source, "/")
    Local $dest = @TempDir & "\" & $aFile[$aFile[0]]
    ConsoleWrite($dest & @CRLF)

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

    Local $nBytes, $nSize = InetGetSize($Source)

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

    ; Advanced example - downloading in the background
    Local $hDownload = InetGet($Source, $dest, 1, 1)

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

    Do
    Sleep(1000)
    $nBytes = InetGetInfo($hDownload, 0)
    $ipercent = Floor($nBytes / $nSize * 100)
    GUICtrlSetData($Progress1, $ipercent)
    GUICtrlSetData($Label1, $nBytes & " von " & $nSize & " Bytes = " & $ipercent & "% gelesen")
    Until InetGetInfo($hDownload, 2) ; Check if the download is complete.
    Local $aData = InetGetInfo($hDownload) ; Get all information.
    InetClose($hDownload) ; Close the handle to release resourcs.
    MsgBox(0, "", "Bytes read: " & $aData[0] & @CRLF & _
    "Size: " & $aData[1] & @CRLF & _
    "Complete?: " & $aData[2] & @CRLF & _
    "Successful?: " & $aData[3] & @CRLF & _
    "@error: " & $aData[4] & @CRLF & _
    "@extended: " & $aData[5] & @CRLF)

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

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

    #cs
    ;ab hier original Leon
    If GUICtrlRead($Progress1) == 100 And FileReadLine("update.upd", 1) == FileReadLine("Version.ver", 1) Then
    InetGet("http://Website.de/updatedatei.dll/exe/etc.", "update.dll/exe/etc.")
    Else
    Run("DeineExe.exe")
    EndIf
    #ce

    [/autoit]

    mfg (Auto)Bert

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™