Beiträge von TheLuBu

du kannst nur nicht eine Funktion in einer Funktion deklarieren, das geht nicht

Func Erste()
Zweite()
EndFunc
Func Zweite()
Msgbox(0, "test", "Test")
EndFunc

geht, aber nicht

Func Erste()
Func Zweite()
Msgbox(0, "test", "Test")
EndFunc
Zweite()
EndFunc

Du kannst auch die Funktion _End mit den beiden Parametern ausstatten:

Func End($hSearchLVHandle, $hLVHandle)
;~ Save() ; wenn der vordere Kommentar entfernt wird, dann werden vor dem beenden noch die Daten gespeichert
_GUICtrlListView_UnRegisterSortCallBack($hSearchLVHandle) ; Sortierroutine wieder de-registrieren
_GUICtrlListView_UnRegisterSortCallBack($hLVHandle) ; Sortierroutine wieder de-registrieren
Exit ; Programm beenden
EndFunc ;==>End

und die dann in deinem Gui übergeben

Case $hGui ; Benutzer will das Hauptfenster schließen
If MsgBox(32 + 4, "Beenden", "Wollen sie das Programm wirklich beenden?") = 6 Then End($hSearchLVHandle, $hLVHandle) ; wenn ja, dann End-Funktion aufrufen

Die gesamte Fehlermeldung wäre praktisch

wenn da nur Warning steht, ist das kein Fehler sondern nur eine Warnung.
Wahrscheinlich, weil in der Funktion _Listenansicht() $hSearchLVHandle deklariert wird, aber auch in der Funktion _End() genutzt wird.
Sollte nun _end() als erstes aufgerufen werden, gibts nen error, weil die Variable ja noch nicht deklariert wurde

Da prüfst du doch schon auf den Parameter.

If $parameter[3] = "-s" Then ;wenn das Programm mit -s aufgerufen wurde
If Not StringIsDigit($array[$spalte]) Then ;wenn der String keine Zahl ist
ProcessClose("notepad.exe")
Exit
EndIf
If Not StringLen($array[$spalte]) = 6 Then ;wenn der String nicht 6 Zeichen hat
ProcessClose("notepad.exe")
Exit
EndIf
Else ; wenn etwas anderes als -s dort steht dann
MsgBox(0, "Fehler", "Fehler")
EndIf

--EDIT--
Oder meinst du das wenn mit $cmdlineraw nur 2 parameter übergeben werden, das dann was anderes passieren soll?

Aus der Hilfe zu GUICtrlCreateList,
schau dir mal den Style parameter an

[optional] Legt den Stil des Controls fest. Siehe Anhang GUI-Stile für Controls.

Standard ( -1) : $LBS_SORT, $WS_BORDER, $WS_VSCROLL
Erzwungene Stile : $WS_TABSTOP, $LBS_NOTIFY

2 sekunden in der AutoitHilfe
such mal nach "ie formular"

du kannst auch das Makro in der Schleife überprüfen lassen

@HotKeyPressed

Bei

_ispressed("1B")

hab ich immer das gefühl, das man die Taste gedrückt halten muss, @HotKeyPressed ist aber eine gespeicherte Variable, also kann man die immer am Anfang oder Ende der Schleife überprüfen lassen

schau dir mal die IE.au3 an, damit kannst du Daten in Formulare eingeben.
Ansonsten kannst du auch mit Tasten, also Tab etc. und

Send

arbeiten

Schau dir mal die hilfe zu FileOpen an, du hast als letzten Parameter 0 da stehen

#include <File.au3>
$sSource = FileOpen(@ScriptDir & "\test2.txt", 0)
;Msgbox(0,"",$sSource)
$sSource = FileRead($sSource)
FileClose($sSource)
$rep = StringReplace($sSource, "Hier stehen die Zeichen die im Forum leider nicht gezeigt werden", " ")
_FileCreate(@ScriptDir & "\test3.txt")
$hFile = FileOpen(@ScriptDir & "\test3.txt", 2)
FileWrite($hFile , $rep)
FileClose($hFile)

ich würde es mit Stringreplace versuchen,

Stringreplace($String,"& # 1 6 0 ;", "")

DU benutzt mehrmals die selbe Variable $sSource

$sSource = FileOpen(@ScriptDir & "\test.txt", 0)
$sSource2 = FileRead($sSource)
$rep = StringReplace($sSource2, "DOCTYPE html", "Das ist der neue Text")
FileClose($sSource)

Und das was du ersetzt hast, speicherst du ja nirgends wieder ab

FileWrite($sSource, $rep)

Naja also dein Script hält an, weil du es ihm gesagt hast
mit der MsgBox bleibt dein Script stehen und macht erst weiter, wenn die box geschlossen ist.
Habe es grade bei mir getestet und bei mir klappt es, jedesmal wenn ich ne neue Seite aufmache kommt die Msgbox

Case $GUI_EVENT_CLOSE
GUIDelete($Form1)
Return SetError(1,0,0)

Damit wird die Funktion verlassen mit dem Fehlercode 1, schau dir mal SetError an, wenn du irgendwas danach prüfen willst

das war nur ein Beispielcode, du müsstest die Pfade noch anpassen.

_FileWriteFromArray($dRives[$iA] & "\testfilejpg.txt", $jpgArray)
_FileWriteFromArray($dRives[$iA] & "\testfilerar.txt", $rarArray)
_FileWriteFromArray($dRives[$iA] & "\testfilemp3.txt", $mp3Array)

Du könntest das Array mit einer Schleife durchlaufen und nur die Dateien, die du willst, in ein neues Array schreiben.

Local $mp3Array [500000]
Local $mp3cnt = 0
Local $rarArray [500000]
Local $rarcnt = 0
Local $jpgArray [500000]
Local $jpgcnt = 0

For $i = 0 To UBound($dRives2) - 1
If StringInStr($dRives2[$i], ".jpg") Then
$jpgArray[$jpgcnt] = $dRives2[$i]
$jpgcnt += 1
Elseif StringInStr($dRives2[$i], ".mp3") Then
$mp3Array[$mp3cnt] = $dRives2[$i]
$mp3cnt += 1
Elseif StringInStr($dRives2[$i], ".rar") Then
$rarArray[$rarcnt] = $dRives2[$i]
$rarcnt += 1
EndIf
Next
ReDim $jpgArray[$jpgcnt + 1]
ReDim $rarArray[$rarcnt + 1]
ReDim $mp3Array[$mp3cnt + 1]
_FileWriteFromArray("C:\testfilejpg.txt", $jpgArray)
_FileWriteFromArray("C:\testfilerar.txt", $rarArray)
_FileWriteFromArray("C:\testfilemp3.txt", $mp3Array)

das ganze in deine _FileListCreate Funktion setzen

Mir fallen 3 Möglichkeiten ein,
entweder gesamte Inidatei entschlüsseln und dann auslesen,
oder Zeile für Zeile entschlüsseln und ab dem ersten Anfangsdatum bis zum ersten Datum nach der Endzeit zählen.

DIe dritte Möglichkeit wäre nicht verschlüsselt nochmals das Datum schrieben und die nächste Zeile dann verschlüsseln

Wenn du die Dimensionen kennst dann gehts auch so

Func _clearApplicationIniArrayEditor()
$RunningApplicationPatchData = 0
Dim $RunningApplicationPatchData[149][49]
EndFunc

Wenn du die Dimensionen nicht kennst übergib einfach Parameter mit

Func _clearApplicationIniArrayEditor($UBoundy, $UBoundx)
$RunningApplicationPatchData = 0
Dim $RunningApplicationPatchData[$UBoundy][$UBoundx]
EndFunc

[/autoit]

An sich ist alles möglich

Wenn du das Projekt starten willst, könnte ich mich um die Karten und Aktionen kümmern,
Leider hab ich keine Ahnung von GDI+ und nur recht wenig von TCP,
aber ich denke schon, das es machbar ist.

Überlegung wäre aber eine Copywright verletzung
Ansonsten wäre ich dabei ;D

-EDIT-

Vielleicht wäre es einfacher, erstmal einen "Singleplayer" mit einer einfachen KI zu basteln, wenn es dann läuft, um den MP kümmern

ansonsten such mal nach RMChart.au3,
damit kann man auch relativ einfach Graphen erstellen
Von Progandy
http://progandy.de/downloads/view.download/3/8

Dann ist kein HTML Inhalt vorhanden.
ERstell mal eine kleine HTML - Email und speicher sie als MSG datei ab, öffne sie und die HTML Daten sollten drin sein ( grade bei mir mit Outlook 2010 getestet)