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

Beiträge von i2c

  • GUISetEventMode und Verlassen einer Schleife

    • i2c
    • 5. Oktober 2010 um 11:55
    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    Opt("GUIOnEventMode", 1)
    Global $cButton[3]
    GUICreate("Test", 100, 200)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
    $cButton[0] = GUICtrlCreateButton("Button 1", 20, 20)
    GUICtrlSetOnEvent(-1, "_EventHandler")
    GUISetState()
    While 1
    Sleep(100)
    WEnd
    ; Wie komme ich jetzt nach dem Button hierher???

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

    Func _EventHandler()
    Switch @GUI_CtrlId
    Case $cButton[0]
    MsgBox(0, "", "Button 1 gedrückt")
    _Exit()
    EndSwitch
    EndFunc ;==>_EventHandler
    Func _Exit()
    Exit
    EndFunc ;==>_Exit

    [/autoit]
  • Denkfehler Array

    • i2c
    • 5. Oktober 2010 um 11:38
    Zitat von m-obi

    i2c: schau mal in zeile 19 (bei dir jetzt).


    Ahh ... dann braucht's wohl noch eine 5te Kanne Kaffee. :whistling:

  • Denkfehler Array

    • i2c
    • 5. Oktober 2010 um 11:23

    Ich kann grad nicht ganz folgen, weil ich nirgendwo etwas von FIleDelete() sehe.
    Deine Log Datei öffnest du aber im Modus 8+2. Modus 2 löscht den vorherigen Dateiinhalt vor dem schreiben. Mit Modus 8+1 wird an's Dateiende angehängt. Es ist auch nicht unbedingt nötig, die Datei innerhalb der FOR-Schleife immer wieder zu öffnen und zu schliessen.

    Spoiler anzeigen
    [autoit]

    $Log = "D:\test.log"
    Dim $aMSPdel
    Local $sReturnSize = '363725', $sSize
    $date = _NowCalcDate()
    $date = StringRegExpReplace($date, "(\d{4})\/(\d{2})\/(\d{2})", "$3.$2.$1")
    $dir = "d:\test\"
    $aMSPdel = _FileListToArray($dir, '*', 1)
    _ArrayDelete($aMSPdel, 0)
    $hfile = FileOpen($Log, 9)
    For $i = 0 To UBound($aMSPdel) - 1
    $sSize = FileGetSize($dir & $aMSPdel[$i])
    If Not @error Then
    If $sSize = $sReturnSize Then
    FileSetAttrib($dir & $aMSPdel[$i], "-RASH")
    FileWrite($hfile, "------------------------------------------------" & @CRLF)
    FileWrite($hfile, @ComputerName & " " & $date & @CRLF)
    FileWrite($hfile, "------------------------------------------------" & @CRLF)
    FileWrite($hfile, "Datei: " & $dir & $aMSPdel[$i] & " gelöscht." & @CRLF)
    FileDelete($dir & $aMSPdel[$i])
    FileWrite($hfile, "------------------------------------------------" & @CRLF)
    EndIf
    Else
    Exit
    EndIf
    Next
    FileClose($hfile)

    [/autoit]
  • RegEx Feld lesen

    • i2c
    • 5. Oktober 2010 um 09:58
    [autoit]

    StringRegExp($string, '(?i:name=")(.*?)"',3)

    [/autoit]
  • ListviewIntem Checkboxes auslesen

    • i2c
    • 4. Oktober 2010 um 18:17

    Ich würde das Ganze noch etwas umstellen.

    Spoiler anzeigen
    [autoit]

    #include <EditConstants.au3>
    #include <ButtonConstants.au3>
    #include <Constants.au3>
    #include <ProgressConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListviewConstants.au3>
    #include <WindowsConstants.au3>
    #include <GuiEdit.au3>
    #include <GuiListView.au3>

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

    Opt("mustdeclarevars", 1)
    Opt("GUIDataSeparatorChar", "?")
    Global $msg, $list, $process, $fixlist, $edit, $listlines, $i, $checklist, $fix

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

    GUICreate("Skripter", 1200, 700); GUI
    $list = GUICtrlCreateEdit("", 20, 85, 1160, 100, $ES_WANTRETURN + $WS_VSCROLL, $ES_NOHIDESEL + $ES_OEMCONVERT); Mehrzeiliges Inputfenster mit Scroll
    GUICtrlCreateLabel("Log hier", 40, 60, 100)
    $process = GUICtrlCreateButton("process", 50, 25, 80); Kopiert Log in die Listbox
    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_Close; Schließt das Gui
    ExitLoop
    Exit
    Case $msg = $process ; kopiert log in listview
    _copy()
    Case $msg = $fix
    _fix()
    EndSelect
    WEnd

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

    Func _copy()
    $listlines = _GUICtrlEdit_GetLineCount($list); Erfasst die Anzahl der Zeilen
    If $listlines >= 1 And _GUICtrlEdit_GetLine($list, 0) <> "" Then
    $fix = GUICtrlCreateButton("Erstelle Fix", 150, 25, 80); erstellt den Fixbutton
    $fixlist = GUICtrlCreateListView("fix ", 20, 200, 1160, 450)
    _GUICtrlListView_SetExtendedListViewStyle($fixlist, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_CHECKBOXES))
    For $i = 0 To $listlines - 1 Step 1 ; Schleife startet bei 0 und geht in 1er Schritten bis §listlines
    GUICtrlCreateListViewItem(_GUICtrlEdit_GetLine($list, $i), $fixlist) ;Packt die Zeile von $list an Position $i in die Listview als Listviewitem
    Next
    EndIf
    EndFunc ;==>_copy

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

    Func _fix()
    Local $text, $text_Alles
    For $i = 0 To _GUICtrlListView_GetItemCount($fixlist) - 1
    If _GUICtrlListView_GetItemChecked($fixlist, $i) = True Then
    $text = _GUICtrlListView_GetItemText($fixlist, $i)
    If $text_Alles = "" Then
    $text_Alles = $text
    Else
    $text_Alles &= @CRLF & $text
    EndIf
    EndIf
    Next
    ClipPut($text_Alles)
    ConsoleWrite($text_Alles)
    EndFunc ;==>_fix

    [/autoit]
  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 23:00

    Ich überspitze mal fleissig weiter...
    Wer zieht denn da die Grenze, und wo? Ab wann darf Politik nicht mehr regieren? Reichen 100 aufgebrachte Demonstranten, 1000 oder vlt. doch lieber 10.000?

    Dann könnten wir die Regierung doch abschaffen und uns einmal im Monat in Berlin treffen um gemeinschaftlich über die Vorgänge in unserem Land abzustimmen. Wozu Volksvertreter wählen und bezahlen wenn sie letztenendes doch nicht das tun dürfen, was ihrer Meinung nach das Beste ist?

    Es macht mich traurig das so viele Menschen, sei es aus Gewohnheit oder aus Frustration auf Grund der Gesammtlage, auf jeden fetzen Papier, jedes PDF anspringen in dem irgendwelche subjektiven Ansichten mit möglichst viel Beiwerk ausgeschmückt werden um sie als einzig wahre Wahrheit zu verkaufen.

    Was man selbst als unrecht empfindet, muss es noch lange nicht sein. Jede Medallie hat 2 Seiten.


    So langsam fängt es an mir Spass zu machen :)

  • Audio Visualization Collection

    • i2c
    • 2. Oktober 2010 um 18:27

    Die Qualität ist nicht unbedingt berauschend, meine Leitung gibt im Moment leider nicht mehr her.
    http://www.megavideo.com/?v=DULR8F17

    Ich find die übrigens Klasse. Wär schade wenn die nicht in irgendeinem Player ihren Platz finden.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 15:05

    Man muss nicht nach den Regeln der CDU spielen sondern nach den Regeln derer, die wir demokratisch ins Amt gewählt haben.

    Zitat von stayawayknight

    PS: Das wird hier so eine Debatte nach dem Motto: "Wer nicht mehr schreibt hat verloren"


    Nein, eigentlich nicht. Ich hör jetzt auch erstmal auf und wende mich meinem Tagesgeschäft zu. Zu einem Ergebnis werden wir hier sowieso nicht kommen, dafür müssen die Verantwortlichen in Stuttgart sorgen. Etwas mehr Entgegenkommen der Baugegner würde die Situation auf jeden Fall schneller in Richtung Lösung treiben. Aber da ja auf beiden Seiten Politiker stehen wird's ewig dauern bis etwas passiert. Und wenn's dann passiert wird's unweigerlich in einem Schwanzvergleich der Macht enden. Wir wählen dann beim nächsten mal die gloreichen Widerständler in hohe Ämter und beschweren uns ein, zwei Jahre später über den Mist den die dann verbocken.
    Demokratie ist was tolles und der Mensch ein Gewohnheitstier.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 14:33

    Ich möchte nicht wissen was jeder Tag Baustop für Kosten verursachen würde. Von den Kosten für die erzwungene Polizeipräsenz mal ganz zu schweigen.

    Würde man wirklich verhandeln wollen, dann würde man auf das Angebot eingehen, die Gespräche sofort aufnehmen und nicht noch weitere Tage und Wochen verschwenden. Mit dieser Verbohrtheit, unbedingt nach ihren Regeln spielen zu wollen forcieren die Gegner nur weitere Kosten. Und das alles auf Grund einer Vermutung.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 14:09

    Und was haben die Gegner gelernt? Zitat: "Das Aktionsbündnis gegen das Bahnprojekt lehnt Gesprächsangebote unter den gegebenen Bedingungen weiterhin ab. Nur, wenn ein Baustopp eingeleitet wird, wollen die Projektgegner reden."

    Demokratie bedeutet nicht, das sich der Staat uneingeschränkt dem Willen des Volkse beugen muss. Genua das wird hier aber vorausgesetzt.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 13:48

    Was wäre denn die Alternative zu einer Zwangsräumung gewesen? Stundenlange Diskusionen die ebenfalls zu nichts führen? Da hätte doch niemand das Feld geräumt nur weil ein Polizist lieb "bitte, bitte" sagt.

    Zitat

    Die Polizei fing mit Gewalt an, nicht die Demonstranten.


    Woher nimmst du diese Gewissheit? Aus den Videos die so treffende Momentaufnahmen zeigen? Aus den völlig glaubwürdigen Zeugenaussagen? Ich hab Bilder gesehen, auf der eine Frau einen Polizisten aus heiterem Himmel wegschubst. Setzt sich der Beamte dagegen zur Wehr gibt's den seltsamen Effekt der Rudelbildung. Da stürtzen dann umstehende Demonstranten plötzlich auf die Einsatzkräft ein. Ein ziemlich kräftig aussehender Herr geht auf eine Polizistin los. Niemanden interessiert die Tatsache, das es sich hier um eine Frau handelt aber das dem Herrn im Handgemenge die Brille runterfällt ... auauau, das darf nicht sein. Friedlich ist für mich anders.

    Zitat

    Und solang niemand bereit ist auf die Interessen der andenr Seite einzugehen, wird das genauso weitergehen. [...]das ist doch so auf die Dauer keine Lösung?


    Das seh ich ja genauso. Aber dann sollte man vlt. zuerst einmal aufhören, die Aufbegehrenden als harmlose Opfer darzustellen.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 13:21

    Etwas drastisch ausgedrückt, zugegeben. Ich will damit nicht sagen, das die Staatsgewalt da einen Freibrief zum prügeln hat aber wer sich einer Maßnahme widersetzt muss halt damit leben das er auch mal härter angefasst wird. Dessen sollte man sich eigentlich vorher bewusst sein.

    Man könnte ja beinahe unterstellen das einige es bewusst darauf ankommen lassen.

  • Standby und/oder Hybernate feststellen/überwachen

    • i2c
    • 2. Oktober 2010 um 12:50

    Aus der Beispielkiste. Ungetestet.

    [autoit]

    Dim $host = "localhost"
    $Object = ObjGet("winmgmts:\\" & $host & "\root\cimv2")
    $event = $Object.ExecNotificationQuery("Select * from Win32_PowerManagementEvent")
    $return = $event.NextEvent.EventType

    [/autoit]


    Beim Wechsel in den Standby nimmt $return den Wert 4 an, beim Aufwecken 7.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 12:25

    Es geht mir einfach darum, das Demonstranten heutzutage scheinbar meinen das sie automatisch im Recht sind und davon ausgehen, das sich ihnen niemand in den Weg stellt. Das dort die Fortsetzung der Arbeiten durchgesetzt wird war doch klar und meiner Meinung nach auch gerechtfertigt. Es war ebend keine friedliche Demonstration sondern eine Blockade. Lassen wir Kastortransporte in Zukunft auch auf den Gleisen stehen nur weil irgendjemand denkt, er müsste sich an die Schienen ketten?

    Mich pisst nicht an, das da demonstriert wird sondern die Art und Weise wie es gemacht wird und vor allem, wie die Konsequenzen ausgeschlachetet und Tatsachen verdreht werden. Wegen mir brauchten die den Bahnhof auch nicht bauen aber diese Situation jetzt zu nutzen um den Niedergang der Demokratie und den Wechsel in einen Polizeistaat zu prophezeien ist absolut lächerlich. Und genau das wird im Moment an allen Ecken und Enden getan.

  • Stuttgart 21

    • i2c
    • 2. Oktober 2010 um 01:31

    Ich muss mich jetzt auch mal zu dem Thema erbrechen. Der Text wird warscheinlich wirr und unübersichtlich aber ich koche ....

    Bei allem Respekt, die Leute die dort hingehen um den Park zu blockieren brauchen sich nicht über irgendwelche Ungerechtigkeiten zu beschweren. Wer sich einer Hundertschaft entgegenstellt muss damit rechnen auf die Fresse zu bekommen. Wer sich demonstrativ dem Strahl des Wasserwerfers zuwendet braucht sich nicht zu beschweren wenn er nass oder gar verletzt wird. Eine friedliche Demonstration hätte sicherlich vor einem Regierungsgebäude stattfinden könne aber das, was da abging war doch mehr eine Blockade. Es wurden Arbeiten behindert und die Polizei hat das Gelände geräumt. Wer sich dem widersetzt muss mit den Konsequenzen leben. Was haben die denn gedacht was da passiert? Ein Happy End ala' Hollywood in dem sich die EInsatzkräfte in die Reihen der Demonstranten eingliedern um dann gemeinsam gegen die tyrannische Regierung vorzugehen?

    Um diesen Bahnhof entsteht im Moment ein Hype der zeigt, wie viele naive, realitätsfremde Menschen in unserem Land leben. Wer kann denn bitteschön wirklich glauben das Projekt würde jetzt noch gestoppt werden wegen ein paar Demos. Das ist lächerlich. Jahrelang kriegen sie ihren Arsch nicht hoch und jetzt, wo die Bohnensuppe anbrennt wollen sie noch schnell umrühren. Die Medien kochen auch schön mit weil das Thema ja grad jeden interessiert. Wo waren die denn eigentlich die ganze Zeit? Ehrlich gesagt hab ich bis vor ein paar Wochen noch nichtmal etwas von diesem Milliardengrab gewusst. Warum schimpft denn jetzt niemand auf die bösen Medien die uns nicht ausgiebig über diesen Molloch aus Koruption und Lügen informiert haben?

    Und dann dieses ganze "jaja, was ist nur aus der Demokratie geworden" Gejammere. Sie ist noch da, macht die Augen auf. Wer hat die Verantwortlichen denn ins Amt gewählt? Demokratie bedeutet nicht, das jede Entscheidung zuerst mit dem Volk besprochen wird.

    Aber weil man ja alles besser machen würde könnte man die Politiker ja auf die Strasse jagen und steinigen. Recht so. So eine Anarchie ist ja auch was feines und steinigen geht schnell. Da muss man nicht viel für tun, die Bewegunng kostet je nach Grösse des Steins auch nicht unbedingt viel Kraft. Also die optimale Problemlösung für unsere Teilzeitrevolutionäre. Und wenn dann alle gesteinigt sind, lehnen wir uns wieder in unserem Sessel zurück und warten bis es wieder etwas gibt über das wir uns aufregen können.

    Nachtrag:
    Wenn's in Stuttgart vorbei ist könnte man ja mal für die Abschaffung von Friedhofsmauern demonstrieren. Denn die sind wirklich überflüssig. Freiwillig will da niemand rein und diejenigen die drinn sind können sowieso nicht raus. Aber vorsicht! Da hat die korrupte Maurergilde ihre Finger im Spiel. Die sitzen in Sachen Steine direkt an der Quelle.

  • 2 Comboboxen, Inhalt je nachdem verändern

    • i2c
    • 30. September 2010 um 15:42

    Und das Skript findet man wo?

  • 2 Comboboxen, Inhalt je nachdem verändern

    • i2c
    • 30. September 2010 um 15:27

    GUICtrlRead(), GUICtrlSetData()

    [autoit]

    If GUICtrlRead($Combo1) = "bla" then
    GuiCtrlSetdata($Combo2, "")
    GuiCtrlSetdata($Combo2, "blub|blubber")
    elseif GUICtrlRead($Combo1) = "blu" then
    GuiCtrlSetdata($Combo2, "")
    GuiCtrlSetdata($Combo2, "blabub|blub")
    endif

    [/autoit]
  • Msgbox Problem

    • i2c
    • 30. September 2010 um 15:22
    [autoit]


    $Meldung = MsgBox(4, "Weiter", "Automatisch zu Meldung 6", 5)
    If $Meldung = 7 Then
    MsgBox(4096, "Ja", "Weiter", 2)
    Else
    MsgBox(4096, "Nein...", "Weiter...", 2)
    EndIf

    [/autoit]
  • Free-Coding.de Code-Bausteine, Sktipte Archiv, Projekte

    • i2c
    • 29. September 2010 um 01:12

    Hallo Chris,

    auf den ersten Blick ganz nett. WCF als Unterbau gefällt mir sehr. Das Archiv ist eine leicht abgewandelte Community Filebase?

    Nach meinem Empfinden fehlt's noch an der nötigen Übersicht. Das Archiv ist ja ganz ok aber die rein alphabetische Sortierung halte ich ehrlich gesagt für suboptimal. Möchte ich ein "Hallo Welt" in PHP finden, weiss ich nicht wo ich suchen soll. Unter H wie Hallo ode doch lieber unter E wie "Ein Hallo Welt Skript". Man kann natürlich die Suchfunktion benutzen aber dann braucht's diese unschöne Sortierung erst recht nicht.

    Bei den Kategorien im Archiv wird bei mir "PHP-MYSQL" und "C++" jeweils in eine zweite Zeile umgebrochen und ragt in die Sortierung. Die Legende ist ebenfalls ziemlich durcheinander. DIe eher weniger sinnvollen Testeinträge in den "Projektideen" hätte man vor der Veröffentlichung löschen können. Diese "Juhu, ein Kommentar"-Beiträge und Smilie-Gewitter hinterlassen einen unprofessionellen Eindruck.

    Auf jeden Fall viel Glück und vor allem Spass damit!

    Nachtrag:
    In der Teaserbox

    • "für alle Programmiersprachen" <- Das ist irreführend. Versprich auf der Startseite nichts, was dein Content nicht hergibt.
    • "Anwendugn erstellen und optimieren" <- kleiner Tipfehler
  • Berechnung Listview - Arrays

    • i2c
    • 28. September 2010 um 15:21
    [autoit]

    Case $ok
    GUICtrlSetState($Jahr, $GUI_DISABLE)
    GUICtrlSetState($Monat, $GUI_DISABLE)
    GUICtrlSetState($Tag, $GUI_DISABLE)
    GUICtrlSetState($ok, $GUI_DISABLE)
    GUICtrlSetState($enable, $GUI_ENABLE)
    $checkthebutton = "0"
    If FileExists(@ScriptDir & "\Daten\" & GUICtrlRead($Jahr) & "\" & GUICtrlRead($Monat) & "\" & GUICtrlRead($Monat) & ".txt") Then
    MsgBox(0, "", "")
    EndIf

    [/autoit]

    Leg die Daten besser im .ini Format ab.Eine .ini pro Tag. Die kannst du dann einfach mit IniReadSection() auslesen und mit _GUICtrlListView_AddArray() ins Listview bringen.

    edit: Eine SQLite Datenbank würde sich hierfür natürlich geradezu anbieten :)

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™