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

Beiträge von Schnuffel

  • Installer

    • Schnuffel
    • 11. Oktober 2010 um 21:22

    ich denke, du solltest Dein Konzept nochmal überdenken.

    Entweder hast Du ein Programm mit vielen Dateien und Registry-Einträgen.
    Dann würde sich ein Installer anbieten. Von mir aus auch ein selbst geschriebener.

    Oder Du hast "nur" ein Programm, dass Du auf einem PC "lizenzieren" willst.
    Damit hast Du ganz andere Anforderungen an das Script.

  • Buttons farblich kennzeichnen

    • Schnuffel
    • 11. Oktober 2010 um 21:17

    Beispiel:

    Spoiler anzeigen
    [autoit]

    Local $aArray[10][2]
    $hGUI = GUICreate("")

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

    For $i = 0 To 9
    $aArray[$i][0] = GUICtrlCreateButton("Button " & $i + 1, 20, 20 + $i * 25, 200, 20)
    $aArray[$i][1] = True
    GUICtrlSetBkColor(-1,0x33FF33)
    Next

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

    $button = GUICtrlCreateButton('Status',100,300,200,40)

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

    GUISetState()

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    Case $aArray[0][0] To $aArray[9][0]
    $iIndex = $nMsg - $aArray[0][0]
    $aArray[$iIndex][1] = Not $aArray[$iIndex][1]
    If $aArray[$iIndex][1] Then
    GUICtrlSetBkColor($aArray[$iIndex][0],0x33FF33)
    Else
    GUICtrlSetBkColor($aArray[$iIndex][0],0xFF3333)
    EndIf
    Case $button
    Local $string = ''
    For $i = 0 To 9
    $string &= 'Der Button '&$i & ' ist ' & $aArray[$i][1] & @CRLF
    Next
    MsgBox(0, 'Status der Button:', $string)
    EndSwitch
    WEnd

    [/autoit]
  • Frage zu ProgressBar

    • Schnuffel
    • 11. Oktober 2010 um 19:48

    dann solltest Du das ganze unter Programmieranfragen einstellen
    und mit dem entsprechender Löhnung gibt es sowas sicher auch frei Haus ;)

  • nur einzelnes div einer seite anzeigen lassen #Closed

    • Schnuffel
    • 11. Oktober 2010 um 16:58

    ja dann gib uns halt eine Seite und dann schauen wir es uns an.
    Immer diese Theoretische Fragerei ...

  • nur einzelnes div einer seite anzeigen lassen #Closed

    • Schnuffel
    • 11. Oktober 2010 um 16:53

    ich denke ja,

    musst halt die Seite trennen (alles bis body, dein div-Container, und Endtag) und neu zusammenbauen.
    embedded IE sollta ja dann kein Problem mehr sein.

  • Wert in processbar anzeigen lassen

    • Schnuffel
    • 10. Oktober 2010 um 15:26

    dann pack alles in eine While Schleife ;)

  • Problem mit download

    • Schnuffel
    • 10. Oktober 2010 um 13:56

    da würde ich mich mal an den Support von Runes of Magic wenden ;)

  • Wert in processbar anzeigen lassen

    • Schnuffel
    • 10. Oktober 2010 um 13:53

    kein Problem :D

    wenn Du die Progress updaten willst, dann musst Du den Wert im Speicher auch immer wieder in einer Schleife abfragen
    vereinfacht:

    [autoit]

    While 1
    $Cukmh= _MEMORYREAD($kmh, $DLLINFO1)
    GUICtrlSetData($Progress1, ($Cukmh/$CuVmax)*100)
    WEnd

    [/autoit]


    und im Idealfall nur bei Änderung ein Update senden

    ;)

  • Wert in processbar anzeigen lassen

    • Schnuffel
    • 9. Oktober 2010 um 22:44

    wenn Du mir jetzt noch den Unterschied zwischen einer Processbar und einer Progressbar erklärst,
    dann sind wir wieder beieinander ;)

  • Wert in processbar anzeigen lassen

    • Schnuffel
    • 9. Oktober 2010 um 21:55

    Also so jetzt nicht :cursing:
    Hör mal gut zu.

    Du sagst Du hast ein Problem mit Progress und ich sehe nicht eine Zeile Deines Problems.
    Wenn Du der Meinung bist auf diese Art im engl. Forum besser "bedient" zu werden dann Ahoi.

    Schnuffel winkt

    PS:

    Zitat

    immer das gleiche mit ihm


    ich kann mich nicht Entsinnen mit Dir schon mal etwas zu Tun gehabt zu haben...

  • stringreplace mit mehreren strings Edit: Rechnung mit execute

    • Schnuffel
    • 9. Oktober 2010 um 20:59

    es wäre schön, wenn Du für künftige Support-Anfragen Deine Lösung posten würdest.
    Wir wollen ja auch nicht dumm sterben.

    PS: wenn Dein Problem gelöst ist bitte den Thread auf "gelöst" setzen
    Danke ;)

  • Große Projekte Schreiben

    • Schnuffel
    • 9. Oktober 2010 um 20:42

    für große Sachen nehme ich MindManager ...

  • stringreplace mit mehreren strings Edit: Rechnung mit execute

    • Schnuffel
    • 9. Oktober 2010 um 20:36

    okay :D
    den Satz verstehe ich trotzdem nicht ;)

    Zitat

    ok aber noch was ganz anderes wie kann ich wenn ich jetzt SEK durch *0,10733 ersetze den wert berechnen lassen

  • checkboxen in einer gui löschen

    • Schnuffel
    • 9. Oktober 2010 um 20:35

    Na dann musst Du mal Dein Konzept umdenken.
    Es ist nicht gut, wenn Du in einer Funktion eine While-Schleife hast.

    Außerdem würdest Du die Checkboxen jedesmal neu "aufbauen". Braucht es ja eigentlich auch nicht.

    Vielleicht kannst Du die gesamte Anzeige in eine Funktion packen und immer mit dem jeweiligen Array aufrufen...
    Der Rest ergibt sich dann aus der Anzahl an Elementen...

  • stringreplace mit mehreren strings Edit: Rechnung mit execute

    • Schnuffel
    • 9. Oktober 2010 um 20:18

    wenn Du uns verrätst, wieviel 0,10733 ist, können wir es auch umrechnen.....
    Sind das Std. Ticks, Mondjahre .....???

  • Welches Format?

    • Schnuffel
    • 9. Oktober 2010 um 20:13

    DivX

  • checkboxen in einer gui löschen

    • Schnuffel
    • 9. Oktober 2010 um 20:11

    Hallo,

    ich würde die GUI nicht in eine Funktion packen und da du auf die Checkboxen aus jeder Funktion zugreifen willst diese auch Global deklarieren.
    Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <GuiDateTimePicker.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <ComboConstants.au3>
    #include <DateTimeConstants.au3>
    #include <EditConstants.au3>
    #include <Excel.au3>
    #include <Array.au3>
    #include <File.au3>
    #include <GuiComboBox.au3>
    #include <Date.au3>
    #include <GuiListView.au3>
    #include <ListViewConstants.au3>
    #include <string.au3>
    ;#include <hotkeys.au3>
    #include <Misc.au3>
    ;#include <_ToolTipMouseExit.au3>
    #include <GuiEdit.au3>
    #include <GuiConstantsEx.au3>

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

    Opt("GUIOnEventMode", 1)

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

    $Form1 = GUICreate("Testgui", 746, 450, 258, 119)
    $Group2 = GUICtrlCreateGroup("Spalten Löschen für & $neulabel", 4, 30, 737, 338, BitOR($GUI_SS_DEFAULT_GROUP,$BS_LEFT))
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Radioeinaus1 = GUICtrlCreateRadio("testtabelle1", 305, 401, 89, 17, BitOR($GUI_SS_DEFAULT_RADIO,$BS_LEFT))
    $Radioeinaus2 = GUICtrlCreateRadio("testtabelle2", 403, 401, 73, 17, BitOR($GUI_SS_DEFAULT_RADIO,$BS_LEFT))
    $beenden = GUICtrlCreateButton("Beenden", 500, 395, 120, 25)

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

    GUISetState(@SW_SHOW)
    GUISetOnEvent($GUI_EVENT_CLOSE, "beenden")
    GUICtrlSetOnEvent($Radioeinaus1, "testtabelle1")
    GUICtrlSetOnEvent($Radioeinaus2, "testtabelle2")
    GUICtrlSetOnEvent($beenden, "beenden")
    Global $Checkbox[61]
    For $i = 1 To 60
    $top = 25 + ($i * 20)
    $left = 25
    If $top > 345 and $left = 25 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 200 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 375 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    If $top > 345 and $left = 550 Then
    $left = $left + 175
    $top = $top - 320
    EndIf
    $Checkbox[$i] = GUICtrlCreateCheckbox($i, $left, $top, 175, 17)
    GUICtrlSetState(-1,$GUI_HIDE)
    Next
    While 1
    Sleep(50)
    WEnd

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

    Func testtabelle1()
    $Open = FileOpenDialog("",@ScriptDir,"(test1.xls)")
    $oExcel = _ExcelBookOpen($Open)
    $Spalten = $oExcel.Worksheets(1).UsedRange.Columns.Count
    $Spalten = $Spalten+2
    Dim $aArray[$Spalten]
    For $i = 1 To UBound($aArray) -1
    $aArray[$i] = _ExcelReadArray($oExcel, 1, $i, 1, 1)
    _ArrayToClip($aArray[$i])
    $ddd = (ClipGet())
    IniWrite(@ScriptDir & "\test.ini", "Zeile1", $ddd, "")
    Next
    _ExcelBookClose($oExcel)

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

    $var = IniReadSection( @ScriptDir & "\test.ini", "Zeile1")
    If @error Then
    MsgBox(4096, "", "Es ist ein Fehler aufgetreten. Warscheinlich keine INI Datei vorhanden.")
    Else

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

    For $i = 1 To $var[0][0]-1
    GUICtrlSetData($Checkbox[$i],$var[$i][0])
    GUICtrlSetState($Checkbox[$i],$GUI_SHOW)
    Next
    For $i = $var[0][0] To 60
    GUICtrlSetData($Checkbox[$i],'')
    GUICtrlSetState($Checkbox[$i], $GUI_HIDE)
    Next

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

    EndIf

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

    EndFunc;==>testtabelle1

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

    Func testtabelle2()
    $Open = FileOpenDialog("",@ScriptDir,"(test2.xls)")
    $oExcel = _ExcelBookOpen($Open)
    $Spalten = $oExcel.Worksheets(1).UsedRange.Columns.Count
    $Spalten = $Spalten+2
    Dim $aArray[$Spalten]
    For $i = 1 To UBound($aArray) -1
    $aArray[$i] = _ExcelReadArray($oExcel, 1, $i, 1, 1)
    _ArrayToClip($aArray[$i])
    $ddd = (ClipGet())
    IniWrite(@ScriptDir & "\test.ini", "Zeile2", $ddd, "")
    Next
    _ExcelBookClose($oExcel)
    $var = IniReadSection( @ScriptDir & "\test.ini", "Zeile2")
    If @error Then
    MsgBox(4096, "", "Es ist ein Fehler aufgetreten. Warscheinlich keine INI Datei vorhanden.")
    Else

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

    For $i = 1 To $var[0][0]-1
    GUICtrlSetData($Checkbox[$i],$var[$i][0])
    GUICtrlSetState(-1,$GUI_SHOW)
    Next
    For $i = $var[0][0] To 60
    GUICtrlSetData($Checkbox[$i],'')
    GUICtrlSetState($Checkbox[$i], $GUI_HIDE)
    Next
    EndIf
    EndFunc;==>testtabelle2

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

    Func beenden()
    Exit
    EndFunc;==>beenden

    [/autoit]
  • Problem mit Array in String umwandeln

    • Schnuffel
    • 9. Oktober 2010 um 19:02

    Dein Script hat ein Problem mit dem <i> und dem </i>

    versuch mal so:
    ist aber eigentliuch suboptimal...

    [autoit]

    #include <Array.au3>
    #include <String.au3>
    $lyricurl = InetRead ("http://lyrics.wikia.com/E_Nomine:Mitternacht")
    ConsoleWrite('----------------------------------------------------------------------------------------------------------------' & @CRLF)

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

    $lyricode = _StringBetween(BinaryToString($lyricurl),"alt='phone' width='16' height='17'/></a></div>","<!--")

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

    $lyricode = StringReplace($lyricode[0], "<br />", "<br />;")
    $lyricode = StringReplace($lyricode, "<i>", "")
    $lyricode = StringReplace($lyricode, "</i>", "")
    $lyricode = StringReplace($lyricode, "&#", "")
    $lyritext = StringSplit($lyricode, ";", 2)

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

    For $i = 0 To UBound($lyritext) - 1
    If $lyritext[$i] = "<br />" or $lyritext[$i] = "</i>" or $lyritext[$i] = "<i>" Then
    Else
    $lyritext[$i] = Chr($lyritext[$i])
    EndIf
    Next

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

    _ArrayDisplay($lyritext)
    $erg = _ArrayToString($lyritext, "")
    $erg = StringReplace($erg, "<br />", @CRLF)
    MsgBox(0, "", $erg)

    [/autoit]
  • Problem mit Array in String umwandeln

    • Schnuffel
    • 9. Oktober 2010 um 18:41

    mal ne blöde Frage:
    was ist der Unterschied zwischen den beiden Scripten.
    Ich komme mir vor wie beim Bilderrätsel--> such den Unterschied :rofl:

  • Wert in processbar anzeigen lassen

    • Schnuffel
    • 9. Oktober 2010 um 18:14

    na klar,
    und in jeder Anwendung sind an den gleichen Stellen im Speicher
    Daten mit denen deine Progress was anfangen kann. :rofl:

    Mal ganz davon abgesehen, dass ich von der Progress noch nichts gesehen hab ... ?(

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™