Bitte poste mal das Script so wie Du es getestet hast.
Beiträge von Alina
-
-
(C) BugFix
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <array.au3>$StartPfad = "C:\"
[/autoit] [autoit][/autoit] [autoit]
$SuchOrdner = "ORDNER-NAME"$Daten = _GetFileList($StartPfad, "n",1) ; erzeugt Array mit allen Ordnernamen
[/autoit] [autoit][/autoit] [autoit]
$ret = _ArraySearch($Daten, $SuchOrdner,1,0,0,True) ; durchsucht nach Ordner
If $ret > 0 Then MsgBox(0, '', $Daten[$ret]) ; gibt den kpl.Pfad zurück; AutoIt Version: 3.0
[/autoit] [autoit][/autoit] [autoit]
; Language: English
; Platform: Win9x/NT/XP
; Author: jos van der Zande
;
; Find files in directory and subdirectories and return it in an Array, all coded in Autoit3
;
;********************************************************************************
;Recursive search for filemask
;********************************************************************************Func _GetFileList($T_DIR,$T_MASK,$DIR_ONLY=0)
[/autoit]
Dim $N_DIRNAMES[200000] ; max number of directories that can be scanned
Local $N_DIRCOUNT = 0
Local $N_FILE
Local $N_SEARCH
Local $N_TFILE
Local $N_OFILE
Local $T_FILENAMES
Local $T_FILECOUNT
Local $T_DIRCOUNT = 1
Local $FILEMASK
; check Filemask \ for empty File-Array by GetDirOnly
If $FILEMASK = "n" Then $FILEMASK = "*.no"
; remove the end \ If specified
If StringRight($T_DIR,1) = "\" Then $T_DIR = StringTrimRight($T_DIR,1)
$N_DIRNAMES[$T_DIRCOUNT] = $T_DIR
; Exit if base dir doesn't exists
If Not FileExists($T_DIR) Then Return 0
; keep on looping until all directories are scanned
While $T_DIRCOUNT > $N_DIRCOUNT
$N_DIRCOUNT = $N_DIRCOUNT + 1
; find all subdirs in this directory and save them in a array
$N_SEARCH = FileFindFirstFile($N_DIRNAMES[$N_DIRCOUNT] & "\*.*")
While 1
$N_FILE = FileFindNextFile($N_SEARCH)
If @error Then ExitLoop
; skip these references
If $N_FILE = "." Or $N_FILE = ".." Then ContinueLoop
$N_TFILE = $N_DIRNAMES[$N_DIRCOUNT] & "\" & $N_FILE
; if Directory than add to the list of directories to be processed
If StringInStr(FileGetAttrib( $N_TFILE ),"D") > 0 Or _
StringInStr(FileGetAttrib( $N_TFILE ),"D,H,S") > 0 Then
$T_DIRCOUNT = $T_DIRCOUNT + 1
$N_DIRNAMES[$T_DIRCOUNT] = $N_TFILE
EndIf
Wend
FileClose($N_SEARCH) ; find all Files that mtach the MASK
$N_SEARCH = FileFindFirstFile($N_DIRNAMES[$N_DIRCOUNT] & "\" & $T_MASK )
If $N_SEARCH = -1 Then ContinueLoop
While 1
$N_FILE = FileFindNextFile($N_SEARCH)
If @error Then ExitLoop
; skip these references
If $N_FILE = "." Or $N_FILE = ".." Then ContinueLoop
$N_TFILE = $N_DIRNAMES[$N_DIRCOUNT] & "\" & $N_FILE
; if Directory than add to the list of directories to be processed
If StringInStr(FileGetAttrib( $N_TFILE ),"D") = 0 Or _
StringInStr(FileGetAttrib( $N_TFILE ),"D,H,S") = 0 Then
$T_FILENAMES = $T_FILENAMES & $N_TFILE & @CR
$T_FILECOUNT = $T_FILECOUNT + 1
;MsgBox(0,'filecount ' & $T_FILECOUNT ,$N_TFILE)
EndIf
Wend
FileClose($N_SEARCH)
Wend
If $DIR_ONLY = 0 Then
$T_FILENAMES = StringTrimRight($T_FILENAMES,1)
$N_OFILE = StringSplit($T_FILENAMES,@CR)
Return( $N_OFILE )
Else
ReDim $N_DIRNAMES[$N_DIRCOUNT+1]
$N_DIRNAMES[0] = $N_DIRCOUNT
Return $N_DIRNAMES
EndIf
EndFunc ;==>_GetFileListOder Du hast den Pfad, dann kannst Du auch das hier umbauen:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
$pfad = StringSplit("c:\aaa\bbb\ccc\ddd\eee.txt", "\")MsgBox(0,"",$pfad[1])
[/autoit]
MsgBox(0,"",$pfad[2])
MsgBox(0,"",$pfad[3])
MsgBox(0,"",$pfad[4])
MsgBox(0,"",$pfad[5])
MsgBox(0,"",$pfad[6]) -
Dann mal ein norddeutsches / süddänisches
MOIN- MOIN
Viel SPASS & erfolg im Forum und mit AutoIt.
-
Hallo.
Habe gerade mal einen Vergleich durchgeführt "FileInstall" ./. "BinärInstall"
(BinärInstall = Fremddateien "include" ohne FileInstall)"FileInstall" ./. "BinärInstall"
Dateigröße der au3-Datei: 6.958 ./. 14.229 (wobei die Bilddateigröße mitgerechnet wurde)
Dateigröße der Exe-Datei: 297.685 ./. 625.755
Dateien bleiben auf dem PC: ja ./. neinIch frage mich, wo die Bilddateien auf dem PC zu finden sind, wenn das Programm läuft. Habe die Bildnamen als Suche eingegeben, aber nicht gefunden außer dort wo sie seit Wochen eh liegen. Also waren das nicht die die durch Oscar's Script temponär gespeichert sind.
Kann mir das jemand verraten? Petzen ist hier mal erlaubt
-
Also wenn ich es starte kommt gleich: "Konnte Registryeintrag nicht lesen!".
Also man muß doch erst einmal den USB-Stick "aktivieren" und dann muß es in die Registry eingetragen werden. Sonst kann das nichts werden. Aber eine PW-Abfrage ist schon mal eine gute Idee zur Weiterentwicklung. -
Gut wäre es, wenn die temporär Datei hundertprozentig sicher zu löschen wäre.
-
Hallo bernd670.
Habe ich Dich jetzt richtig verstanden? Ich brauche die Dateien dann gar nicht mehr (so wie bei FileInclude) erst auf die HDD "entpacken" lassen, sondern er ließt das aus dem binärcode aus? Wäre ja mal wieder was, wo ich es kaum glauben kann es es geht. Aber ich bin ja eine Userin, die immer für neue Sachen zu haben ist.
-
Es läuft einwandfrei !!!!
Also jetzt habe ich es auch verstanden, was das Script machen soll.
Frage:
Geht das nur mit Bildern, oder kann man so auch Dateien (z. B. Textdateien) in ein Script einarbeiten und wenn es benötigt wird, das dann die Datei z. B. erst erstellt wird? -
Oder das mal testen:
Spoiler anzeigen
[autoit]
[/autoit]
Do
$ausgabe[$zaehler][0] = _FFCmd ('"content.frames[0].document.links"&[$zaehler]')
$zaehler = $zaehler +1
Until $zaehler = $links -
Also das mit StringRegExp ist ehrlich nicht gerade leicht und ich vermisse eine sehr ausführlich Erklärung. Die Hilfe sagt zwar schon viel, aber darüber meine ich könnte man sehr viel mehr schreiben und dennoch würden immer wieder Fragen auf kommen. Es fehlen halt mehr Beispiele.
-
Also als erstes einmal habe ich das programm der offiziellen Norm angepaßt.
Zwischen worten kommt kein "|", sondern die dreifache Länge eines langen Tons.Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <Misc.au3>
#include <GUIConstantsEx.au3>#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Morsecode", 230, 400, -1, -1)
GUISetBkColor(0xC0DCC0)
$Label1 = GUICtrlCreateLabel("Bitte geben Sie hier den Text ein.", 4, 4, 219, 20)
GUICtrlSetFont(-1, 10, 800, 0, "Arial")
$Edit1 = GUICtrlCreateEdit("", 4, 24, 221, 129)
GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif")
$Button1 = GUICtrlCreateButton("In Morsecode umwanden", 4, 156, 135, 25, 0)
$Button2 = GUICtrlCreateButton("Abspielen", 4, 352, 85, 25, 0)
$Label2 = GUICtrlCreateLabel("Hier steht der Morsecode", 4, 200, 162, 20)
GUICtrlSetFont(-1, 10, 800, 0, "Arial")
$Edit2 = GUICtrlCreateEdit("", 4, 221, 221, 129)
GUICtrlSetFont(-1, 9, 800, 0, "MS Sans Serif")
$Menu = GUICtrlCreateMenu ("Code")
$Item1 = GUICtrlCreateMenuItem ("Anfang einfügen -> KA [-.-.-]", $Menu)
$Item2 = GUICtrlCreateMenuItem ("Ende einfügen -> AR [.-.-.]", $Menu)
$Item3 = GUICtrlCreateMenuItem ("", $Menu)
$Item4 = GUICTrlCreateMenuItem ("Beenden -> ESC", $Menu)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $Item4
Exit
Case $Button1
$Read1 = GUICtrlRead ($Edit1)
_MorseCodeWrite ($Read1, $Edit2)
Case $Button2
$Read2 = GUICtrlRead ($Edit2)
_Beep ($Read2)
Case $Item1
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.-.- ")
ControlCommand ($Form1, "", $Edit1, "EditPaste", "KA ")
Case $Item2
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-.-.")
ControlCommand ($Form1, "", $Edit1, "EditPaste", " AR")
EndSwitch
WEndFunc _MorseCodeWrite ($String, $Handle)
[/autoit]
GUICtrlSetData ($Handle, "")
Local $Split = StringSplit ($String, "")
For $i = 1 To $Split[0] Step 1
If $Split[$i] = " " Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", " ")
ElseIf $Split[$i] = "A" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".- ")
ElseIf $Split[$i] = "B" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-. ")
ElseIf $Split[$i] = "C" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.-. ")
ElseIf $Split[$i] = "D" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-. ")
ElseIf $Split[$i] = "E" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ". ")
ElseIf $Split[$i] = "F" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-. ")
ElseIf $Split[$i] = "G" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-. ")
ElseIf $Split[$i] = "H" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".... ")
ElseIf $Split[$i] = "I" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".. ")
ElseIf $Split[$i] = "J" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".--- ")
ElseIf $Split[$i] = "K" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.- ")
ElseIf $Split[$i] = "L" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-.. ")
ElseIf $Split[$i] = "M" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-- ")
ElseIf $Split[$i] = "N" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-. ")
ElseIf $Split[$i] = "O" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "--- ")
ElseIf $Split[$i] = "P" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".--. ")
ElseIf $Split[$i] = "Q" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "--.- ")
ElseIf $Split[$i] = "R" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-. ")
ElseIf $Split[$i] = "S" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "... ")
ElseIf $Split[$i] = "T" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..- ")
ElseIf $Split[$i] = "U" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..- ")
ElseIf $Split[$i] = "V" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "...- ")
ElseIf $Split[$i] = "W" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-- ")
ElseIf $Split[$i] = "X" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-..- ")
ElseIf $Split[$i] = "Y" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.-- ")
ElseIf $Split[$i] = "Z" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "--.. ")
ElseIf $Split[$i] = "Ä" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-.- ")
ElseIf $Split[$i] = "Ö" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "---. ")
ElseIf $Split[$i] = "Ü" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..-- ")
ElseIf $Split[$i] = "0" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "----- ")
ElseIf $Split[$i] = "1" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".---- ")
ElseIf $Split[$i] = "2" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..--- ")
ElseIf $Split[$i] = "3" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "...-- ")
ElseIf $Split[$i] = "4" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "....- ")
ElseIf $Split[$i] = "5" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..... ")
ElseIf $Split[$i] = "6" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.... ")
ElseIf $Split[$i] = "7" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "--... ")
ElseIf $Split[$i] = "8" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "---.. ")
ElseIf $Split[$i] = "9" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "----. ")
ElseIf $Split[$i] = "." Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-.-.- ")
ElseIf $Split[$i] = "," Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "--..-- ")
ElseIf $Split[$i] = ":" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "---... ")
ElseIf $Split[$i] = "?" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "..--.. ")
ElseIf $Split[$i] = "-" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-....- ")
ElseIf $Split[$i] = "(" or $Split[$i] = ")" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-.--.- ")
ElseIf $Split[$i] = '"' Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".-..-. ")
ElseIf $Split[$i] = "@" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", ".--.-. ")
ElseIf $Split[$i] = "=" Then
ControlCommand ($Form1, "", $Edit2, "EditPaste", "-...- ")
EndIf
Next
EndFunc ;==> _MorseCode
Func _Beep ($Code)
$Split = StringSplit ($Code, "")
For $i = 1 To $Split[0] Step 1
If $Split[$i] = "." Then
Beep (1000, 50)
Sleep (75)
ElseIf $Split[$i] = "-" Then
Beep (1000, 200)
Sleep (75)
ElseIf $Split[$i] = " " Then
Sleep (250)
ElseIf $Split[$i] = " " Then
Beep (200, 200)
EndIf
Next
Sleep (350)
EndFunc ;==> _BeepCommander21 Beitrag von 20:03 ist dabei noch nicht beachtet !!!
In DK morste man in englisch, aber hier mal etwas auf dansk, soweit es möglich ist:
-. . .-. . .-. ..- . .-. ..- .- -. . . -. .... .. .-.. ... . -. .--. .- . -. .- -. ... -.- -
Da er nicht so viel über PC's weiß und sogar zum installieren von Windows jemanden kommen läßt, gehe ich mal von der 32-er aus. Er hat ja WinXp in einer virtuellen Umgebung zusätzlich drauf bekommen, aber das erst als ich schon weg war.
-
Hallo Oscar.
Habe gerade heute bei einem Bekannten das Script mal unter WinDoof-Zukunft, auch Win7 genannt getestet. Da funktioniert es. Nur ist ja die Frage, was Billy-Boy-Gates noch macht, bis die erste richtige version raus kommt. Mein Bekannter meint, das es nur eine Testversion ist, die nur bis Mai 2010 läuft und danach ist ja alles noch im Wald der Fragezeichen versteckt.
-
.- .-.. ... --- | .. -.-. .... | .-. .. -. -. . | -. .- ... | .--- .- | . -.-. .... ..- | -.-. --- --- .-.. .-.-.- | .- -. . .-. | .. ... ..- | -- --- .-. ... . -. | -. .. -.-. .... ..- | .- ..- ... | -. . -- | .-.. . ..- --.. ..- . -. | .--- .- .... .-. .... ..- -. -. . .-. ..- | ..--.. ..--.. ..--.. ..--..
-
Getestet unter XP-Home, XP-Prof und arbeitet einwandfrei !!!
Da brauchst Du nichts umschreiben außer die Zeit und das sollte ohne Hilfe gehen. Ich habe es auf einem PC mit englischer Tastatur und einem mit deutscher Tastatur getestet. Was hast Du? Wenn Du Windows in "deutsch" installiert hast, dann gibt es null Probleme.
Also den PC mit Strom mußt Du selber versorgen, das geht nicht automatisch. Sprich den Start-Button drücken oder Du nimmst eine Schaltuhr, der Rest sieht wie folgt aus:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
;~ StartUp.au3; -------> (c) bernd670 <-------
[/autoit] [autoit][/autoit] [autoit]; Anmeldeinformationen
[/autoit] [autoit][/autoit] [autoit]
Const $szUser = "pico_copella"
Const $szPasswd = "tessa_passworta"
Const $szDomain = "pehzeh"; Zwischen 09:00 Uhr und 09:05 Uhr automatisch anmelden
[/autoit] [autoit][/autoit] [autoit]
Const $szALStart = "09:00"
Const $szALEnd = "09:05"$szCurrentTime = @HOUR & ":" & @MIN
[/autoit]
$szAutoLogon = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon")
If ($szCurrentTime >= $szALStart) Or ($szCurrentTime <= $szALEnd) Then
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon", "REG_SZ", 1)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName", "REG_SZ", $szUser)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword", "REG_SZ", $szPasswd)
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName", "REG_SZ", $szDomain)
If $szAutoLogon = "0" Or $szAutoLogon = "" Then
Shutdown(6)
Else
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName")
EndIf
Else
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "AutoAdminLogon")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultUserName")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultPassword")
RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "DefaultDomainName")
If $szAutoLogon = "1" Then
sleep(30000)
Shutdown(4)
EndIf
EndIf(c) bernd670
Nennoch MUSST Du den beitrag lesen den Bernd geschrieben hat, da er erst dazu führt, das er sich dann auch automatisch anmeldet. Aber bischen ist halt "Selbst ist der Mann".
-
Direkt aus der AutoIt-Hilfe, die Du dir kostenlos na klar downloaden solltest und auch nutzen solltest!
Dort dann das Stickwort / den Suchbegriff "Kommandozeilenparameter" eingeben und das dritte im linken Feld sagt Dir alles was Du willsen möchtest.Auszug:
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
Kommandozeilenparameter
Das besondere Array $CmdLine wird mit den, deinem AutoIt-Skript übergebenen, Kommandozeilenparametern initialisiert. Der Skriptname wird dabei nicht als Parameter aufgefasst; den kann man über @ScriptName herausfinden. Ein Parameter, der Leerzeichen beinhaltet, muss von "doppelten Anführungszeichen" umgeben sein. Kompilierte Skripte akzeptieren Kommandozeilenparameter genauso.$CmdLine[0] ist die Anzahl der Parameter
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$CmdLine[1] ist Parameter 1 (nach dem Skriptnamen)
$CmdLine[2] ist Parameter 2 etc.
...
$CmdLine[$CmdLine[0]] ist einer der Wege, um den letzten Parameter auszulesen...Wenn man also sein Skript so ausführt:
[/autoit] [autoit][/autoit] [autoit]AutoIt3.exe meinskript.au3 param1 "das ist ein anderer Parameter"
[/autoit] [autoit][/autoit] [autoit]$CmdLine[0] ergibt... 2
[/autoit] [autoit][/autoit] [autoit]$CmdLine[1] ergibt... param1
[/autoit] [autoit][/autoit] [autoit]$CmdLine[2] ergibt... das ist ein anderer Parameter
[/autoit] [autoit][/autoit] [autoit]@ScriptName ergibt... meinskript.au3
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Zusätzlich zu $CmdLine gibt es noch eine Variable namens $CmdLineRaw, die unformatierten Kommandozeilenparameter enthält. Im obigen Beispiel:
[/autoit] [autoit][/autoit] [autoit]$CmdLineRaw ergibt... meinskript.au3 param1 "das ist ein anderer Parameter"
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Falls das Skript kompiliert wurde wird es dies ausführen:
[/autoit] [autoit][/autoit] [autoit]meinskript.exe param1 "das ist ein anderer Parameter"
[/autoit] [autoit][/autoit] [autoit]$CmdLineRaw entspricht... param1 "das ist ein anderer Parameter"
[/autoit] [autoit][/autoit] [autoit]Es ist zu beachten, dass $CmdLineRaw nur die Parameter zurückgibt.
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Es ist zu beachten, dass nur 63 Parameter durch $CmdLine[...] zurückgegeben werden können, aber $CmdLineRaw wird immer die komplette Befehlszeile zurückgeben.
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] -
Moin Moin.
Ein HERZLICHES WILLKOMMEN
und viel SPASS & ERFOLG mit AutoIt.
-
Moin Moin.
Ein HERZLICHES WILLKOMMEN
und viel SPASS & ERFOLG mit AutoIt.
-
Okay !
Vielen DANK !!!
-
Also ich habe das so verstanden, das Du in der Ecke schauen willst, ob z. B. Pixel 10 ,100 die Farbe "0xFF0000" hat.
PixelGetColor gibt die Farbe des Pixels x,y zurück.
Du muß doch nur die SOLL-Farbe (0xFF0000) mit der IST-Farbe vergleichen.
Ist die SOLL = IST-Farbe dann ... sonst ....
Das ganze geht dann mit If / Then / Elseif / Endif.