Beiträge von autoBert

**autoBert**

Hallo *bad boy*,

herzlich willkommen im Forum und viel Spass mit AutoIt.

Hier kannst du dir die Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

du solltest die Formatierungsmöglichkeiten des Boards nutzen und dein Skript in einem

Ich bin ein Spoiler

in autoit-TAG's setzen:

[autoit]

#include <GUIConstantsEx.au3>

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

Opt("GUIOnEventMode", 1) ; Change to OnEvent mode

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

;Fenster Titel und Größe angeben
$mainwindow = GUICreate("Test", 500, 560)

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

GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")

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

;Oberkategorien

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

;Kategorie Chat erstellen und Funktion zuweisen
$Chat = GUICtrlCreatePic("Blaue.jpg", 10, 10, 100, 100)
GUICtrlSetOnEvent($Chat, "Chat")
;Kategorie Internet erstellen und Funktion zuweisen
$Internet = GUICtrlCreatePic("Blaue.jpg", 10, 120, 100, 100)
GUICtrlSetOnEvent($Internet, "Internet")
;Kategorie Player erstellen und Funktion zuweisen
$Player = GUICtrlCreatePic("Blaue.jpg", 10, 230, 100, 100)
GUICtrlSetOnEvent($Player, "Player")
;Kategorie Spiele erstellen und Funktion zuweisen
$Spiele = GUICtrlCreatePic("Blaue.jpg", 10, 340, 100, 100)
GUICtrlSetOnEvent($Spiele, "Spiele")
;Kategorie Sonstiges erstellen und Funktion zuweisen
$Sonstiges = GUICtrlCreatePic("Blaue.jpg", 10, 450, 100, 100)
GUICtrlSetOnEvent($Sonstiges, "Sonstiges")

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

;Kategorie Chat_makiert erstellen und unsichtbar machen
$Chat_makiert = GUICtrlCreatePic("Sonne.jpg", 10, 10, 100, 100)
GUICtrlSetState($Chat_makiert, $GUI_HIDE)
;Kategorie Internet_makiert erstellen und unsichbar machen
$Internet_makiert = GUICtrlCreatePic("Sonne.jpg", 10, 120, 100, 100)
GUICtrlSetState($Internet_makiert, $GUI_HIDE)
;Kategorie Player_makiert erstellen und unsichtbar machen
$Player_makiert = GUICtrlCreatePic("Sonne.jpg", 10, 230, 100, 100)
GUICtrlSetState($Player_makiert, $GUI_HIDE)
;Kategorie Spiele_makiert erstellen und unsichtbar machen
$Spiele_makiert = GUICtrlCreatePic("Sonne.jpg", 10, 340, 100, 100)
GUICtrlSetState($Spiele_makiert, $GUI_HIDE)
;Kategorie Sonstiges_makiert erstellen und unsichtbar machen
$Sonstiges_makiert = GUICtrlCreatePic("Sonne.jpg", 10, 450, 100, 100)
GUICtrlSetState($Sonstiges_makiert, $GUI_HIDE)

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

;Unterkategorien

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

;Unterkategorie Chat
;Unterkategorie Internet
;Unterkategorie Player
;Unterkategorie Spiele
;Unterkategorie Sonstiges

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

GUISetState()

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

;Definetion der Variablen
$notthis = (0)

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

;Funktion von Chat
Func Chat()

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

;Wertangabe
$notthis = "Chat";

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

;Programm das Ausgeführt werden soll
;Run ("notepad")

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

;Macht Chat unsichtbar
GUICtrlSetState($Chat, $GUI_HIDE)
;Macht Chat_makiert sichtbar
GUICtrlSetState($Chat_makiert, $GUI_SHOW)
;Macht Internet sichtbar
GUICtrlSetState($Internet, $GUI_SHOW)
;Macht Player sichtbar
GUICtrlSetState($Player, $GUI_SHOW)
;Macht Spiele sichtbar
GUICtrlSetState($Spiele, $GUI_SHOW)
;Macht Sonstiges sichtbar
GUICtrlSetState($Sonstiges, $GUI_SHOW)

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

;Ruft die Funktion deselect auf
Call("deselect")

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

EndFunc ;==>Chat

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

;Funktion von Internet
Func Internet()

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

;Wertangabe
$notthis = "Internet";

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

;Programm das Ausgeführt werden soll
;Run ("notepad")

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

;Macht Internet unsichtbar
GUICtrlSetState($Internet, $GUI_HIDE)
;Macht Internet_makiert sichtbar
GUICtrlSetState($Internet_makiert, $GUI_SHOW)
;Macht Chat sichtbar
GUICtrlSetState($Chat, $GUI_SHOW)
;Macht Player sichtbar
GUICtrlSetState($Player, $GUI_SHOW)
;Macht Spiele sichtbar
GUICtrlSetState($Spiele, $GUI_SHOW)
;Macht Sonstiges sichtbar
GUICtrlSetState($Sonstiges, $GUI_SHOW)

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

;Ruft die Funktion deselect auf
Call("deselect")

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

EndFunc ;==>Internet

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

;Funktion von Player
Func Player()

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

;Wertangabe
$notthis = "Player";

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

;Programm das Ausgeführt werden soll
;Run ("notepad")

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

;Macht Player unsichtbar
GUICtrlSetState($Player, $GUI_HIDE)
;Macht Player_makiert sichtbar
GUICtrlSetState($Player_makiert, $GUI_SHOW)
;Macht Chat sichtbar
GUICtrlSetState($Chat, $GUI_SHOW)
;Macht Internet sichtbar
GUICtrlSetState($Internet, $GUI_SHOW)
;Macht Spiele sichtbar
GUICtrlSetState($Spiele, $GUI_SHOW)
;Macht Sonstiges sichtbar
GUICtrlSetState($Sonstiges, $GUI_SHOW)

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

;Ruft die Funktion deselect auf
Call("deselect")

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

EndFunc ;==>Player

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

;Funktion von Spiele
Func Spiele()

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

;Wertangabe
$notthis = "Spiele";

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

;Programm das Ausgeführt werden soll
;Run ("notepad")

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

;Macht Spiele unsichtbar
GUICtrlSetState($Spiele, $GUI_HIDE)
;Macht Spiele_makiert sichtbar
GUICtrlSetState($Spiele_makiert, $GUI_SHOW)
;Macht Chat sichtbar
GUICtrlSetState($Chat, $GUI_SHOW)
;Macht Internet sichtbar
GUICtrlSetState($Internet, $GUI_SHOW)
;Macht Player sichtbar
GUICtrlSetState($Player, $GUI_SHOW)
;Macht Sonstiges sichtbar
GUICtrlSetState($Sonstiges, $GUI_SHOW)

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

;Ruft die Funktion deselect auf
Call("deselect")

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

EndFunc ;==>Spiele

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

;Funktion von Sonstiges
Func Sonstiges()

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

;Wertangabe
$notthis = "Sonstiges";

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

;Programm das Ausgeführt werden soll
;Run ("notepad")

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

;Macht Sonstiges unsichtbar
GUICtrlSetState($Sonstiges, $GUI_HIDE)
;Macht Sonstiges_makiert sichtbar
GUICtrlSetState($Sonstiges_makiert, $GUI_SHOW)
;Macht Chat sichtbar
GUICtrlSetState($Chat, $GUI_SHOW)
;Macht Internet sichtbar
GUICtrlSetState($Internet, $GUI_SHOW)
;Macht Player sichtbar
GUICtrlSetState($Player, $GUI_SHOW)
;Macht Spiele sichtbar
GUICtrlSetState($Spiele, $GUI_SHOW)

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

;Ruft die Funktion deselect auf
Call("deselect")

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

EndFunc ;==>Sonstiges

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

Func deselect()
If $notthis <> "Chat" Then GUICtrlSetState($Chat_makiert, $GUI_HIDE)
If $notthis <> "Chat" Then GUICtrlSetState($Chat, $GUI_SHOW)
If $notthis <> "Internet" Then GUICtrlSetState($Internet_makiert, $GUI_HIDE)
If $notthis <> "Internet" Then GUICtrlSetState($Internet, $GUI_SHOW)
If $notthis <> "Player" Then GUICtrlSetState($Player_makiert, $GUI_HIDE)
If $notthis <> "Player" Then GUICtrlSetState($Player, $GUI_SHOW)
If $notthis <> "Spiele" Then GUICtrlSetState($Spiele_makiert, $GUI_HIDE)
If $notthis <> "Spiele" Then GUICtrlSetState($Spiele, $GUI_SHOW)
If $notthis <> "Sonstiges" Then GUICtrlSetState($Sonstiges_makiert, $GUI_HIDE)
If $notthis <> "Sonstiges" Then GUICtrlSetState($Sonstiges, $GUI_SHOW)
EndFunc ;==>deselect

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

While 1
Sleep(1000) ; Idle around
WEnd

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

Func CLOSEClicked()
Exit
EndFunc ;==>CLOSEClicked

[/autoit]

dann kann man es leichter online sichten. Da du PIC-Controls (GuiCtrlCreatePic) verwendest solltest du die benötigten JPG's auch gezipped als Dateianhang anfügen, da man ohne diese ja gar nichts sieht. Um gleichartiges rsichtlich, auf kleinem Platz darzustellen habe ich in meinem AutoStarter ein Tab-Contol und Listview-Controls verwendet. Denkbar wäre auch ein Treeview-Control. LV- und TV-Control passen aber nicht zu deinem bisherigen Konzept, ein Tab-Control dagegen schon. Hänge ein ZIP mit den Bildern an deinen Eröffnngspost und ich bastel dir bei nächster Gelegenheit eine Demo-GUI

mfg autoBert

**autoBert**

Hallo Goldy,

da du nicht dein komplettes Skript gepostet hast [und ich keine Lust habe die Guis zu deinem (unbrauchbaren) Codeschnipsel zu erstellen] hier ein Beispiel-Skript von mir:

Spoiler anzeigen

[autoit]

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

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

Global $idGui1, $idGui2=-99, $idMsgBox, $idZurueck, $idbtnExit2
_CreateGui2() ;entweder hier oder erst wenn benötigt ($idbtmToGui2 Klick)

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

$idGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $idGui1 gespeichert
;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

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

$idbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

$idbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "ICQ" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

$idbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "Afruf Gui 2" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

GUISetState(@SW_SHOW, $idGui1)

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

While 1
$nMsg = GUIGetMsg(1) ;extended Modus wichtig!!
Switch $nMsg[1] ;für welches Fenster ist die Message
Case $idGui1 ;ab hier ist Gui 1 dran
Switch $nMsg[0] ;welche Message wurde ausgelöst
Case $idbtnToGui2
GUISetState(@SW_DISABLE, $idGui1) ;Gui 1 für disablen
;If $idGui2 = -99 Then _CreateGui2() ;nur wenn nicht am Anfang bereits erzeugt nötig, dann auf Vorbelegung der Variable in Global achten)
GUISetState(@SW_SHOW, $idGui2) ;Gui 2 anzeigen
Case $idbtnICQ
MsgBox(0,"","Jetzt würde ICQ gestartet")
;Run("C:\Program Files\ICQ7.0\ICQ.exe")
Case $idbtnExit1, $GUI_EVENT_CLOSE
_end()
EndSwitch
Case $idGui2 ;ab hier ist Gui 2 dran
Switch $nMsg[0] ;welche Message wurde ausgelöst
Case $idMsgBox
MsgBox(0, 'Test', 'Test', 0, $idGui2)
Case $idZurueck, $GUI_EVENT_CLOSE
GUISetState(@SW_ENABLE, $idGui1) ;Gui 1 für ensablen
GUISetState(@SW_HIDE, $idGui2) ;Gui 2 verstecken
Case $idbtnExit2
_end()
EndSwitch
EndSwitch
WEnd

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

Func _CreateGui2()
$idGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $idGui1)
;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $idGui2 gespeichert

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

$idMsgBox = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "MsgBox" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

$idZurueck = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "zurück" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

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

$idbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "beenden" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
EndFunc ;==>_CreateGui2

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

Func _end()
GUIDelete($idGui2)
GUIDelete($idGui1)
Exit
EndFunc ;==>_end

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

mfg autoBert

**autoBert**

Happy BirthdayGun-Food, feiere schön und geniese den Tag. Die besten Wünsche vor allem Gesundheit,

wünscht dir autoBert

**autoBert**

Hallo Baaam,

hier ein Skript das die Funktionalität von Der_Doc 's Vorschlag beweisst (bin mir sicher bei Greenhorn funktioniert es genauso:

Spoiler anzeigen

[autoit]

$hGUI = GUICreate("ans Ende anhängen", 600, 400)
$hMemo = GUICtrlCreateEdit("",5,5,590,360)
$hUser = GUICtrlCreateInput("",5,370,100,25)
$hAdd = GUICtrlCreateButton("Hinzufügen",120,370,150,25)
GUISetState()
while 1
$msg = GuiGetMsg()
if $msg = $hAdd Then GuiCtrlSetData($hMemo,StringStripWS(GuiCtrlRead($hMemo) & @crlf & GUICtrlRead($hUser),1))
;der StringStripWS ist nur dafür notwendig, dass beim allerersten Eintrag keine Leerzeile davor kommt, kann weggelassen werden wenn das nicht stört
if $msg =-3 Then Exit
WEnd

[/autoit]

wenn du Probleme beim umsetzen hast, aber kein Skript postest ist dir nicht zu helfen,

mfg autoBert

**autoBert**

Hallo i2c,

ich würde dein Skript an 2 Stellen abändern:

beim Fileopen für das Outputfile
beim entfernen der Leerstellen

Änderungen sind im Skript kommentiert:

Spoiler anzeigen

[autoit]

#include <array.au3>
#include <File.au3>

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

Global $aFile

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

$input = "test.txt"
$output = "output.txt"

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

_FileReadToArray($input, $aFile)
$hOutput = FileOpen($output, 2); damit eventuell bestehendes File überschrieben wird
If IsArray($aFile) Then
For $i = 1 To $aFile[0]
$aSplit = StringSplit($aFile[$i], ";")
If IsArray($aSplit) Then
For $j = 1 To $aSplit[0]
$aSplit[$j] = StringLeft(StringStripWS($aSplit[$j],1), 7) ;nur führende Leerstellen entfernen
Next
FileWrite($hOutput, _ArrayToString($aSplit, ";", 1) & @CRLF)
EndIf
Next
EndIf
FileClose($hOutput)

[/autoit]

Zitat von Pinguin94

Natürlich macht ein Pro direkt alles 1000mal besser :DDas doch fies Man steckt Zeit hinein, und einer kommt und überbietet dich um einiges xD

wenn du Hilfe suchst möchtest du doch auch das bestmöglichste Ergebnis, also gönne es doch auch Alina, damit sie ihre Heimarbeit etwas leichter hat,

mfg autoBert

**autoBert**

Hallo Eb_12345,

bei dieser Überschrift:

Zitat

Brauche dringend hilfe !

und dem dazugehörigen Beitrag denke ich du solttest erst einmal danach streben (lt. Leo quest Substantive: das Bestreben, das Streben, die Suche Verben: forschen, streben, suchen) genau zu erklären was du vorhast und nicht andere nach möglichen interpretationen deines Beitrags suchen zu lassen, oder drückst du dich deshalb so nebulös aus da ja 50% deiner vorherhergehenden Themen geschlossen wurden, das andere Thema war ein Problem, dass ein bestimmtes Browsergame nicht im _IE_Embedded läuft.

mfg autoBert

**autoBert**

Hallo Com,

hier ein kleines Skript um sich DLLs in einer Listview darstellen zu lassen:

Spoiler anzeigen

[autoit]

#cs ------------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.1
Author: AutoBert: http://www.autoit.de/index.php?page…7402#post187402

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

Skriptbeispiel für den Umgang mit GUICtrlCreateListView, _GUICtrlListView_AddColumn, _GUICtrlListView_AddItem,
_GUICtrlListView_AddSubItem, _GUICtrlListView_SetImageList, _GUIImageList_AddIcon, _GUIImageList_GetImageCount
#ce -------------------------------------------------------------------------------------------------------------------------
#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>
#include <File.au3>

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

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

Global $hGui, $listview, $hListview, $hImage, $b, $iCount,$iWidth = @DesktopWidth, $iHeight = @DesktopHeight -80
Global $Combo, $Progress, $Label,$aFile, $sDLLName, $Msg, $sTitel = "Icon-Übersicht "
Local $exStyles = BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES)
$hGui = GUICreate($sTitel & $sDLLName, $iWidth, $iHeight, 0, 0)
$Combo = GUICtrlCreateCombo("", 2, 2, 120)
$Progress = GUICtrlCreateProgress(125, 2, $iWidth -137,25)
;$Label = GUICtrlCreateLabel("TEST",330,2,200)
$aFile = _FileListToArray(@SystemDir, "*.DLL")

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

$listview = GUICtrlCreateListView("", 2, 42, $iWidth-4, $iHeight - 44, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
$hListview = ControlGetHandle($hGui, "", $listview)
_GUICtrlListView_SetExtendedListViewStyle($listview, $exStyles)
For $i = 1 To 8
; Fügt die Spalten hinzu
_GUICtrlListView_AddColumn($listview, "Spalte " & $i, 120)
Next
GUISetState()
For $i = 1 To $aFile[0]
If _LoadIcons($aFile[$i]) > 0 Then GUICtrlSetData($Combo, $aFile[$i])
GUICtrlSetData($Progress, 100- ($i / $aFile[0] * 100))
;GUICtrlSetData($Label,$i & " / " & $aFile[0])
Next
GUICtrlSetData($Combo, "shell32.dll", "shell32.dll")
_showIcons("shell32.dll")

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

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo
$sDLLName = GUICtrlRead($Combo)
_showIcons($sDLLName)
EndSwitch
WEnd

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

Func _showIcons($sDLLName)
Local $iSpalten, $iZeilen, $iBilder
_GUICtrlListView_DeleteAllItems($hListview)
$iCount = _LoadIcons($sDLLName)
WinSetTitle($hGui,"",$sTitel & $sDLLName)
;ConsoleWrite($sDLLName & " " & $iCount & @CRLF)
_GUICtrlListView_SetImageList($listview, $hImage, 1)

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

$iBilder = -1
For $iZeilen = 1 To Int(($iCount - 1) / + 1
$iBilder += 1
; Fügt die Items hinzu
_GUICtrlListView_AddItem($listview, "Bild: " & $iBilder, $iBilder)
For $iSpalten = 1 To 7
$iBilder += 1
; fügt die SubItems hinzu
_GUICtrlListView_AddSubItem($listview, $iZeilen - 1, "Bild: " & $iBilder, $iSpalten, $iBilder)
Next
Next
EndFunc ;==>_showIcons

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

Func _LoadIcons($sDLLName)
Local $iCount, $iBilder, $iError
Static $iGesamt
_GUIImageList_Destroy($hImage)

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

; Lädt die Bilder
$hImage = _GUIImageList_Create(32, 32, 5, 3, 128, 256)
_GUIImageList_AddIcon($hImage, @SystemDir & "\" & $sDLLName, 0,True)
$iBilder = 1
Do
$iError = _GUIImageList_AddIcon($hImage, @SystemDir & "\" & $sDLLName, $iBilder,True)
$iBilder += 1
Until $iError <= 0
$iCount = _GUIImageList_GetImageCount($hImage)
$iGesamt += $iCount
if $iCount <> 0 Then ConsoleWrite($sDLLName & " " & $iCount & " " & $iGesamt & @CRLF)
Return $iCount
EndFunc ;==>_LoadIcons

[/autoit]

Es ist entstanden, weil ich weiss dass sich in den System-Dlls sehr viele (vielleicht auch für eigene Zwecke brauchbare?) Icons befinden. Ich suche nämlich Icons für die Datennavigation für DB-Programm. Ich habe noch nicht alle DLL's gesichtet und vielleicht deshalb auch noch nicht die gewsünschten Icons gefunden. Gesucht werden Icons die folgenden Symbolen bzw. Begriffen entsprechen "|< ", "<", ">", ">|", "+", "-", "bearbeiten", "neu", "speichern", "verwerfen". Vielleicht findert ihr ja welche für eure Zwecke, wenn ihr dabei zufällig auf die von mir gesuchten stosst bitte posten.

Edit: und hier noch ein ScreenShot:

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Viel Spass beim sichten der Icons wünscht autoBert

**autoBert**

danke i2c,

ich habe es mittlerweile so gelöst:

Spoiler anzeigen

[autoit]

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>
#include <File.au3>

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

#cs evtl. nützliche
compstui
#ce

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

Opt('MustDeclareVars', 1)

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

Global $hGui, $listview, $hImage, $b, $iCount
Global $Combo, $Progress, $Label,$aFile, $sDLLName, $Msg, $hListview
Local $exStyles = BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES)
$hGui = GUICreate("Icon-Übersicht " & $sDLLName, 1024, 500, 0, 0)
$Combo = GUICtrlCreateCombo("", 2, 2, 120)
$Progress = GUICtrlCreateProgress(125, 2, 200)
$Label = GUICtrlCreateLabel("TEST",330,2,200)
$aFile = _FileListToArray(@SystemDir, "*.DLL")

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

$listview = GUICtrlCreateListView("", 2, 42, 1020, 456, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
$hListview = ControlGetHandle($hGui, "", $listview)
_GUICtrlListView_SetExtendedListViewStyle($listview, $exStyles)
For $i = 1 To 8
; Fügt die Spalten hinzu
_GUICtrlListView_AddColumn($listview, "Spalte " & $i, 120)
Next
GUISetState()
For $i = 1 To $aFile[0]
If _LoadIcons($aFile[$i]) > 0 Then GUICtrlSetData($Combo, $aFile[$i])
GUICtrlSetData($Progress, 100 - ($i / $aFile[0] * 100))
GUICtrlSetData($Label,$i & " / " & $aFile[0])
Next
GUICtrlSetData($Combo, "shell32.dll", "shell32.dll")
_showIcons("shell32.dll")

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

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo
$sDLLName = GUICtrlRead($Combo)
_showIcons($sDLLName)
EndSwitch
WEnd

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

Func _showIcons($sDLLName)
Local $iSpalten, $iZeilen, $iBilder
_GUICtrlListView_DeleteAllItems($hListview)
$iCount = _LoadIcons($sDLLName)
ConsoleWrite($sDLLName & " " & $iCount & @CRLF)
_GUICtrlListView_SetImageList($listview, $hImage, 1)

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

$iBilder = -1
For $iZeilen = 1 To Int(($iCount - 1) / + 1
$iBilder += 1
; Fügt die Items hinzu
_GUICtrlListView_AddItem($listview, "Bild: " & $iBilder, $iBilder)
For $iSpalten = 1 To 7
$iBilder += 1
; fügt die SubItems hinzu
_GUICtrlListView_AddSubItem($listview, $iZeilen - 1, "Bild: " & $iBilder, $iSpalten, $iBilder)
Next
Next
Local $iLVZeilen = _GUICtrlListView_GetItemCount($listview)
ConsoleWrite($iZeilen & " " & $iLVZeilen & @CRLF)
For $i = $iZeilen To $iLVZeilen - 1
_GUICtrlListView_DeleteItem($listview, $i)
Next
EndFunc ;==>_showIcons

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

Func _LoadIcons($sDLLName)
Local $iCount, $iBilder, $iError
_GUIImageList_Destroy($hImage)

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

; Lädt die Bilder
$hImage = _GUIImageList_Create(24, 24, 5, 3, 128, 256)
_GUIImageList_AddIcon($hImage, @SystemDir & "\" & $sDLLName, 0,True)
$iBilder = 1
Do
$iError = _GUIImageList_AddIcon($hImage, @SystemDir & "\" & $sDLLName, $iBilder,True)
$iBilder += 1
Until $iError <= 0
$iCount = _GUIImageList_GetImageCount($hImage)
Return $iCount
EndFunc ;==>_LoadIcons

[/autoit]

bis jetzt bekomme ich die Progressbar nicht zu sehen, aber das sollte ich auch noch finden,

mfg autoBert

**autoBert**

Danke i2c, damit ist das primäre Poblem gelöst.

Ideen zu

Zitat von autoBert

Des weiteren wäre es interessant für mich zu wissen, wie ich vor der Aufnahme einer DLL in die Auswahl-Combo feststellen kann ob diese überhaupt ICONS enthält,

bitte trotz Gelöst posten

mfg autoBert

**autoBert**

Hallo com,

in einer LV in der ich die Items mit _GUICtrlListView_AddItem und die SbItems mit _GUICtrlListView_AddSubItem erzeuge, habe ich das Problem, dass beim Löschen aller Items mit _GUICtrlListView_DeleteAllItems und danach neu erstellen von Items ich am Ende der LV unerwünschte Einträge habe. Hier das Skript:

Spoiler anzeigen

[autoit]

#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
#include <WindowsConstants.au3>
#include <File.au3>

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

Opt('MustDeclareVars', 1)

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

Global $hGui, $listview, $hImage, $b, $iCount
Global $Combo, $aFile, $sDLLName, $Msg
Local $exStyles = BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES)
$hGui = GUICreate("Icon-Übersicht " & $sDLLName, 1024, 500, 0, 0)
$Combo = GUICtrlCreateCombo("", 2, 2, 120)
$aFile = _FileListToArray(@SystemDir, "*.DLL")
GUICtrlSetData($Combo, "Bitte einen DLL auswählen")
For $i = 1 To $aFile[0]
GUICtrlSetData($Combo, $aFile[$i])
Next

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

;$listview = _GUICtrlListView_Create($hGui,"", 2, 42, 1020, 456,BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
$listview = GUICtrlCreateListView("", 2, 42, 1020, 456, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
_GUICtrlListView_SetExtendedListViewStyle($listview, $exStyles)
For $i = 1 To 8
; Fügt die Spalten hinzu
_GUICtrlListView_AddColumn($listview, "Spalte " & $i, 120)
Next

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

GUISetState()
GUICtrlSetData($Combo, "shell32.dll", "shell32.dll")
_showIcons("shell32.dll")

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

While 1
$Msg = GUIGetMsg()
Switch $Msg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo
$sDLLName = GUICtrlRead($Combo)
_showIcons($sDLLName)
EndSwitch
WEnd

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

Func _showIcons($sDLLName)
Local $iSpalten, $iZeilen, $iBilder
_GUICtrlListView_DeleteAllItems($listview)
_GUIImageList_Destroy($hImage)

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

; Lädt die Bilder
$hImage = _GUIImageList_Create(24, 24, 5, 3, 128, 256)
For $iBilder = 0 To 255
_GUIImageList_AddIcon($hImage, @SystemDir & "\" & $sDLLName, $iBilder)
Next
_GUICtrlListView_SetImageList($listview, $hImage, 1)
$iCount = _GUIImageList_GetImageCount($hImage)
ConsoleWrite($iCount & @CRLF)

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

$iBilder = -1
For $iZeilen = 1 To Int(($iCount - 1) / + 1
$iBilder += 1
; Fügt die Items hinzu
_GUICtrlListView_AddItem($listview, "Bild: " & $iBilder, $iBilder)
For $iSpalten = 1 To 7
$iBilder += 1
; fügt die SubItems hinzu
_GUICtrlListView_AddSubItem($listview, $iZeilen-1, "Bild: " & $iBilder, $iSpalten, $iBilder)
Next
Next
EndFunc ;==>_showIcons

[/autoit]

um den Effekt zu sehen einfach in der ComboBox eine DLL runter und wieder hochblättern.

Des weiteren wäre es interessant für mich zu wissen, wie ich vor der Aufnahme einer DLL in die Auswahl-Combo feststellen kann ob diese überhaupt ICONS enthält, dies ist aber sekundär,

mfg autoBert

**autoBert**

Hallo paraoxodn,

der einfachste Weg ist der Weg über eine Samba. Anleitungen zum installieren und konfihrieren des Samab-Servers finden sich im Netz zu jeder Linx-Distribtion hier z.B.: Einfache Samba Freigabe unter Debian darin ist ach erklärt wie man von Windows diese Freigabe mounted.
Du kannst danach auf dieses Netzlaufwerk zugreifen.

Edit: übersehen:

Zitat von paraoxodn

aber ohne das der pc an ist.

bin wegen AutoIt davon asgegangen, dass du von einem Windows-PC aus zugreifen willst, das geht aber nur wenn er läuft,

mfg autoBert

**autoBert**

Hallo maku83,

damit der $cancelbutton funktioniert sollte es reichen wenn du 2 Zeilen einfügst:

[autoit]

$stopvar = 0 ;Zeile 120
For $shutter_num In $Filelist
$msg = GUIGetMsg() ;<======== einfügen
If $msg = $cancelbutton Then _Cancel() ;<======== einfügen

[/autoit]

mfg autoBert

**autoBert**

Hallo unverschämt,

herzlich willkommen im Forum und viel Spass mit AutoIt.

Hier kannst du dir die Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

PS.: ich hoffe dass Nomen est Omen nicht bei dir zutrifft

mfg autoBert

**autoBert**

Hallo Marsi,

ich hoffe du brauchst hiefür keine 5 Sekunden um dies zu lösen:

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

@nof@ker2 du solltest noch eine GUI darum stricken. Bei folgenden Tests haben Potenzen geklappt:

2x+5=7
2^x+5=9

Danach hatte ich aber gleich einen fehlerhaften Versuch x^2+16=20 mit Abbruch -1.#INF , so man ihn bei Potenzen noch nicht einsetzen kann

mfg autoBert

**autoBert**

Hallo lukinono,

Zitat von lukiono

Eher ironisch.

dass war mir klar, ich konnte mir aber darauf hin den (bildlichen) Reim nicht verkneifen.

Dein Problem dürfte ja dadurch gelöst sein, daher wäre es schön wenn du den Thread auch auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

mfg autoBert

**autoBert**

Hallo lukiono,

Zitat von lukiono

Die Sau behandelt mir die Null wie Luft. Wobei er im normalen Fall eigentlich auch Recht hat, hier aber nicht.

Hat er wohl. In Anlehnung an deine heftige Wortwahl siehe:
http://1.2.3.11/bmi/www.autoit…avatar-1019.jpg

Zur Begründung warum die *** Recht hat, += ist ein Zuweisungsoperator mit gleichzeitiger Addition, er nimmt also von 07:00 den gültigen Teil einer Zahlenvariablen =7 und addiert dazu den gültigen Teil der zu addierenden Variable (00:01) = 0 ergibt 7. Du musst also mit

[autoit]

$aktuellezeit="07:00";kommt bei dir von GuiCtrlRead
$Time = StringSplit($aktuellezeit,":";Wert trennen)
$Time[2] += 1;1 Minute addieren
$aktuellezeit = StringFormat("%02d:%02d",$Time[1],$Time[2];wieder formatiern)
ConsoleWrite($aktuellezeit & @CRLF)
[autoit]_dateAdd

[/autoit]

Du kannst es aber auch über _dateAdd machen, dazu dieses kleine Beispiel:

[autoit]

#include <date.au3>
$aktuellezeit="1970/01/01 07:00"
$aktuellezeit = _DateAdd('n',1,$aktuellezeit)
ConsoleWrite(StringRight($aktuellezeit,5) & @CRLF)

[/autoit]

mfg autoBert

**autoBert**

Hallo

in dem Thread wird von funkey ja auch nur die Spaltenüberschrift ausgelesen. Um an die (Sub)-Itemtexte zu kommen musst du

[autoit]

_GUICtrlListView_GetItemText;oder
_GUICtrlListView_GetItemTextArray

[/autoit]

verwenden.

mfg autoBert

**autoBert**

Hallo AlexanderSchill,

schau dir

ListView - SubItem einzeln färben/formatieren, Finale Version!
[ gelöst ] farbe von listviewspalte ändern

von BugFix an,

mfg autoBert

**autoBert**

Hallo volle,

anscheinend hast du zwischenteizlich die Berechtigung für update.txt geändert, denn mittlerweile klappt das bei mir. Da diese aber nur 1 Zeile hat habe ich das Skript etwas angepasst und es läuft komplett korrekt durch:

Updaten?

[autoit]

Dim $ver = "1.0.0"
HttpSetUserAgent('Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.9.2.10) Gecko/20100914 Firefox/3.6.10')
InetGet("http://trap-making.bplaced.net/update.txt", @Scriptdir & "\update.txt", 1, 0)
$file = FileOpen(@Scriptdir & "\update.txt", 0)
$line = FileReadLine($file, 1)
$line2 = FileReadLine($file, 2)
$line2 = 1
If $line = $ver Then
MsgBox(64, "Kein Update", "Du hast die neuste Version: (" & $ver & ")")
FileClose($file)
FileDelete(@Scriptdir & "\update.txt")
Else
MsgBox(64, "Update!", "Es ist eine Neue Version verfügbar!")
$fg = MsgBox(4, "Updaten?", "Möchtest du jetzt Updaten?")
If $fg = 6 Then
HttpSetUserAgent('Firefox')
InetGet("http://www.trap-making.bplaced.net/Test.ini", @ScriptDir & "\Test.ini", 1, 0)
MsgBox(0,"",FileRead(@ScriptDir & "\test.ini"))
FileDelete(@Scriptdir & "\update.txt")
EndIf
EndIf

[/autoit]

kein Update notwendig

[autoit]

Dim $ver = "1.0.1"
HttpSetUserAgent('Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.9.2.10) Gecko/20100914 Firefox/3.6.10')
InetGet("http://trap-making.bplaced.net/update.txt", @Scriptdir & "\update.txt", 1, 0)
$file = FileOpen(@Scriptdir & "\update.txt", 0)
$line = FileReadLine($file, 1)
$line2 = FileReadLine($file, 2)
$line2 = 1
If $line = $ver Then
MsgBox(64, "Kein Update", "Du hast die neuste Version: (" & $ver & ")")
FileClose($file)
FileDelete(@Scriptdir & "\update.txt")
Else
MsgBox(64, "Update!", "Es ist eine Neue Version verfügbar!")
$fg = MsgBox(4, "Updaten?", "Möchtest du jetzt Updaten?")
If $fg = 6 Then
HttpSetUserAgent('Firefox')
InetGet("http://www.trap-making.bplaced.net/Test.ini", @ScriptDir & "\Test.ini", 1, 0)
MsgBox(0,"",FileRead(@ScriptDir & "\test.ini"))
FileDelete(@Scriptdir & "\update.txt")
EndIf
EndIf

[/autoit]

mfg autoBert

**autoBert**

Hallo Reaker,

ich habe es auf den Drchsuchen-Button gelegt, Ausgabe erfolgt in der Scite-Konsole

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.6.1
Author: Marcel Böhm (Reaker)
Email: [email='contact.boehm@googlemail.com'][/email]
Version: 1.0
Start Date:
Release Date:

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

Lizens:

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

Copyright 2010 by Marcel Böhm
http://creativecommons.org/licenses/by-nc-nd/3.0/de/legalcode
Sie dürfen:
das Werk bzw. den Inhalt vervielfältigen, verbreiten und öffentlich zugänglich machen
Zu den folgenden Bedingungen:
Namensnennung — Sie müssen den Namen des Autors/Rechteinhabers in der von ihm festgelegten Weise nennen.
Keine kommerzielle Nutzung — Dieses Werk bzw. dieser Inhalt darf nicht für kommerzielle Zwecke verwendet werden.
Keine Bearbeitung — Dieses Werk bzw. dieser Inhalt darf nicht bearbeitet, abgewandelt oder in anderer Weise verändert werden.

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

#ce ----------------------------------------------------------------------------

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

#include <Array.au3>
#include <Inet.au3>
#include <File.au3>
#include <String.au3>
#include <Misc.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TreeViewConstants.au3>
#include <WindowsConstants.au3>
#include <GuiStatusBar.au3>
#include <GuiTreeView.au3>

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

Global $pName = 'Project 23'
Global $pVersion = '1.0'
Global $pAuthor = 'Marcel Böhm (Reaker)'
Global $pEmail = 'contact.boehm@googlemail.com'

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

Global $pIni = @ScriptDir & "\config.ini"
Global $pDownIni = @ScriptDir & "\down.ini"

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

Global $Array[1]
Global $Array2[1]

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

#Region ### START Koda GUI section ### Form=C:\Users\Marcel\Sonstiges\Skripte\Autoit3\Projekte\Deviantart Downloader\Form1.kxf
Global $Form1 = GUICreate($pName & " (v." & $pVersion & ")", 692, 567, 294, 113)
Global $Label1 = GUICtrlCreateLabel($pName, 12, 12, 357, 27)
GUICtrlSetFont(-1, 14, 400, 0, "Myriad Pro")
Global $hTreeView = GUICtrlCreateTreeView(11, 58, 281, 439, BitOR($TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES, $WS_GROUP, $WS_TABSTOP))
GUICtrlSetFont(-1, 10, 400, 0, "Myriad Pro")
Global $hItem1 = _GUICtrlTreeView_Add($hTreeView, 0, "3D Models")
Global $hItem2 = _GUICtrlTreeView_Add($hTreeView, 0, "Application Resources")
Global $hItem3 = _GUICtrlTreeView_AddChild($hTreeView, $hItem2, "Illustrator Actions")
Global $hItem4 = _GUICtrlTreeView_AddChild($hTreeView, $hItem2, "Illustrator Brushes")
Global $hItem5 = _GUICtrlTreeView_AddChild($hTreeView, $hItem2, "Photoshop . PSD Files")
Global $hItem6 = _GUICtrlTreeView_AddChild($hTreeView, $hItem2, "Photoshop Actions")
Global $hItem7 = _GUICtrlTreeView_AddChild($hTreeView, $hItem2, "Photoshop Brushes")
Global $hItem8 = _GUICtrlTreeView_Add($hTreeView, 0, "Clipart")
Global $hItem9 = _GUICtrlTreeView_Add($hTreeView, 0, "Designs & Patterns")
Global $hItem10 = _GUICtrlTreeView_Add($hTreeView, 0, "Fonts")
Global $hItem11 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Corporate")
Global $hItem12 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Crazy")
Global $hItem13 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Cursive")
Global $hItem14 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Gothic")
Global $hItem15 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Misc")
Global $hItem16 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Normal")
Global $hItem17 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Rusted")
Global $hItem18 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "SansSerif")
Global $hItem19 = _GUICtrlTreeView_AddChild($hTreeView, $hItem10, "Serif")
Global $hItem20 = _GUICtrlTreeView_Add($hTreeView, 0, "Literature Templates")
Global $hItem21 = _GUICtrlTreeView_Add($hTreeView, 0, "Misc")
Global $hItem22 = _GUICtrlTreeView_Add($hTreeView, 0, "Stock Images")
Global $hItem23 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Animals')
Global $hItem24 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Classic')
Global $hItem25 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Food')
Global $hItem26 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Fractal')
Global $hItem27 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Household Items')
Global $hItem28 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Macro Shots')
Global $hItem29 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Misc')
Global $hItem30 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Model')
Global $hItem31 = _GUICtrlTreeView_AddChild($hTreeView, $hItem30, 'Women')
Global $hItem32 = _GUICtrlTreeView_AddChild($hTreeView, $hItem30, 'Group')
Global $hItem33 = _GUICtrlTreeView_AddChild($hTreeView, $hItem30, 'Men')
Global $hItem34 = _GUICtrlTreeView_AddChild($hTreeView, $hItem31, 'Child')
Global $hItem35 = _GUICtrlTreeView_AddChild($hTreeView, $hItem31, 'Full Body')
Global $hItem36 = _GUICtrlTreeView_AddChild($hTreeView, $hItem31, 'Portrait')
Global $hItem37 = _GUICtrlTreeView_AddChild($hTreeView, $hItem32, 'Children')
Global $hItem38 = _GUICtrlTreeView_AddChild($hTreeView, $hItem32, 'Couples')
Global $hItem39 = _GUICtrlTreeView_AddChild($hTreeView, $hItem32, 'Full Body')
Global $hItem40 = _GUICtrlTreeView_AddChild($hTreeView, $hItem32, 'General')
Global $hItem41 = _GUICtrlTreeView_AddChild($hTreeView, $hItem32, 'Portrait')
Global $hItem42 = _GUICtrlTreeView_AddChild($hTreeView, $hItem33, 'Child')
Global $hItem43 = _GUICtrlTreeView_AddChild($hTreeView, $hItem33, 'Full Body')
Global $hItem44 = _GUICtrlTreeView_AddChild($hTreeView, $hItem33, 'Nature')
Global $hItem45 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Objects')
Global $hItem46 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Places')
Global $hItem47 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Plants')
Global $hItem48 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Technical')
Global $hItem49 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Textures')
Global $hItem50 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Abstract')
Global $hItem51 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Flat')
Global $hItem52 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Metallic')
Global $hItem53 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Misc')
Global $hItem54 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Plain')
Global $hItem55 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Rust')
Global $hItem56 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Water')
Global $hItem57 = _GUICtrlTreeView_AddChild($hTreeView, $hItem49, 'Wood')
Global $hItem58 = _GUICtrlTreeView_AddChild($hTreeView, $hItem22, 'Vector')

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

Global $Group1 = GUICtrlCreateGroup("n/A", 300, 200, 383, 245)
GUICtrlSetFont(-1, 12, 400, 0, "Myriad Pro")
Global $Label2 = GUICtrlCreateLabel("n/A", 318, 230, 113, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
Global $Input1 = GUICtrlCreateInput("5", 452, 226, 57, 26, BitOR($ES_CENTER, $ES_AUTOHSCROLL, $ES_NUMBER))
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
Global $Button1 = GUICtrlCreateButton("n/A", 432, 264, 105, 29, $WS_GROUP)
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
Global $Label3 = GUICtrlCreateLabel("- - - - - - - - - - - - - - - - - - - - - - - - - -", 314, 300, 359, 23)
Global $Progress1 = GUICtrlCreateProgress(312, 322, 361, 25)
Global $Label4 = GUICtrlCreateLabel("n/A", 312, 352, 361, 20, $SS_CENTER)
GUICtrlSetFont(-1, 10, 400, 0, "Myriad Pro")
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $Group2 = GUICtrlCreateGroup("Einstellungen", 300, 54, 383, 143)
GUICtrlSetFont(-1, 12, 400, 0, "Myriad Pro")
Global $Label5 = GUICtrlCreateLabel("Pfad", 314, 83, 31, 22)
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
Global $Input2 = GUICtrlCreateInput("Input2", 352, 80, 237, 26)
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
Global $Button2 = GUICtrlCreateButton("Durchsuchen", 594, 78, 81, 29, $WS_GROUP)
GUICtrlSetFont(-1, 10, 400, 0, "Myriad Pro")
Global $Button3 = GUICtrlCreateButton("Speichern", 588, 158, 85, 27, $WS_GROUP)
GUICtrlSetFont(-1, 11, 400, 0, "Myriad Pro")
GUICtrlCreateGroup("", -99, -99, 1, 1)
Global $StatusBar1 = _GUICtrlStatusBar_Create($Form1)
Global $StatusBar1_PartsWidth[1] = [-1]
_GUICtrlStatusBar_SetParts($StatusBar1, $StatusBar1_PartsWidth)
_GUICtrlStatusBar_SetText($StatusBar1, "n/A", 0)
_GUICtrlStatusBar_SetMinHeight($StatusBar1, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While True
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $Button2
for $i = 1 to 58
if _GUICtrlTreeView_GetFirstChild($hTreeView,Eval("hItem" & $i)) = 0 Then ConsoleWrite("Item" & $i & " hat keine Kinder" & @CRLF)
Next
EndSwitch
WEnd

[/autoit]

mfg autoBert

Beiträge von autoBert

Umsetztungshilfe

Ein GUI schließen ohne die anderen zus schließen

Happy Birthday Gun-Food! :-)

Edit Box neue Zeile

esten Buchstaben

Brauche dringend hilfe !

[Beispiel] Icons von System-DLLs in LV darstellen

Listview Probleme mit _GUICtrlListView_DeleteAllItems

Listview Probleme mit _GUICtrlListView_DeleteAllItems

Listview Probleme mit _GUICtrlListView_DeleteAllItems

den inhalt eines ordners auf einem linux server auflisten

Process Balken für einen FOR NEXT Loop

anfänger am start

Gleichungslöser

Bastelei mit +=

Bastelei mit +=

fremde listview auslesen

Icons für Listviewitems

Updatefunktion

Treeview - Child Items bekommen