Mit fileread kannst du eine Datei auslesen.
Beiträge von chip
-
-
Hi,
ich habe folgendes simples Script:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 1056, 743, 190, 126)$planeten = GUICtrlCreateListView("Spalte1 |Spalte2|Spalte3", 0, 120, 865, 591)
[/autoit] [autoit][/autoit] [autoit]
$item2 = GUICtrlCreateListViewItem("Eintrag1||Spalte13", $planeten)
$item3 = GUICtrlCreateListViewItem("Eintrag3||Spalte33", $planeten)
GUICtrlSetData($item2, "|hallo|")GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit]
WEndGibt es eine Möglichkeit den Text der mit GUICtrlSetData in das Listviewitem ($item2) eingefügt mit z.b. roter Textfarbe (nicht HIntergrundfarbe) einzutragen? Aber auch so, dass die andere Werte in der Zeile nicht in der Farbe verändert werden.
Es gab zwar mal Script von BugFIx das genau dies gemacht hat, funktioniert allerdings nichtmehr: ListView - SubItem einzeln färben/formatieren, Finale Version!
-
Es geht darum die Wegfindung zu machen und nicht ein Design. Das Script oben ist simpel und für jeden einfach umsetzbar, von daher kein GDI+, keine Grafiken und sonst kein unnötiger schnickschnack. Man hat ja bei der Schach-Engine gesehen was unnötiges drumherrum bewirkt.
-
Da die µitLight ja mehr oder minder tot ist, starte ich mal eine kleine Wettbewerb.
Die Aufgabe ist es einen Block durch eine "Welt" von einem Start zu einem Zielpunkt selbstständig navigieren zu lassen. Die Welt generiert sich bei jedem starten des Scriptes neu mit unterschiedlicher Anzahl und größe der Hindernisse. Die Generierung der Welt mit Start und Zielpunkt sowie die Bewegungsrichtungen (hoch, runter, links, rechts) habe ich schon Vorgegeben.
Dir Prüfungs zu Kollisionsvermeidung mit einem Hinterniss, das erkennen ob man am Ziel angelangt ist und die Prüfung ob es überhaupt ein Weg zum Ziel gibt müsst ihr noch machen. Es ist duchaus beabsichtigt, das Hinternisse sich überschneiden oder auch mal das Ziel über eim Hinterniss liegt und dadurch nicht erreichbar ist.
Hier das Codegrundgerüst mit einem kleinen Beispiel darin:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit];~ ÄNDERUNGEN NUR IM MARKIEREN BEREICH
[/autoit] [autoit][/autoit] [autoit]$Form = GUICreate("Form1", 600, 600, 192, 124)
[/autoit] [autoit][/autoit] [autoit]Dim $wallArray[1][5]
[/autoit] [autoit][/autoit] [autoit]For $i = 0 To Random(20, 30, 1) Step 1
[/autoit] [autoit][/autoit] [autoit]
ReDim $wallArray[$i + 1][5]
$wallArray[$i][3] = Random(25, 50, 1) ;- Breite
$wallArray[$i][4] = Random(25, 50, 1) ;- Höhe
$wallArray[$i][1] = Random(0, (600 - $wallArray[$i][3]), 1) ;- Abstand von links
$wallArray[$i][2] = Random(0, (600 - $wallArray[$i][4]), 1) ;- Abstand von oben
$wallArray[$i][0] = GUICtrlCreateButton("", $wallArray[$i][1], $wallArray[$i][2], $wallArray[$i][3], $wallArray[$i][4])
Next$positionen = Random(0, 575, 1)
[/autoit] [autoit][/autoit] [autoit]Dim $player[1][5]
[/autoit] [autoit][/autoit] [autoit]
$player[0][3] = 25 ;- Breite
$player[0][4] = 25 ;- Höhe
$player[0][1] = 0 ;- Abstand von links
$player[0][2] = $positionen ;- Abstand von oben
$player[0][0] = GUICtrlCreateButton("P", 0, $positionen, 25, 25)Dim $ziel[1][5]
[/autoit] [autoit][/autoit] [autoit]
$ziel[0][3] = 25 ;- Breite
$ziel[0][4] = 25 ;- Höhe
$ziel[0][1] = 575 ;- Abstand von links
$ziel[0][2] = 575 - $positionen ;- Abstand von oben
$ziel[0][0] = GUICtrlCreateButton("Z", 575, 575 - $positionen, 25, 25)Func move($richtung, $schritte)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Switch $richtung
Case "hoch"
For $i = 1 To $schritte Step 1
sleep(50)
$player[0][2] = $player[0][2] - 1
GUICtrlSetPos($player[0][0], $player[0][1], $player[0][2])
Next
Case "runter"
For $i = 1 To $schritte Step 1
sleep(50)
$player[0][2] = $player[0][2] + 1
GUICtrlSetPos($player[0][0], $player[0][1], $player[0][2])
Next
Case "links"
For $i = 1 To $schritte Step 1
sleep(50)
$player[0][1] = $player[0][1] - 1
GUICtrlSetPos($player[0][0], $player[0][1], $player[0][2])
Next
Case "rechts"
For $i = 1 To $schritte Step 1
sleep(50)
$player[0][1] = $player[0][1] + 1
GUICtrlSetPos($player[0][0], $player[0][1], $player[0][2])
Next
EndSwitch
EndFunc ;==>moveGUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
sleep(2000)
;~ ÄNDERUNGEN NUR IM MARKIEREN BEREICH;~ HIER CODE EINFÜGEN
[/autoit] [autoit][/autoit] [autoit]move("hoch", 20)
[/autoit] [autoit][/autoit] [autoit]
move("rechts", 50)
move("runter", 30)
move("links", 40);~ HIER CODE EINFÜGEN
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];~ ÄNDERUNGEN NUR IM MARKIEREN BEREICH
[/autoit] [autoit][/autoit] [autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit]
WEnd
;~ ÄNDERUNGEN NUR IM MARKIEREN BEREICHInformationen die ihr sonst noch direkt aus der Vorlage vekommt:
$wallArray[x][5] = Behinhaltet Informationen der Hinternisse: Control-ID, Abstand von links, Abstand von Oben, Breite, Höhe
$player[x][5] = Behinhaltet Informationen des Spielerblocks: Control-ID, Abstand von links, Abstand von Oben, Breite, Höhe
$zil[x][5] = Behinhaltet Informationen der Zielblocks: Control-ID, Abstand von links, Abstand von Oben, Breite, Höhe
Funktion move($richtung, $schritte) =$richtung: hoch, runter, links, rechts $schritte = Schritt welche in die jeweilige Richtung gemacht werden sollen.Bewertet werden foglende Punkte:
- Schritte die gebraucht werden vom Start zum Ziel
- Geamte Laufzeit des Scripte einschließlich aller Berechnungen
- Logik des Scriptes, also ob z.b. unnötige Umwege gemacht werdenZu Auswertung werden drei statische Welten vorab generier über die jede Einsendung dann getestet wird und für alle die gleichen Vorraussetzung zu haben.
Einsendeschluss ist der 07.08.2011
Also dan viel Spaß gabei
-
Da Carsten nun schon sehr lange inaktiv ist poste ich hier mal noch die aktuellste letzte Version von ihm die ich zum Testen von ihm erhalten hatte:
Spoiler anzeigen
[autoit]; Logitech G19 UDF
[/autoit] [autoit][/autoit] [autoit]
; Autor: Carsten Schneider aka Carsten8
; Datum: 24.07.2010
; Veröffentlichung: 31.07.2010; Diese UDF benötigt die AdvanceLcd (http://www.blitzforum.de/forum/viewtopic.php?p=362484) DLL
[/autoit] [autoit][/autoit] [autoit]
; sowie installierte Gerätetreiber. Das Copyright von AdvanceLcd besitzt ChristianK von blitzforum.de.#region Variablen
[/autoit] [autoit][/autoit] [autoit]
; #CONSTANTS# ===================================================================================================================
Global Const $LCD_OK = 0
Global Const $LCD_ERROR = 1
Global Const $LCD_ERROR_NOT_INITIALIZED = 2
Global Const $LCD_ERROR_INVALID_PARAMETER = 3
Global Const $LCD_ERROR_NOT_FOUND = 4Global Const $LCD_DEVICE_INVALID = -1
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_DEVICE_MONO = 1
Global Const $LCD_DEVICE_COLOR = 2Global Const $LCD_EVENT_CONFIGURE = 1
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_EVENT_BUTTON = 2Global Const $LCD_BUTTON_1 = 0x0001
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_BUTTON_2 = 0x0002
Global Const $LCD_BUTTON_3 = 0x0004
Global Const $LCD_BUTTON_4 = 0x0008Global Const $LCD_BUTTON_LEFT = 0x0100
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_BUTTON_RIGHT = 0x0200
Global Const $LCD_BUTTON_OK = 0x0400
Global Const $LCD_BUTTON_CANCEL = 0x0800
Global Const $LCD_BUTTON_UP = 0x1000
Global Const $LCD_BUTTON_DOWN = 0x2000
Global Const $LCD_BUTTON_MENU = 0x4000Global Const $LCD_PRIORITY_LOW = 1
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_PRIORITY_NORMAL = 2
Global Const $LCD_PRIORITY_HIGH = 3Global Const $LCD_COLOR_VISIBLE = 0xFFFFFF
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_COLOR_INVISIBLE = 0Global Const $LCD_FONT_DEFAULT = 0
[/autoit] [autoit][/autoit] [autoit]
Global Const $LCD_FONT_BOLD = 1
Global Const $LCD_FONT_ITALIC = 2
Global Const $LCD_FONT_UNDERLINE = 4
; ===============================================================================================================================; #VARIABLEN# ===================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
Global $dll = 0
Global $callback = -1
; ===============================================================================================================================
#endregion Variablen; #FUNKTIONEN# ==================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; LcdDeInitialize
; LcdInitialize
; LcdLastError
; LcdAppletActive
; LcdAppletEnabled
; LcdAppledOpened
; LcdButtonState
; LcdConfigState
; LcdCreateApplet
; LcdDeleteApplet
; LcdSelectDevice
; LcdSetEventHandler [INSTABIL]
; LcdSetPriority
; LcdUpdate
; LcdWaitActivation
; LcdClear
; LcdDrawLine
; LcdDrawOval
; LcdDrawRect
; LcdEnableAntiAlias
; LcdSetColor
; LcdSetLineWidth
; LcdSetRotation
; LcdSetTarget
; LcdCreatePixmap
; LcdDeletePixamp
; LcdDrawPixmap
; LcdDrawPixmapRect
; LcdLoadAnimPixmap
; LcdLoadPixmap
; LcdPixmapHeight
; LcdPixmapWidth
; LcdDeleteFont
; LcdDrawText
; LcdLoadFont
; LcdSetFont
; LcdStringHeight
; LcdStringWidth
; ===============================================================================================================================#region Library
[/autoit] [autoit][/autoit] [autoit]
; #FUNKTION# ====================================================================================================================
; Name ..........: LcdInitialize
; Beschreibung ..: Initialisiert AdvanceLcd
; Syntax ........: LcdInitialize([$sDLLPath = "advlcd.dll"])
; Parameter .....: $sDLLPath - Pfad zur advlcd.dll
; Rückgabewerte .: Erfolg - $LCD_OK
; Fehler - $LCD_ERROR
; Bemerkungen ...:
; Verwandt ......: LcdDeInitialize
; ===============================================================================================================================
Func LcdInitialize($sDLLPath = "advlcd.dll")
$dll = DllOpen($sDLLPath)
Local $ret = DllCall($dll, "int", "LcdInitialize")
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdInitialize; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdDeInitialize
; Beschreibung ..: Deinitialisiert AdvanceLcd
; Syntax ........: LcdDeInitialize()
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...: Vorher sollten alle Applets, Pixmaps etc. gelöscht werden.
; Verwandt ......: LcdInitialize
; ===============================================================================================================================
Func LcdDeInitialize()
If $callback <> -1 Then DllCallbackFree($callback)
Local $ret = DllCall($dll, "int", "LcdDeInitialize")
If @error Then Return SetError(1, @error, 0)
DllClose($dll)
Return $ret[0]
EndFunc ;==>LcdDeInitialize; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdLastError
; Beschreibung ..: Gibt den letzten aufgetretenen Fehler zurück.
; Syntax ........: LcdLastError()
; Parameter .....:
; Rückgabewerte .: $LCD_OK, $LCD_ERROR, $LCD_ERROR_NOT_INITIALIZED, $LCD_ERROR_INVALID_PARAMETER oder $LCD_ERROR_NOT_FOUND
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdLastError()
Local $ret = DllCall($dll, "int", "LcdLastError")
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdLastError
#endregion Library#region Applet
[/autoit] [autoit][/autoit] [autoit]
; #FUNKTION# ====================================================================================================================
; Name ..........: LcdAppletActive
; Beschreibung ..: Mischung aus LcdAppletEnabled und LcdAppletOpened (siehe Bemerkungen)
; Syntax ........: LcdAppletActive($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .: Aktiviert - True
; Deaktiviert - False
; Bemerkungen ...: Gibt nur True zurück, wenn sowohl LcdAppletEnabled als auch LcdAppletOpened True zurück gibt.
; Verwandt ......: LcdWaitActivation LcdAppletEnabled LcdAppletOpened
; ===============================================================================================================================
Func LcdAppletActive($hApplet)
Local $ret = DllCall($dll, "int", "LcdAppletActive", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdAppletActive; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdAppletEnabled
; Beschreibung ..: Prüft, ob ein Applet aktiviert ist.
; Syntax ........: LcdAppletEnabled($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .: Aktiviert - True
; Deaktiviert - False
; Bemerkungen ...:
; Verwandt ......: LcdAppletOpened LcdAppletActive
; ===============================================================================================================================
Func LcdAppletEnabled($hApplet)
Local $ret = DllCall($dll, "int", "LcdAppletEnabled", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdAppletEnabled; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdAppletOpened
; Beschreibung ..: Prüft, ob das Applet auf dem LCD angezeigt werden darf oder nicht.
; Syntax ........: LcdAppletOpened($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .: Aktiviert - True
; Deaktiviert - False
; Bemerkungen ...:
; Verwandt ......: LcdAppletEnabled LcdAppletActive
; ===============================================================================================================================
Func LcdAppletOpened($hApplet)
Local $ret = DllCall($dll, "int", "LcdAppletOpened", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdAppletOpened; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdButtonState
; Beschreibung ..: Ermittelt den Status eines Knopfes des LCDs.
; Syntax ........: LcdButtonState($hApplet, $iButton)
; Parameter .....: $hApplet - Das Handle des Applets
; $iButton - Die ID des Knopfes
; Rückgabewerte .:
; Bemerkungen ...: $iButton kann, je nach Gerätetyp, eine der folgenden Variablen sein:
; $LCD_BUTTON_1
; $LCD_BUTTON_2
; $LCD_BUTTON_3
; $LCD_BUTTON_4
;
; $LCD_BUTTON_LEFT
; $LCD_BUTTON_RIGHT
; $LCD_BUTTON_OK
; $LCD_BUTTON_CANCEL
; $LCD_BUTTON_UP
; $LCD_BUTTON_DOWN
; $LCD_BUTTON_MENU
; Verwandt ......: LcdConfigState
; ===============================================================================================================================
Func LcdButtonState($hApplet, $iButton)
Local $ret = DllCall($dll, "int", "LcdButtonState", "ptr", $hApplet, "int", $iButton)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdButtonState; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdConfigState
; Beschreibung ..: Prüft, ob der "Konfigurieren"-Button im LCD Manager gedrückt wurde.
; Syntax ........: LcdConfigState($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .: True, wenn der Button angeklickt wurde, ansonsten False.
; Bemerkungen ...:
; Verwandt ......: LcdButtonState
; ===============================================================================================================================
Func LcdConfigState($hApplet)
Local $ret = DllCall($dll, "int", "LcdConfigState", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdConfigState; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdCreateApplet
; Beschreibung ..: Erstellt ein Applet.
; Syntax ........: LcdCreateApplet($sName, [$iDevices = $LCD_DEVICE_COLOR, [$bConfigurable = 0, [$bAutostart = 0]]])
; Parameter .....: $sName - Der Name des Applets. Er wird später auf dem LCD und im LCD Manager angezeigt.
; $iDevices - Der Gerätetyp, der verwendet werden soll. Siehe Bemerkungen.
; $bConfigurable - Gibt an, ob der "Konfigurieren"-Button im LCD Manager anklickbar sein soll.
; $bAutostart - Gibt an, ob der LCD Manager das Applet automatisch starten kann.
; Rückgabewerte .: Erfolg - Ein Handle des Applets
; Bemerkungen ...: $iDevices kann entweder $LCD_DEVICE_MONO oder $LCD_DEVICE_COLOR sein. Wird beides verwendet, so muss
; bei späteren Aktionen das Gerät per LcdSelectDevice ausgewählt werden.
; Verwandt ......: LcdSelectDevice LcdDeleteApplet
; ===============================================================================================================================
Func LcdCreateApplet($sName, $iDevices = $LCD_DEVICE_COLOR, $bConfigurable = 0, $bAutostart = 0)
Local $ret = DllCall($dll, "ptr", "LcdCreateAppletW", "wstr", $sName, "int", $iDevices, "int", $bConfigurable, "int", $bAutostart)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdCreateApplet; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdDeleteApplet
; Beschreibung ..: Löscht ein Applet.
; Syntax ........: LcdDeleteApplet($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .:
; Bemerkungen ...: Sollte vor LcdDeInitialize aufgerufen werden.
; Verwandt ......: LcdCreateApplet LcdDeInitialize
; ===============================================================================================================================
Func LcdDeleteApplet($hApplet)
Local $ret = DllCall($dll, "int", "LcdDeleteApplet", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDeleteApplet; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdSelectDevice
; Beschreibung ..: Setzt ein Gerät als Ziel zukünftiger Aktionen.
; Syntax ........: LcdSelectDevice($hApplet, $iDevice)
; Parameter .....: $hApplet - Das Handle des Applets
; $iDevice - Der Gerätetyp des Geräts
; Rückgabewerte .:
; Bemerkungen ...: Nur benötigt für Funktionen, die Gerätespezifisch sind.
; Verwandt ......:
; ===============================================================================================================================
Func LcdSelectDevice($hApplet, $iDevice)
Local $ret = DllCall($dll, "int", "LcdSelectDevice", "ptr", $hApplet, "int", $iDevice)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSelectDevice; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdSetEventHandler
; Beschreibung ..: Legt eine Funktion als Eventhandler für ein Applet fest.
; Syntax ........: LcdSetEventHandler($hApplet, $EventHandler, [$hContext = 0])
; Parameter .....: $hApplet - Das Handle des Applets
; $EventHandler - Name der Funktion, die als Eventhandler dienen soll.
; $hContect -
; Rückgabewerte .:
; Bemerkungen ...: Die Funktion ist sehr instabil und kann zu Abstürzen des Scripts führen.
; Die Funktion muss immer folgende Parameter besitzen:
; _BeispielCallback($iEvent, $hContext, $iData)
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetEventHandler($hApplet, $EventHandler, $hContext = 0)
If $callback <> -1 Then DllCallbackFree($callback)
$callback = DllCallbackRegister($EventHandler, "int", "int;ptr;int")
Local $ret = DllCall($dll, "int", "LcdSetEventHandler", "ptr", $hApplet, "ptr", DllCallbackGetPtr($callback), "ptr", $hContext)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetEventHandler; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdSetPriority
; Beschreibung ..: Setzt die Anzeigepriorität und den Vordergrundstatus eines Applets.
; Syntax ........: LcdSetPriority($hApplet, $iPriority, $bForeground)
; Parameter .....: $hApplet - Das Handle des Applets
; $iPriority - Die zu setzende Priorität
; $bForeground - Der zu setzende Vordergrundstatus
; Rückgabewerte .:
; Bemerkungen ...: $iPriority kann eine der folgenden Variablen sein: $LCD_PRIORITY_LOW, $LCD_PRIORITY_NORMAL, $LCD_PRIORITY_HIGH
; Wenn $bForeground True ist, wird das Applet in den Vordergrund gerufen und ein eventuelles automatisches
; Durchwechseln der Applets wird deaktiviert. Wird $bForeground auf False gesetzt, wird das eventuelle
; automatische Durchwechseln fortgeführt.
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetPriority($hApplet, $iPriority, $bForeground)
Local $ret = DllCall($dll, "int", "LcdSetPriority", "ptr", $hApplet, "int", $iPriority, "int", $bForeground)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetPriority; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdUpdate
; Beschreibung ..: Aktualisiert das LCD und zeigt den aktuellen Buffer des Applets an.
; Syntax ........: LcdUpdate($hApplet, [$bSync = 0])
; Parameter .....: $hApplet - Das Handle des Applets
; $bSync - Gibt an, ob gewartet werden soll, bis der Buffer angezeigt wird, oder nicht.
; Rückgabewerte .:
; Bemerkungen ...: Wenn $bSync True ist, läuft das Script weiter, sobald der Inhalt des Buffers an den LCD Manger gesendet wurde.
; Wenn $bSync False ist, läuft das Script erst weiter, wenn der Inhalt des Buffers auf dem LCD angezeigt wird (ca. 30ms langsamer)
; Verwandt ......:
; ===============================================================================================================================
Func LcdUpdate($hApplet, $bSync = 0)
Local $ret = DllCall($dll, "int", "LcdUpdate", "ptr", $hApplet, "int", $bSync)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdUpdate; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdWaitActivation
; Beschreibung ..: Wartet, bis das Applet aktiviert wird.
; Syntax ........: LcdWaitActivation($hApplet)
; Parameter .....: $hApplet - Das Handle des Applets
; Rückgabewerte .:
; Bemerkungen ...: Siehe LcdAppletActive
; Verwandt ......: LcdAppletActive
; ===============================================================================================================================
Func LcdWaitActivation($hApplet)
Local $ret = DllCall($dll, "int", "LcdWaitActivation", "ptr", $hApplet)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdWaitActivation
#endregion Applet#region Graphics
[/autoit] [autoit][/autoit] [autoit]
; #FUNKTION# ====================================================================================================================
; Name ..........: LcdClear
; Beschreibung ..: Leert den Buffer des LCDs.
; Syntax ........: LcdClear($hApplet, [$iColor = 0x000000])
; Parameter .....: $hApplet - Das Handle des Applets
; $iColor - Die Farbe, mit der der Buffer überschrieben werden soll.
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdClear($hApplet, $iColor = 0x000000)
Local $ret = DllCall($dll, "int", "LcdClear", "ptr", $hApplet, "int", $iColor)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdClear; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdDrawLine
; Beschreibung ..:
; Syntax ........: LcdDrawLine($hApplet, $iX1, $iY1, $iX2, $iY2)
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDrawLine($hApplet, $iX1, $iY1, $iX2, $iY2)
Local $ret = DllCall($dll, "int", "LcdDrawLine", "ptr", $hApplet, "int", $iX1, "int", $iY1, "int", $iX2, "int", $iY2)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawLine; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDrawOval($hApplet, $iX, $iY, $iWidth, $iHeight, $bFill)
Local $ret = DllCall($dll, "int", "LcdDrawOval", "ptr", $hApplet, "int", $iX, "int", $iY, "int", $iWidth, "int", $iHeight, "int", $bFill)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawOval; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDrawRect($hApplet, $iX, $iY, $iWidth, $iHeight, $bFill)
Local $ret = DllCall($dll, "int", "LcdDrawRect", "ptr", $hApplet, "int", $iX, "int", $iY, "int", $iWidth, "int", $iHeight, "int", $bFill)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawRect; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdEnableAntiAlias($hApplet, $bEnable)
Local $ret = DllCall($dll, "int", "LcdEnableAntiAlias", "ptr", $hApplet, "int", $bEnable)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdEnableAntiAlias; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetColor($iColor)
Local $ret = DllCall($dll, "int", "LcdSetColor", "int", $iColor)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetColor; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetLineWidth($hApplet, $fWidth)
Local $ret = DllCall($dll, "int", "LcdSetLineWidth", "ptr", $hApplet, "float", $fWidth)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetLineWidth; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetRotation($hApplet, $fRotation, $iCenterX, $iCenterY)
Local $ret = DllCall($dll, "int", "LcdSetRotation", "ptr", $hApplet, "float", $fRotation, "int", $iCenterX, "int", $iCenterY)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetRotation; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdSetTarget
; Beschreibung ..: Setzt das aktuelle Renderziel.
; Syntax ........: LcdSetTarget($hApplet, $hPixmap)
; Parameter .....: $hApplet - Das Handle des Applets, dessen Renderziel gesetzt werden soll.
; $hPixmap - Ein Handle zu einer Pixmap, welche das Renderziel sein soll. Bemerkungen beachten!
; Rückgabewerte .:
; Bemerkungen ...: $hPixmap kann nur eine Pixmap sein, die mit LcdCreatePixmap erstellt wurde.
; 0 verwenden, um das Renderziel zurückzusetzen.
; Verwandt ......: LcdCreatePixmap
; ===============================================================================================================================
Func LcdSetTarget($hApplet, $hPixmap)
Local $ret = DllCall($dll, "int", "LcdSetTarget", "ptr", $hApplet, "ptr", $hPixmap)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetTarget
#endregion Graphics#region Pixmap
[/autoit] [autoit][/autoit] [autoit]
; #FUNKTION# ====================================================================================================================
; Name ..........: LcdCreatePixmap
; Beschreibung ..: Erstellt eine neue leere Pixmap
; Syntax ........: LcdCreatePixmap([$iWidth = 320, [$iHeight = 240, [$iDevice = $LCD_DEVICE_COLOR]]])
; Parameter .....: $iWidth - Breite der Pixmap
; $iHeight - Höhe der Pixmap
; $iDevice - Typ des Geräts, für das die Pixmap erstellt werden soll.
; Rückgabewerte .: Erfolg - Das Handle der Pixmap
; Bemerkungen ...:
; Verwandt ......: Lcd
; ===============================================================================================================================
Func LcdCreatePixmap($iWidth = 320, $iHeight = 240, $iDevice = $LCD_DEVICE_COLOR)
Local $ret = DllCall($dll, "ptr", "LcdCreatePixmap", "int", $iWidth, "int", $iHeight, "int", $iDevice)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdCreatePixmap; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdDeletePixmap
; Beschreibung ..: Löscht eine Pixmap
; Syntax ........: LcdDeletePixmap($hPixmap)
; Parameter .....: $hPixmap - Das Handle der Pixmap, die gelöscht werden soll.
; Rückgabewerte .:
; Bemerkungen ...: Sollte vor LcdDeInitialize aufgerufen werden.
; Verwandt ......: LcdCreatePixmap LcdLoadPixmap LcdDeInitialize
; ===============================================================================================================================
Func LcdDeletePixmap($hPixmap)
Local $ret = DllCall($dll, "int", "LcdDeletePixmap", "ptr", $hPixmap)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDeletePixmap; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdDrawPixmap
; Beschreibung ..: Zeichnet eine Pixmap in den Buffer eines Applets.
; Syntax ........: LcdDrawPixmap($hApplet, [$hPixmap, [$iX = 0, [$iY = 0, [$iFrame = 0]]]])
; Parameter .....: $hApplet - Das Applet, in dessen Buffer die Pixmap gezeichnet werden soll.
; $hPixmap - Die Pixmap, die gezeichnet werden soll.
; $iX - Die X-Koordinate, der oberen linken Ecke der Pixmap
; $iY - Die Y-Koordinate, der oberen linken Ecke der Pixmap
; $iFrame - Die Framezahl, sollte die Pixmap mit LcdLoadAnimPixmap erstellt worden sein.
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......: LcdLoadAnimPixmap
; ===============================================================================================================================
Func LcdDrawPixmap($hApplet, $hPixmap, $iX = 0, $iY = 0, $iFrame = 0)
Local $ret = DllCall($dll, "int", "LcdDrawPixmap", "ptr", $hApplet, "ptr", $hPixmap, "int", $iX, "int", $iY, "int", $iFrame)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawPixmap; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDrawPixmapRect($hApplet, $hPixmap, $iX, $iY, $iSX, $iSY, $iWidth, $iHeight, $iFrame)
Local $ret = DllCall($dll, "int", "LcdDrawPixmap", "ptr", $hApplet, "ptr", $hPixmap, "int", $iX, "int", $iY, "int", $iSX, "int", $iSY, "int", $iWidth, "int", $iHeight, "int", $iFrame)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawPixmapRect; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdLoadAnimPixmap($sFile, $iFrameWidth, $iFrameHeight, $iFrames)
Local $ret = DllCall($dll, "ptr", "LcdLoadAnimPixmapW", "wstr", $sFile, "int", $iFrameWidth, "int", $iFrameHeight, "int", $iFrames)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdLoadAnimPixmap; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........: LcdLoadPixmap
; Beschreibung ..:
; Syntax ........: LcdLoadPixmap($sFile)
; Parameter .....: $sFile - Der Pfad zu der Bilddatei, die geladen werden soll.
; Rückgabewerte .: Erfolg - Das Handle der Pixmap
; Bemerkungen ...: Unterstützte Formate: JPG, PNG, BMP, TIFF und GIF
; Verwandt ......: LcdCreatePixmap LcdDeletePixmap
; ===============================================================================================================================
Func LcdLoadPixmap($sFile)
Local $ret = DllCall($dll, "ptr", "LcdLoadPixmapW", "wstr", $sFile)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdLoadPixmap; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdPixmapWidth($hPixmap)
Local $ret = DllCall($dll, "int", "LcdPixmapWidth", "ptr", $hPixmap)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdPixmapWidth; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdPixmapHeight($hPixmap)
Local $ret = DllCall($dll, "int", "LcdPixmapHeight", "ptr", $hPixmap)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdPixmapHeight
#endregion Pixmap#region Font
[/autoit] [autoit][/autoit] [autoit]
; #FUNKTION# ====================================================================================================================
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDeleteFont($hFont)
Local $ret = DllCall($dll, "int", "LcdDeleteFont", "ptr", $hFont)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDeleteFont; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdDrawText($hApplet, $sString, $iX, $iY)
Local $ret = DllCall($dll, "int", "LcdDrawTextW", "ptr", $hApplet, "wstr", $sString, "int", $iX, "int", $iY)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdDrawText; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdLoadFont($sFamily, $iHeight, $iFlags, $sFile)
Local $ret = DllCall($dll, "ptr", "LcdLoadFontW", "wstr", $sFamily, "int", $iHeight, "int", $iFlags, "wstr", $sFile)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdLoadFont; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdSetFont($hApplet, $hFont)
Local $ret = DllCall($dll, "int", "LcdSetFont", "ptr", $hApplet, "ptr", $hFont)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdSetFont; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdStringHeight($hApplet, $sString)
Local $ret = DllCall($dll, "int", "LcdStringHeightW", "ptr", $hApplet, "wstr", $sString)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdStringHeight; #FUNKTION# ====================================================================================================================
[/autoit] [autoit][/autoit] [autoit][/autoit]
; Name ..........:
; Beschreibung ..:
; Syntax ........:
; Parameter .....:
; Rückgabewerte .:
; Bemerkungen ...:
; Verwandt ......:
; ===============================================================================================================================
Func LcdStringWidth($hApplet, $sString)
Local $ret = DllCall($dll, "int", "LcdStringWidthW", "ptr", $hApplet, "wstr", $sString)
If @error Then Return SetError(1, @error, 0)
Return $ret[0]
EndFunc ;==>LcdStringWidth
#endregion FontIm vergleich zu der UDF in Startpost sind hier noch weitere ca. 26 Funktionen hinzugekommen.
-
UPIA Weil da steht G19 JDownloader und nicht G13! Lesen, denken, posten!
Hallo chip,
zunächst einmal vielen Dank für das Applet. Sehr hilfreich und sehr willkommen
Es scheint soweit zu funktionieren, allerdings habe ich da noch ein oder zwei Fragen. Zunächst wollte ich allerdings noch auf etwas anderes hinweisen. Ich hatte dieselbe Fehlermeldung , wie der User orangeblood. Du hast gemeint, daß das ein Problem mit der AdvanceLCD UDF sei. Ich bin definitiv kein AutoIt-Experte, aber das Problem scheint in deinem Skript zu liegen, namentlich in der Wiederholung des $include der AdvanceLCD UDF in Zeile 42. Nachdem ich testweise die Zeilen 41-43 gelöscht habe, lief das Skript anstandslos. Aber das nur am Rande.Habe oben mal die aktulle Version von AdcancedLCD rein gemacht, die im Thread ist total veraltet gewesen und das Script angepasst.
Das Skript schein korrekt abzulaufen, aber es liefert nur einen statischen Snapshot. Das heißt nach dem Starten des Skripts ändern sich die dargestellten Information (Fortschrittsanzeige, ETA, Datendurchsatz, etc.) nicht mehr. Soll das so sein oder funktioniert der Refresh bei mir einfach nicht? Auch die OK-Taste funktioniert nur das erste Mal, jede weitere Betätigung der Taste hat keine Auswirkungen.Kann ich nicht bestätigen habe es gerade nochmal selbst getestet. Livestatusanzeige und der OK-Button funktioniert einwandfrei.
-
Weil es für otto normal user einfach ist stringbetween zu nutzen für so simple sachen als sich mit direkt mit regexp rumzuschlagen.
-
-
-
Das Bild herrunterladen wird nicht gehen, da es dann neu generiert wird und nichtmehr dem Captcha entspricht welches dem Formular zugeordnet ist. Einziger weg ist es den IE direkt in die GUI einzubinden um so dann in der Liveansicht das Captcha an der entsprechenden Stelle einzugeben.
-
Das schreit aber eher nach RegExp.

StringBetween nutzt RegExp. Just my two cents.
Und hier noch meine Lösung dazu:
Spoiler anzeigen
[autoit]#include <Array.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <String.au3>$link = FileRead("test.txt")
[/autoit] [autoit][/autoit] [autoit]$aSchauspieler = _StringBetween($link, 'Schauspieler:', 'Musik:')
[/autoit] [autoit][/autoit] [autoit]
$split = StringSplit($aSchauspieler[0],'<span data-tooltip="' , 1)For $i = 2 to $split[0]
[/autoit] [autoit][/autoit] [autoit]
$bSchauspieler = _StringBetween($split[$i],'">',"</span>")
$split[$i] = $bSchauspieler[0]
Next_ArrayDelete($split,0)
[/autoit] [autoit][/autoit] [autoit][/autoit]
_ArrayDelete($split,0)
_ArrayDisplay($split) -
Hier so gehts:
Spoiler anzeigen
[autoit]#include <File.au3>
[/autoit] [autoit][/autoit] [autoit]
$sOrdner = FileSelectFolder("Ordner wählen", "")$aFiles = _FileListToArray($sOrdner, "*.ini", 1)
[/autoit]
For $i = 1 To $aFiles[0]
$sFile = FileRead($sOrdner & "\" & $aFiles[$i])
$sFile = StringReplace($sFile,"xy=255","xy=-1")
$datei = FileOpen($sOrdner & "\" & $aFiles[$i], 2)
FileWrite($datei, $sFile)
NexT -
_stringbetween ist eigentlich selbsterklärend. Für ein konkretes Beispiel bräuchte es die entsprechende XML.
-
Ist zwar nicht selbst gemachtes RegEx aber es funktioniert auch hehe:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <String.au3>
$sSource= ClipGet()
$array = StringSplit($sSource,@CR,2)For $wert In $array
[/autoit] [autoit][/autoit] [autoit][/autoit]
$zwischen = _StringBetween($wert,'<option value="','</option>')
$end = StringSplit($zwischen[0],'">',2)
$final = "$" & $end[2] & ' = "' & $end[0] & '"'
MsgBox(0,"",$final)
Next -
Warum so umständlich? Mit FileRead die xml einlesen und mit _StringBetween den Wert auslesen.
-
Hättest das Buch gelesen, wüsstest du auch, dass es noch nicht komplett ist.
-
Schau dir das mal an: https://autoit.de/index.php?page…27316#post27316
-
So dann hier auch mal ein Lösungsvorschlag von mir zu dem doch recht Wirr beschriebene Problem:
Spoiler anzeigen
[autoit]_SoftwareInstall_7zip()
[/autoit] [autoit][/autoit] [autoit]Func _SoftwareInstall_7zip()
[/autoit] [autoit][/autoit] [autoit]
If BitAND(GUICtrlRead($aCkbColumn1[1]), $GUI_CHECKED) = $GUI_CHECKED Then
Local $7zip = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\7zFM.exe", "Path"), _
$version7zip = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\7zFM.exe", "DisplayName")If FileExists($7zip & "\7zFM.exe") Then
[/autoit]
Local $Message = MsgBox(32 + 4, "Installation", "7-Zip " & $version7zip & " ist bereits installiert !" _
& @TAB & @CRLF & @CRLF & "Soll das Programm deinstalliert werden ?" & @TAB)
Switch $Message
Case 6 ;ja
RunWait($7zip & "\Uninstall.exe /S ")
RunWait(@ScriptDir & "\Software\7zip\7-Zip.exe")
Case 7 ;nein
RunWait(@ScriptDir & "\Software\7zip\7-Zip.exe")
EndSwitch
Else
RunWait(@ScriptDir & "\Software\7zip\7-Zip.exe")
EndIf
EndIf
EndFunc -
Die meisten Prozesse die vom "Benutzer" System ausgeführt werden sind "Protected Processes" sprich du kannst dir diese Informationen nicht auslesen. Weiter dazu siehe hier: http://msdn.microsoft.com/en-us/library/…28VS.85%29.aspx
-