Archiv der Kategorie: Syntax

autoit Syntax Copyright

So kann man einen Copyright-Vermerk in einem Fenster ausgeben:

 Global $Autor        = "Georg Quinting"

Global $Version        = "v1.0"

Global $Date        = "14.07.2014"

Global $TimeNow        = @MDAY & "." & @MON & "." & @YEAR & "   " & @HOUR & ":" & @MIN

Global $Copyright        =  StringTrimRight(@ScriptName,4) & " – " & Chr(169) & " – " & $Autor & " – " & $TimeNow

 

MsgBox(0, $Copyright, "Anzeigetext:") 

 

MsgBox(0, $Copyright, StringTrimRight(@ScriptName,4) & " wird von " & $Autor & " zur Verfügung gestellt." _

       & @CRLF & "Version: "        & @TAB & $Version _

       & @CRLF & "vom: "        & @TAB & $Date _

 

autoit Syntax Arrays

#include <Array.au3>


 

1-dimensionales Array:

Global $array[5] = [4,’a‘,’b‘,’c‘,’d‘]

_ArrayDisplay($array,"Array Inhalt")

 

 

 

1-dimensionales Array ohne vorherige Definition der Elemente:

 

local $aArray[0]

 

_ArrayAdd($aArray,"Zeile 1")

_ArrayAdd($aArray," ")

_ArrayAdd($aArray,"Zeile 2")

_ArrayAdd($aArray," ")

_ArrayAdd($aArray,"Zeile 3")

_ArrayAdd($aArray," ")

_ArrayAdd($aArray,"Zeile 4")

 

 


 

2-dimensionales Array:

Global $array[5][2] = [[4,4],[1,’a‘],[2,’b‘],[3,’c‘],[4,’d‘]]

_ArrayDisplay($array,"Array Inhalt")

 

 

 

Beispielscript:

       #include <Array.au3>

 

       Local        $aListe[1][6]

       $aListe[0][0] = "1"

       $aListe[0][1] = "A"

       $aListe[0][2] = "B"

       $aListe[0][3] = "C"

       $aListe[0][4] = "D"

       $aListe[0][5] = "E"

 

       MsgBox(64,"DEBUG","Zeile 1 – Spalte 0: " & $aListe[0][0] _

               & @CRLF & "Zeile 1 – Spalte 1: " & $aListe[0][1] _

               & @CRLF & "Zeile 1 – Spalte 2: " & $aListe[0][2] _

               & @CRLF & "Zeile 1 – Spalte 3: " & $aListe[0][3] _

               & @CRLF & "Zeile 1 – Spalte 4: " & $aListe[0][4] _

               & @CRLF & "Zeile 1 – Spalte 5: " & $aListe[0][5] _

               )

 

              

 

       _ArrayDisplay($aListe,"Liste")

              

 

 

       Local $aZeile = "|a|b|c|d|e"

       for $i = 1 to 5

               _ArrayAdd($aListe,$i & $aZeile,0,"|")

       Next

 

 

       _ArrayDisplay($aListe,"Liste")

              

       Exit

 

 

 


 

Anzahl der Elemente in einem Array:

$array = [‚a‘,’b‘,’c‘,’d‘]                (4 Elemente; $array[0] = ‚a‘; $array[3] = 'd')

$ArraySize = Ubound($array)

$ArraySize: beträgt 4 (wobei der höchste Index um 1 niedriger ist; $array[3] enthält den letzten Wert)

 


 

Array als Tabelle mit Sonderfunktion für markierte Zeile anzeigen:

Local $JavaVersion[9][4]

Global $Line[4]

Local $hUserFunction = _UninstallJavaVersion

 

_ArrayDisplay($JavaVersion,"installierte Java Versionen","1:" & $id & "|0:4",4,";","Nr.|Version|bit|Uninstall-Key","","",$hUserFunction)

 

Func _UninstallJavaVersion($Array,$Line)

;~        _ArrayDisplay($Line)

       $Doit = MsgBox(3,"Uninstall this Java Version","Soll diese java Version jetzt wirklich deinstalliert werden?" & @crlf & @crlf & "v" & $JavaVersion[$Line[1]][1] & “ – “ & $JavaVersion[$Line[1]][2] & „bit  –  “ & $JavaVersion[$Line[1]][3])

       if $Doit = 6 Then

               MsgBox(0,"Diese Java Version","Diese Java Version " & @crlf & @crlf & "v" & $JavaVersion[$Line[1]][1] & “ – “ & $JavaVersion[$Line[1]][2] & „bit  –  “ & $JavaVersion[$Line[1]][3]  & @crlf & @crlf &  "  wird nun deinstalliert…")

               runwait("MsiExec.exe /X" & $JavaVersion[$Line[1]][3])

       Else

               MsgBox(0,"Diese Java Version","v" & $JavaVersion[$Line[1]][1] & “ – “ & $JavaVersion[$Line[1]][2] & „bit  –  “ & $JavaVersion[$Line[1]][3] & @CRLF & "  wird NICHT deinstalliert…")

       EndIf

EndFunc                ; _UninstallJavaVersion($Array,$Line)

 

 


 

autoit Syntax aktuelles Verzeichnis

aktueller Pfad:

       Local $sCurrentPath        = @ScriptDir

 

1. Methode:

while StringInStr($sCurrentPath,"\",0,1)

       $sCurrentPath = StringTrimLeft($sCurrentPath,StringInStr($sCurrentPath,"\",0,1))

WEnd

MsgBox(0,"DEBUG -1-","@ScriptDir: " & @ScriptDir & @CRLF & "current Dir: " & $sCurrentPath, 10)

 

 

2. Methode:

#include <Array.au3>

$aDirectory = StringSplit(@ScriptDir,"\")

; _ArrayDisplay($aDirectory, "aktuelles Verzeichnis")

$sDir = $aDirectory[$aDirectory[0]]

MsgBox(0,"DEBUG -2-","@ScriptDir: " & @ScriptDir & @CRLF & "current Dir: " & $sDir, 10)

 

 

autoit Syntax & – * /

mit {$StringVariable}&="STRING" kann man Zeichenketten zu bestehenden Variablen hinzufügen:

 

z.B.:

$String = "1. Zeile"

 

$String&= @CRLF & "2. Zeile"

$String&= @CRLF & $String

 

MsgBox(0,"Info",$String)

 

Ergebnis:

1. Zeile

2. Zeile

1. Zeile

2. Zeile

 

Hinweis:        {$StringVariable}& = "STRING" funktioniert NICHT!

kein Leerzeichen zwischen & und =

 


 

ebenso kann man zu Zahlen einen Wert addieren:

 

z.B.:

$Zahl = 1

 

$Zahl+= 2

$Zahl+= 0.5

$Zahl+= $Zahl

 

MsgBox(0,"Info",$Zahl)

Ergebnis:        7

       

Hinweis:        {$ZahlVariable}+ = Zahl funktioniert NICHT!

kein Leerzeichen zwischen + und =

 


 

ebenso kann man so subtrahieren:

 

z.B.:

$Zahl = 8

 

$Zahl-= 2

$Zahl-= 2

 

 

MsgBox(0,"Info",$Zahl)

Ergebnis:        4

 


 

ebenso kann man so multiplizieren:

 

z.B.:

$Zahl = 1

 

$Zahl*= 2

$Zahl*= 2

 

 

MsgBox(0,"Info",$Zahl)

Ergebnis:        4

 


 

ebenso kann man so dividieren:

 

z.B.:

$Zahl = 8

 

$Zahl/= 2

$Zahl/= 2

 

 

MsgBox(0,"Info",$Zahl)

Ergebnis:        2

 


 

Im Gegensatz zu anderen Programmiersprachen funktioniert $Zahl++ nicht.