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

Beiträge von sc4ry

  • Gui ändern

    • sc4ry
    • 22. Dezember 2007 um 22:01

    aso, ja klar =)

    die größe des fenster, damit verbunden die größe eines listviews und darüber hinaus noch die einträge im listview. zu guter letzt die transparenz =)

    [autoit]

    $gui = GUICreate($script, $w, $h, $x, $y, $WS_POPUPWINDOW, $WS_EX_TRANSPARENT + $WS_EX_TOOLWINDOW )
    WinSetOnTop($script,'',1)
    WinSetTrans($script,'', (100 - $trans) * 2.55)
    $list2 = _GUICtrlListView_Create($gui,"||", 5, 5, $w - 10, $h - 10)
    _GUICtrlListView_SetColumn($list2, 0, "Name", ($w / 2) - 30, 2)
    _GUICtrlListView_SetColumn($list2, 1, "IP", ($w / 2) - 30, 2)
    _GUICtrlListView_SetColumn($list2, 2, "Status", 50, 2)

    [/autoit]
  • Gui ändern

    • sc4ry
    • 22. Dezember 2007 um 21:53

    hey,

    wie kann man easy ein gui ändern?
    es wird bei starten des tools erstellt, kann aber später über einstellungen geändert werden.

    wie übernehme ich das nun in die bestehende gui, ohne das zu löschen und ein neues zu erstellen ?
    weil das müsste wohl in eine funktion geschrieben werden und das verhaut mir das ganze script =/

  • ListView fragen

    • sc4ry
    • 20. Dezember 2007 um 18:31

    danke bugfix, ich werd es gleich mal ausprobieren.

    @ carsten, ich war kurz davor, wieder auf ini umzusteigen.
    warum ich aber ne txt genommen habe, und der die einträge mit | getrennt waren, liegt an nem alten tip ... der auch von bugfix stammen könnte.
    und zwar kann man so mit nur einem befehl EIGENTLICH mehrere spalten füllen. guictrlsetdata und der text mit | getrennt füllt so automatisch mehrere spalten. scheint durch das neue autoit aber leider nicht mehr zu funktionieren.

    gemacht habe ich es so zB beim grundbuch creater, da kannste es dir mal angucken. im grunde ganz easy ... aber wie gesagt, es geht wohl nimmer =(

  • ListView fragen

    • sc4ry
    • 19. Dezember 2007 um 22:35

    hat keiner ne idee? ich komm iwie einfach net weiter *heul*

  • SplashTextOn über Systray + animiert einblenden

    • sc4ry
    • 18. Dezember 2007 um 14:48

    hab es jetzt mal getestet, deine version, wie auch die anderen beiden modifizierten.
    eigentlich sieht es ganz gut aus, ausser dass das fenster eigentlich nur am anfang und am ende der zeit, quasi ein/ausgeblendet wird.
    ansonsten ist es nicht zu sehen, ka wieso =(

  • ListView fragen

    • sc4ry
    • 18. Dezember 2007 um 00:15

    habs jetzt so hinbekommen =)
    wiedermal dank eines guten tips *g*

    Spoiler anzeigen
    [autoit]

    Func _SaveIP()
    FileDelete($SaveIPs)
    $anz = _GUICtrlListView_GetItemCount($list)
    For $i = 1 To $anz
    $SaveIPs = _GUICtrlListView_GetItemText($list, $i - 1) & '|' & _GUICtrlListView_GetItemText($list, $i - 1, 1) & "|" & @CRLF
    FileWrite($pathIPs, $SaveIPs)
    Next
    EndFunc

    [/autoit]

    aber is das eine prob gelöst, folgt natürlich das nächste.
    das listview soll jetzt mit den einträgen, die gespeichert wurde, erstellt werden.
    folgendes geht iwie nicht ...

    [autoit]

    If FileExists($pathIPs) Then
    _FileReadToArray($pathIPs, $ips)
    For $i = 1 To $ips[0]
    _GUICtrlListView_AddItem($list, $ips[$i]) ;oder _guictrllistview_additem/array
    Next
    Else
    EndIf

    [/autoit]

    hat jmd ne idee wie ich das managen kann?
    die daten werden aus einer txt gelesen, in der sie (extra) wie folgt abgespeichert sind:

    Daten1|Daten2 ....

    damals ging es mit guictrlsetdata, dass er aus einem solchen array direkt 2 spalten gefüllt hat. jetzt geht es nicht mehr =/

  • ListView fragen

    • sc4ry
    • 15. Dezember 2007 um 16:04

    ok, so schaut es zZ aus ...

    [autoit]

    #Include <GuiConstants.au3>
    #include <Array.au3>
    #include <GuiListBox.au3>
    #include <file.au3>
    #include <GuiConstantsEx.au3>
    #include <GuiListView.au3>
    #include <GuiImageList.au3>

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

    Global $Paused
    Global $urllist
    Global $SaveIPs

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

    $pathIPs = @ScriptDir & "\Destinys"
    $script = "WhoIsOn RelOadEd"
    $ini = @ScriptDir & "\Settings.ini"
    $error1 = 0
    $error2 = 0

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

    $GuiIP = GUICreate($script & " Destiny IPs", 345, 310)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_ExitSettings")

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

    $list = _GUICtrlListView_Create($GuiIP,"Name |IP ", 5, 5, 250, 300)

    $badd = GUICtrlCreateButton("add", 260, 10, 80)
    GUICtrlSetOnEvent(-1, "_AddIP")
    $bremove = GUICtrlCreateButton("remove", 260, 50, 80)
    GUICtrlSetOnEvent(-1, "_RemoveIP")
    $bclear = GUICtrlCreateButton("clear", 260, 90, 80)
    GUICtrlSetOnEvent(-1, "_ClearIP")
    $bok = GUICtrlCreateButton("ok", 260, 280, 80)
    GUICtrlSetOnEvent(-1, "_SaveIP")

    GUISetState(@SW_SHOW, $GuiIP)

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

    While 1
    Sleep(100)
    WEnd

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

    Func _AddIP()
    Do
    $addname = InputBox("Name", "Please enter a name", "", "", 100, 130)
    If @error = 1 Then
    $error1 = 1
    ExitLoop
    Else
    EndIf
    until $addname <> ""
    If $error1 = 1 Then
    Else
    Do
    $addip = InputBox("IP", "Please enter the IP", "", "", 100, 130)
    If @error = 1 Then
    $error2 = 1
    ExitLoop
    Else
    EndIf
    Until StringRegExp($addip, "[0-9]+")
    If $error2 <> 1 Then
    _GUICtrlListView_AddItem($list, $addname)
    _guictrllistview_AddSubItem($list, _GUICtrlListView_GetItemCount($list) - 1, $addip, 1)
    Else
    EndIf
    EndIf
    $error1 = 0
    $error2 = 0
    EndFunc

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

    Func _RemoveIP()
    _GUICtrlListView_DeleteItemsSelected($list)
    EndFunc

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

    Func _ClearIP()
    _GUICtrlListView_DeleteAllItems($list)
    EndFunc

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

    Func _SaveIP()
    $anz = _GUICtrlListView_GetItemTextArray($list)
    For $i = 1 To $anz[0]
    $SaveIPs[$i] = _GUICtrlListView_GetItemTextArray($list, 1) & '|' & _GUICtrlListView_GetItemText($list, 2) & "|"
    Next
    _FileWriteFromArray($pathIPs, $SaveIPs)
    EndFunc

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

    Func _ExitSettings()
    Exit
    ;GUISetState(@SW_HIDE, $GuiSettings)
    EndFunc

    Func _OnExitFunc()
    Exit
    EndFunc

    [/autoit]
  • ListView fragen

    • sc4ry
    • 14. Dezember 2007 um 11:18

    jetzt bin ich an nem neuen prob angelangt. und zwar würde ich gerne die komplette liste abspeichern ... in einer txt mit | als trennzeichen.
    probiert habe ich es so

    [autoit]


    Func _SaveIP()
    $anz = _GUICtrlListView_GetItemTextArray($list)
    For $i = 1 To $anz[0]
    $SaveIPs[$i] = _GUICtrlListView_GetItemTextArray($list, 1) & '|' & _GUICtrlListView_GetItemText($list, 2) & "|"
    Next
    _FileWriteFromArray($pathIPs, $SaveIPs)
    EndFunc

    [/autoit]

    das ganze bricht auch nicht ab, wenn ich Dim $SaveIPs[100] mache
    dann habe ich aber 100 leerzeilen in der Datei, jedoch nicht die werte, die im ListView sind oO

  • GuiCtrlCreateCheckbox ... wenn nicht aktiv, Input deaktivieren

    • sc4ry
    • 14. Dezember 2007 um 09:24

    ich bin ja NUR fortgeschrittener aufgrund der anzahl der posts =P

    und in OnEvent arbeite ich mich grad ein, eigentlich hätte ich drauf kommen können *g*
    aber bin auch zZ noch nicht wieder ganz in autoit drin, da ich paar mon. aufgrund der ganzen prüfungen nix mehr damit gemacht habe =/

  • GuiCtrlCreateCheckbox ... wenn nicht aktiv, Input deaktivieren

    • sc4ry
    • 14. Dezember 2007 um 08:35

    hmm, irgendwie zu einfach =?

    aber dank dir =)
    ich schreibs mir hinter die ohren

  • ListView fragen

    • sc4ry
    • 14. Dezember 2007 um 08:22

    hmm, dank dir, aber das is irgendwie umständlich.
    dachte die funktionen sollen alte sachen vereinfachen *g*

    dann werd ich das mal probieren bzw nach weiteren möglichkeiten ausschau halten =)

    thx

    PS: so, dank dir carsten, durch deine erklärung hab ich die funktion endlich richtig verstanden *g*

    und dann hab ich mir auch die passende lösung dazu gebastelt, vllt kannst du sie auch verwenden, ist nen tick einfacher als deine =)
    funzt bis jetzt ganz gut ...

    [autoit]


    _guictrllistview_AddSubItem($list, _GUICtrlListView_GetItemCount($list) - 1, $addip, 1)

    [/autoit]
  • ListView fragen

    • sc4ry
    • 13. Dezember 2007 um 22:19

    ah, thx carsten, da war der entscheidende tip =)

    soweit klappt jetzt alles, bis auf:

    _guictrllistview_AddSubItem($list, 0, $addip, 1)

    also beim ersten mal geht das. da fügt er den wert in spalte 2 an stelle 1 ein.
    beim 2ten mal soll er theoretisch in spalte 2 zeile 2 schreiben, aber er überschreibt nun IMMER spalte 2 zeile 1 ...

    wie sagt man der funktion, dass es immer hinten dran soll?
    bei AddItem geht das automatisch oO

  • GuiCtrlCreateCheckbox ... wenn nicht aktiv, Input deaktivieren

    • sc4ry
    • 13. Dezember 2007 um 22:02

    ergaß zu erwähnen ist, dass ich mit Opt("GuiOnEventMode",1) arbeite *g*

    sorry, aber schonmal danke für eure hilfe =)

  • GuiCtrlCreateCheckbox ... wenn nicht aktiv, Input deaktivieren

    • sc4ry
    • 13. Dezember 2007 um 21:27

    aktivieren und deaktivieren schaff ich ... aber ne abrage beim klick auf die cb ... da bin ich grad bissel überfragt oO

  • GuiCtrlCreateCheckbox ... wenn nicht aktiv, Input deaktivieren

    • sc4ry
    • 13. Dezember 2007 um 21:19

    Hi,

    kurze frage, ich habe eine checkbox und ein inputfeld, was aber nur benutzbar sein soll, sofern in der checkbox ein haken ist.
    wie kann man das umsetzen?

  • Effekt bei Maus_über_Icon

    • sc4ry
    • 13. Dezember 2007 um 09:28

    oh, danke.
    dachte du meintest nur den aufruf der funktion, der ja auch falsch war =)

  • ListView fragen

    • sc4ry
    • 12. Dezember 2007 um 23:14

    Hey,

    ich würde gerne ein ListView bauen (ist ja mehrspaltig) und dort einträge hinzufügen, entfernen oder die liste komplett löschen bzw auslesen.
    jetzt die fragen, wie machen?

    bei ner normalen List hatte ich das mit guictrlsetdata usw gemacht.

    geht das immernoch so, und wofür sind die ganzen teile wie _GUICtrlListView_DeleteAllItems($list) ???

  • Effekt bei Maus_über_Icon

    • sc4ry
    • 12. Dezember 2007 um 20:10

    so, ich habe einfach mal ganz von vorne angefangen.
    mir erstmal überlegt, was ich will, wie ich es umsetzen will und nun bei 0 angefangen.

    irgendwie habe ich aber gerade das prob, das bei GuiOnEvent = 1 das tool nicht in die functions springt, die es bei den buttons ausführen soll.
    jmd ne ahnung warum ?

    Spoiler anzeigen
    [autoit]


    #Include <Constants.au3>
    #include <array.au3>
    Opt("GuiOnEventMode",1)

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

    $script = "WhoIsOn"
    $ini = @ScriptDir & "\Settings.ini"
    $ping = 4000
    $corner = 3
    $w = 150
    $h = 200
    ;$proxy = "127.0.0.1"

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

    $DeskX = @DesktopWidth
    $DeskY = @DesktopHeight

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

    If FileExists($ini) Then
    $ping = IniRead($ini, "Ping", "Intervall", $ping)
    $corner = IniRead($ini, "Position", "Corner", $corner)
    $w = IniRead($ini, "Window", "Weight", $w)
    $h = IniRead($ini, "Window", "Height", $h)
    ;$proxy = IniRead($ini, "Proxy", "Server", $proxy)
    Else
    IniWrite($ini, "Ping", "Intervall", $ping)
    IniWrite($ini, "Position", "Corner", $corner)
    IniWrite($ini, "Window", "Weight", $w)
    IniWrite($ini, "Window", "Height", $h)
    ;IniWrite($ini, "Proxy", "Server", $proxy)
    EndIf

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

    $GuiSettings = GUICreate($script & " Settings", 450, 145)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_ExitSettings")

    ;ping
    GUICtrlCreateGroup("Ping", 5, 5, 135, 50)
    GUICtrlCreateLabel("Intervall:", 15, 30, 40)
    $Iping = GUICtrlCreateInput(IniRead($ini, "Ping", "Intervall", $ping), 60, 25, 50)
    GUICtrlCreateLabel("ms", 115, 30, 20)

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

    ;weight & height
    GUICtrlCreateGroup("Windows", 5, 60, 135, 80)
    GUICtrlCreateLabel("Weight:", 15, 85, 40)
    $Iw = GUICtrlCreateInput(IniRead($ini, "Window", "Weight", $w), 60, 80, 50)
    GUICtrlCreateLabel("mm", 115, 85, 20)
    GUICtrlCreateLabel("Height:", 15, 110, 40)
    $Ih = GUICtrlCreateInput(IniRead($ini, "Window", "Height", $h), 60, 105, 50)
    GUICtrlCreateLabel("mm", 115, 110, 20)

    ;corner
    GUICtrlCreateGroup("Corner Position", 150, 5, 200, 135)
    $TL = GUICtrlCreateRadio("Top Left", 165, 30, 60)
    $TR = GUICtrlCreateRadio("Top Right", 265, 30, 65)
    $BR = GUICtrlCreateRadio("Bottom Right", 265, 100, 80)
    $BL = GUICtrlCreateRadio("Bottom Left", 165, 100, 70)

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

    $corner = IniRead($ini, "Position", "Corner", $corner)
    If $corner = 1 Then
    GUICtrlSetState($TL, 1)
    ElseIf $corner = 2 Then
    GUICtrlSetState($TR, 1)
    ElseIf $corner = 3 Then
    GUICtrlSetState($BR, 1)
    ElseIf $corner = 4 Then
    GUICtrlSetState($BL, 1)
    EndIf

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

    ;buttons
    $bsave = GUICtrlCreateButton("save", 360, 10, 80)
    GUISetOnEvent(-1, "_SaveSettings")
    $bstandard = GUICtrlCreateButton("standard", 360, 45, 80)
    GUISetOnEvent(-1, "_StandardSettings")
    $bexit = GUICtrlCreateButton("exit", 360, 115, 80)
    GUISetOnEvent(-1, "_ExitSettings")

    GUISetState(@SW_SHOW, $GuiSettings)

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

    While 1
    Sleep(100)
    WEnd

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

    Func _SaveSettings()
    IniWrite($ini, "Ping", "Intervall", GUICtrlRead($Iping))
    IniWrite($ini, "Window", "Weight", GUICtrlRead($Iw))
    IniWrite($ini, "Window", "Height", GUICtrlRead($Ih))
    $cornerTL = GUICtrlRead($TL)
    $cornerTR = GUICtrlRead($TR)
    $cornerBR = GUICtrlRead($BR)
    $cornerBL = GUICtrlRead($BL)
    If $cornerTL = 1 Then
    IniWrite($ini, "Position", "Corner", "1")
    ElseIf $cornerTR = 1 Then
    IniWrite($ini, "Position", "Corner", "2")
    ElseIf $cornerBR = 1 Then
    IniWrite($ini, "Position", "Corner", "3")
    ElseIf $cornerBL = 1 Then
    IniWrite($ini, "Position", "Corner", "4")
    EndIf
    EndFunc

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

    Func _StandardSettings()
    GUICtrlSetData($Iping, "4000")
    GUICtrlSetData($Iw, 150)
    GUICtrlSetData($Ih, 200)
    GUICtrlSetState($TL, 0)
    GUICtrlSetState($TR, 0)
    GUICtrlSetState($BR, 1)
    GUICtrlSetState($BL, 0)
    EndFunc

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

    Func _ExitSettings()
    GUISetState(@SW_HIDE, $GuiSettings)
    EndFunc

    [/autoit]
  • Prozess im Task Manager nicht anzeigen...

    • sc4ry
    • 12. Dezember 2007 um 14:48

    gibts tips, anregungen oder sowas *g*

  • Effekt bei Maus_über_Icon

    • sc4ry
    • 12. Dezember 2007 um 14:45

    hehe, danke oscar, bin eben auch damit konfrontiert worden, beim testen und hab es schon behoben =)

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™