Autoit Befehle einsetzen !

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    • Autoit Befehle einsetzen !

      Hallo Forum,
      ich habe mir gedacht, da ich ja in letzer Zeit nur Fragen stelle und nichts
      zurück gebe mache ich mal eine Anleitung wie man Befehle einsetzen kann,
      wenn man in einer "GUICtrlCreateInput" einen Befehl eingibt und er gibt es
      wieder :x
      So, nun zu meiner Lernsource.
      Damit wir alles angezeigt bekommen müssen wir als ersten die include's
      benutzen :

      C-Quellcode

      1. #include <Inet.au3>
      2. #include <GUIConstantsEx.au3>
      3. #include <WindowsConstants.au3>
      4. #include <EditConstants.au3>
      5. #include <GUIConstants.au3>

      Ich habe aber auch ein paar HotKeySet's benutzt.
      Einmal, damit wenn man enter drückt auch was passirt(Enter = Button ersatz "Senden") :

      Quellcode

      1. HotKeySet ("{Enter}","_Func")

      Mit Esc soll man das Programm Beenden können und mit F2 soll man die Befehle bekommen
      Also müsste das jetzt so aussehen :

      C-Quellcode

      1. HotKeySet ("{Enter}","_Func")
      2. HotKeySet ("{Esc}","_exit")
      3. HotKeySet ("{F2}","_Befehle")
      4. #include <Inet.au3>
      5. #include <GUIConstantsEx.au3>
      6. #include <WindowsConstants.au3>
      7. #include <EditConstants.au3>
      8. #include <GUIConstants.au3>

      Gut, jetzt müssen wir noch für später 2 Variablen definieren.

      Quellcode

      1. $TOTAL = DriveSpaceTotal("C:\")
      2. $FREE = DriveSpaceFree("C:\")

      So weit so gut :P
      Natürlich brauchen wir auch noch eine Gui, meine ist mit Koda erstellt.

      Quellcode

      1. GUICreate("Volux", 378, 306, 423, 269)
      2. $Input1 = GUICtrlCreateInput("", 0, 8, 377, 21)
      3. $Edit1 = GUICtrlCreateEdit("", 0, 32, 377, 273)
      4. $Menu1 = GUICtrlCreateMenu ("Volux")
      5. $Item1 = GUICtrlCreateMenuItem ("Befehle | F2",$Menu1)
      6. $Item3 = GUICtrlCreateMenuItem ("",$Menu1)
      7. $Item4 = GUICtrlCreateMenuItem ("Exit | Esc",$Menu1)
      8. $Menu2 = GUICtrlCreateMenu ("?")
      9. $Item5 = GUICtrlCreateMenuItem ("About",$Menu2)
      10. GUISetState(@SW_SHOW)


      Jetzt haben wir schon mal HotkeySet's,Include's, Variablen und die Gui definiert.
      Ich habe meine Gui einfach mal "Volux" getauft, da mir nichts anderes
      eingefallen ist und ich Velux von meinem Fenster abgelesen habe xD
      Ihr könnt euch natürlich was besseres einfallen lassen...
      Nun brauchen wir eine Schleife für die MenuItems, genau eine While 1 :D

      Quellcode

      1. While 1
      2. $nMsg = GUIGetMsg()
      3. Switch $nMsg
      4. Case $GUI_EVENT_CLOSE
      5. Exit
      6. Case $Item1
      7. _Befehle ()
      8. Case $Item5
      9. MsgBox (0," About "," (c) 2010 Takezo Kensei ")
      10. Case $Item4
      11. Exit
      12. EndSwitch
      13. WEnd
      Alles anzeigen

      Zu $Item 1 später mehr.
      Wie ihr wisst kommen die Funktionen zum Schluss, also jetzt kommen
      wir dazu die Befehle zu definieren. Als ersten könnt ihr Copy & Past
      machen, da ich unten noch schreibe, wie man neue Befehle dazu schreibt.

      Quellcode

      1. Func _Func ()
      2. GuiCtrlRead ($Input1)
      3. If GuiCtrlRead ($Input1) = "#IpAdress" Then
      4. MemoWrite ("Deine Ip Adresse ist : "& _GetIP ())
      5. EndIf
      6. If GuiCtrlRead ($Input1) = "#PCName" Then
      7. MemoWrite ("Dein PC hat den Namen : "& @ComputerName)
      8. EndIf
      9. If GuiCtrlRead ($Input1) = "#UserName" Then
      10. MemoWrite ("Dein Benutzer Name ist : "& @UserName)
      11. EndIf
      12. If GuiCtrlRead ($Input1) = "#ServicePack" Then
      13. MemoWrite ("Du hast folgenes Service Pack Installiert : "& @OSServicePack)
      14. EndIf
      15. If GuiCtrlRead ($Input1) = "#TotalSpace" Then
      16. MemoWrite ("Gesammter Speicher : "& $Total)
      17. EndIf
      18. If GuiCtrlRead ($Input1) = "#FreeSpace" Then
      19. MemoWrite ("Freier Speicher : "& $Free)
      20. EndIf
      21. If GuiCtrlRead ($Input1) = "#Pixels" Then
      22. MemoWrite ("Höhe :" &@DesktopHeight& " Weite :"& @DesktopWidth )
      23. EndIf
      24. If GuiCtrlRead ($Input1) = "#Date" Then
      25. MemoWrite ("Heute ist der : " & @MDAY&"." & @MON &"."& @YEAR )
      26. EndIf
      27. If GuiCtrlRead ($Input1) = "#Time" Then
      28. MemoWrite ("Es ist : " & @HOUR&":" & @MIN &":"& @SEC )
      29. EndIf
      30. If GuiCtrlRead ($Input1) = "#Shutdown" Then
      31. MemoWrite ("5")
      32. Sleep (1000)
      33. MemoWrite ("4")
      34. Sleep (1000)
      35. MemoWrite ("3")
      36. Sleep (1000)
      37. MemoWrite ("2")
      38. Sleep (1000)
      39. MemoWrite ("1")
      40. Sleep (1000)
      41. Shutdown (0)
      42. EndIf
      43. If GuiCtrlRead ($Input1) = "#Processlist" Then
      44. $list = ProcessList()
      45. for $i = 1 to $list[0][0]
      46. MemoWrite($list[$i][0])
      47. next
      48. EndIf
      49. If GuiCtrlRead ($Input1) = "#About" Then
      50. MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      51. EndIf
      52. If GuiCtrlRead ($Input1) = "#ScanUpdate" Then
      53. MemoWrite ("Es gibt kein Update")
      54. EndIf
      55. EndFunc
      Alles anzeigen


      Wenn ihr jetzt alles Kopiert haben solltet, sollte es so aussehen :
      "Alles Bis Jetzt"

      C-Quellcode

      1. HotKeySet ("{Enter}","_Func")
      2. HotKeySet ("{Esc}","_exit")
      3. HotKeySet ("{F2}","_Befehle")
      4. #include <Inet.au3>
      5. #include <GUIConstantsEx.au3>
      6. #include <WindowsConstants.au3>
      7. #include <EditConstants.au3>
      8. #include <GUIConstants.au3>
      9. $TOTAL = DriveSpaceTotal("C:\")
      10. $FREE = DriveSpaceFree("C:\")
      11. GUICreate("Volux Client", 378, 306, 423, 269)
      12. $Input1 = GUICtrlCreateInput("", 0, 8, 377, 21)
      13. $Edit1 = GUICtrlCreateEdit("", 0, 32, 377, 273)
      14. $Menu1 = GUICtrlCreateMenu ("Volux")
      15. $Item1 = GUICtrlCreateMenuItem ("Befehle | F2",$Menu1)
      16. $Item3 = GUICtrlCreateMenuItem ("",$Menu1)
      17. $Item4 = GUICtrlCreateMenuItem ("Exit | Esc",$Menu1)
      18. $Menu2 = GUICtrlCreateMenu ("?")
      19. $Item5 = GUICtrlCreateMenuItem ("About",$Menu2)
      20. GUISetState(@SW_SHOW)
      21. While 1
      22. $nMsg = GUIGetMsg()
      23. Switch $nMsg
      24. Case $GUI_EVENT_CLOSE
      25. Exit
      26. Case $Item1
      27. _Befehle ()
      28. Case $Item5
      29. MsgBox (0," About "," (c) 2010 Takezo Kensei ")
      30. Case $Item4
      31. Exit
      32. EndSwitch
      33. WEnd
      34. Func _Func ()
      35. GuiCtrlRead ($Input1)
      36. If GuiCtrlRead ($Input1) = "#IpAdress" Then
      37. MemoWrite ("Deine Ip Adresse ist : "& _GetIP ())
      38. EndIf
      39. If GuiCtrlRead ($Input1) = "#PCName" Then
      40. MemoWrite ("Dein PC hat den Namen : "& @ComputerName)
      41. EndIf
      42. If GuiCtrlRead ($Input1) = "#UserName" Then
      43. MemoWrite ("Dein Benutzer Name ist : "& @UserName)
      44. EndIf
      45. If GuiCtrlRead ($Input1) = "#ServicePack" Then
      46. MemoWrite ("Du hast folgenes Service Pack Installiert : "& @OSServicePack)
      47. EndIf
      48. If GuiCtrlRead ($Input1) = "#TotalSpace" Then
      49. MemoWrite ("Gesammter Speicher : "& $Total)
      50. EndIf
      51. If GuiCtrlRead ($Input1) = "#FreeSpace" Then
      52. MemoWrite ("Freier Speicher : "& $Free)
      53. EndIf
      54. If GuiCtrlRead ($Input1) = "#Pixels" Then
      55. MemoWrite ("Höhe :" &@DesktopHeight& " Weite :"& @DesktopWidth )
      56. EndIf
      57. If GuiCtrlRead ($Input1) = "#Date" Then
      58. MemoWrite ("Heute ist der : " & @MDAY&"." & @MON &"."& @YEAR )
      59. EndIf
      60. If GuiCtrlRead ($Input1) = "#Time" Then
      61. MemoWrite ("Es ist : " & @HOUR&":" & @MIN &":"& @SEC )
      62. EndIf
      63. If GuiCtrlRead ($Input1) = "#Shutdown" Then
      64. MemoWrite ("5")
      65. Sleep (1000)
      66. MemoWrite ("4")
      67. Sleep (1000)
      68. MemoWrite ("3")
      69. Sleep (1000)
      70. MemoWrite ("2")
      71. Sleep (1000)
      72. MemoWrite ("1")
      73. Sleep (1000)
      74. Shutdown (0)
      75. EndIf
      76. If GuiCtrlRead ($Input1) = "#Processlist" Then
      77. $list = ProcessList()
      78. for $i = 1 to $list[0][0]
      79. MemoWrite($list[$i][0])
      80. next
      81. EndIf
      82. If GuiCtrlRead ($Input1) = "#About" Then
      83. MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      84. EndIf
      85. If GuiCtrlRead ($Input1) = "#ScanUpdate" Then
      86. MemoWrite ("Es gibt kein Update")
      87. EndIf
      88. EndFunc
      Alles anzeigen


      Wir haben auch eine Funktion _exit eingebaut ( siehe oben )
      dazu hier die passende Definition.

      Quellcode

      1. Func _exit()
      2. Exit
      3. EndFunc


      So jetzt noch die Funktion _Befehle, sie soll alle Befehle anzeigen.

      Quellcode

      1. Func _Befehle ()
      2. GUICreate("Befehle", 178, 241, 525, 353)
      3. GUICtrlCreateLabel("#PcName", 8, 8, 52, 17)
      4. GUICtrlCreateLabel("#UserName", 8, 24, 61, 17)
      5. GUICtrlCreateLabel("#ServicePack", 8, 40, 72, 17)
      6. GUICtrlCreateLabel("#TotalSpace", 8, 56, 66, 17)
      7. GUICtrlCreateLabel("#FreeSpace", 8, 72, 63, 17)
      8. GUICtrlCreateLabel("#IpAdress", 8, 88, 52, 17)
      9. GUICtrlCreateLabel("#Pixels", 8, 104, 38, 17)
      10. GUICtrlCreateLabel("#Date", 8, 120, 34, 17)
      11. GUICtrlCreateLabel("#Time", 8, 136, 34, 17)
      12. GUICtrlCreateLabel("#Shutdown", 8, 184, 59, 17)
      13. GUICtrlCreateLabel("#Processlist", 8, 168, 76, 17)
      14. GUICtrlCreateLabel("#About", 8, 200, 39, 17)
      15. GUICtrlCreateLabel("#ScanUpdate", 8, 152, 125, 17)
      16. GUISetState(@SW_SHOW)
      17. While 1
      18. $nMsg = GUIGetMsg()
      19. Switch $nMsg
      20. Case $GUI_EVENT_CLOSE
      21. Exit
      22. EndSwitch
      23. WEnd
      24. EndFunc
      Alles anzeigen


      Jetzt fehlt nur noch eines, Func MemoWrite($sMessage = " ")
      Dazu unten im How to Neue Befehle einsetzten mehr :

      Quellcode

      1. Func MemoWrite($sMessage = "")
      2. GUICtrlSetData($Edit1, $sMessage & @CRLF, 1)
      3. EndFunc


      Jetzt sind wir fertig und alles sollte so aussehen :
      "Fertig :D"

      C-Quellcode

      1. HotKeySet ("{Enter}","_Func")
      2. HotKeySet ("{Esc}","_exit")
      3. HotKeySet ("{F2}","_Befehle")
      4. #include <Inet.au3>
      5. #include <GUIConstantsEx.au3>
      6. #include <WindowsConstants.au3>
      7. #include <EditConstants.au3>
      8. #include <GUIConstants.au3>
      9. $TOTAL = DriveSpaceTotal("C:\")
      10. $FREE = DriveSpaceFree("C:\")
      11. GUICreate("Volux Client", 378, 306, 423, 269)
      12. $Input1 = GUICtrlCreateInput("", 0, 8, 377, 21)
      13. $Edit1 = GUICtrlCreateEdit("", 0, 32, 377, 273)
      14. $Menu1 = GUICtrlCreateMenu ("Volux")
      15. $Item1 = GUICtrlCreateMenuItem ("Befehle | F2",$Menu1)
      16. $Item3 = GUICtrlCreateMenuItem ("",$Menu1)
      17. $Item4 = GUICtrlCreateMenuItem ("Exit | Esc",$Menu1)
      18. $Menu2 = GUICtrlCreateMenu ("?")
      19. $Item5 = GUICtrlCreateMenuItem ("About",$Menu2)
      20. GUISetState(@SW_SHOW)
      21. While 1
      22. $nMsg = GUIGetMsg()
      23. Switch $nMsg
      24. Case $GUI_EVENT_CLOSE
      25. Exit
      26. Case $Item1
      27. _Befehle ()
      28. Case $Item5
      29. MsgBox (0," About "," (c) 2010 Takezo Kensei ")
      30. Case $Item4
      31. Exit
      32. EndSwitch
      33. WEnd
      34. Func _Func ()
      35. GuiCtrlRead ($Input1)
      36. If GuiCtrlRead ($Input1) = "#IpAdress" Then
      37. MemoWrite ("Deine Ip Adresse ist : "& _GetIP ())
      38. EndIf
      39. If GuiCtrlRead ($Input1) = "#PCName" Then
      40. MemoWrite ("Dein PC hat den Namen : "& @ComputerName)
      41. EndIf
      42. If GuiCtrlRead ($Input1) = "#UserName" Then
      43. MemoWrite ("Dein Benutzer Name ist : "& @UserName)
      44. EndIf
      45. If GuiCtrlRead ($Input1) = "#ServicePack" Then
      46. MemoWrite ("Du hast folgenes Service Pack Installiert : "& @OSServicePack)
      47. EndIf
      48. If GuiCtrlRead ($Input1) = "#TotalSpace" Then
      49. MemoWrite ("Gesammter Speicher : "& $Total)
      50. EndIf
      51. If GuiCtrlRead ($Input1) = "#FreeSpace" Then
      52. MemoWrite ("Freier Speicher : "& $Free)
      53. EndIf
      54. If GuiCtrlRead ($Input1) = "#Pixels" Then
      55. MemoWrite ("Höhe :" &@DesktopHeight& " Weite :"& @DesktopWidth )
      56. EndIf
      57. If GuiCtrlRead ($Input1) = "#Date" Then
      58. MemoWrite ("Heute ist der : " & @MDAY&"." & @MON &"."& @YEAR )
      59. EndIf
      60. If GuiCtrlRead ($Input1) = "#Time" Then
      61. MemoWrite ("Es ist : " & @HOUR&":" & @MIN &":"& @SEC )
      62. EndIf
      63. If GuiCtrlRead ($Input1) = "#Shutdown" Then
      64. MemoWrite ("5")
      65. Sleep (1000)
      66. MemoWrite ("4")
      67. Sleep (1000)
      68. MemoWrite ("3")
      69. Sleep (1000)
      70. MemoWrite ("2")
      71. Sleep (1000)
      72. MemoWrite ("1")
      73. Sleep (1000)
      74. Shutdown (0)
      75. EndIf
      76. If GuiCtrlRead ($Input1) = "#Processlist" Then
      77. $list = ProcessList()
      78. for $i = 1 to $list[0][0]
      79. MemoWrite($list[$i][0])
      80. next
      81. EndIf
      82. If GuiCtrlRead ($Input1) = "#About" Then
      83. MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      84. EndIf
      85. If GuiCtrlRead ($Input1) = "#ScanUpdate" Then
      86. MemoWrite ("Es gibt kein Update")
      87. EndIf
      88. EndFunc
      89. Func _exit()
      90. Exit
      91. EndFunc
      92. Func _Befehle ()
      93. GUICreate("Befehle", 178, 241, 525, 353)
      94. GUICtrlCreateLabel("#PcName", 8, 8, 52, 17)
      95. GUICtrlCreateLabel("#UserName", 8, 24, 61, 17)
      96. GUICtrlCreateLabel("#ServicePack", 8, 40, 72, 17)
      97. GUICtrlCreateLabel("#TotalSpace", 8, 56, 66, 17)
      98. GUICtrlCreateLabel("#FreeSpace", 8, 72, 63, 17)
      99. GUICtrlCreateLabel("#IpAdress", 8, 88, 52, 17)
      100. GUICtrlCreateLabel("#Pixels", 8, 104, 38, 17)
      101. GUICtrlCreateLabel("#Date", 8, 120, 34, 17)
      102. GUICtrlCreateLabel("#Time", 8, 136, 34, 17)
      103. GUICtrlCreateLabel("#Shutdown", 8, 184, 59, 17)
      104. GUICtrlCreateLabel("#Processlist", 8, 168, 76, 17)
      105. GUICtrlCreateLabel("#About", 8, 200, 39, 17)
      106. GUICtrlCreateLabel("#ScanUpdate", 8, 152, 125, 17)
      107. GUISetState(@SW_SHOW)
      108. While 1
      109. $nMsg = GUIGetMsg()
      110. Switch $nMsg
      111. Case $GUI_EVENT_CLOSE
      112. Exit
      113. EndSwitch
      114. WEnd
      115. EndFunc
      116. Func MemoWrite($sMessage = "")
      117. GUICtrlSetData($Edit1, $sMessage & @CRLF, 1)
      118. EndFunc
      Alles anzeigen



      "How to: Neue Befehle Hinzufügen"

      Hier ein Normaler Befehl, wie ich ihn verwendet habe :

      Quellcode

      1. If GuiCtrlRead ($Input1) = "#About" Then
      2. MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      3. EndIf

      Er ist so aufgebaut :
      If GuiCtrlRead ($Input1) = "#About" Then ; Eine If Schleife ( wozu die da ist, sollte klar sein) GuiCtrlRead ($Input1) Bedeutet er ließt die InputBox aus.
      Wenn der Inhalt = "#About" ist Then, dann
      MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      Soll er den Inhalt in die EditBox Schreiben.
      Dazu war auch die letzte Funktion da, damit er dies auch in die EditBox schreibt.


      Wenn etwas nicht klar ist, dann einafch das Problem melden.
      Ich will Dieses Tut nicht in einem anderen Forum sehen !

      Schlusswort : Ich arbeite gerade an einem Befehl der einen Process "killt", habe damit aber noch
      Probleme, also bitte abwarten :P

      lg♥ Kensei
    • Werbung zur Unterstützung des Forums ( Bitte AddBlocker deaktivieren )

    • [FONT="Century Gothic"][COLOR="PaleTurquoise"][SIZE="2"]

      Func _Func ()
      GuiCtrlRead ($Input1)
      If GuiCtrlRead ($Input1) = "#IpAdress" Then
      MemoWrite ("Deine Ip Adresse ist : "& _GetIP ())
      EndIf

      If GuiCtrlRead ($Input1) = "#PCName" Then
      MemoWrite ("Dein PC hat den Namen : "& @ComputerName)
      EndIf

      If GuiCtrlRead ($Input1) = "#UserName" Then
      MemoWrite ("Dein Benutzer Name ist : "& @UserName)
      EndIf

      If GuiCtrlRead ($Input1) = "#ServicePack" Then
      MemoWrite ("Du hast folgenes Service Pack Installiert : "& @OSServicePack)
      EndIf

      If GuiCtrlRead ($Input1) = "#TotalSpace" Then
      MemoWrite ("Gesammter Speicher : "& $Total)
      EndIf

      If GuiCtrlRead ($Input1) = "#FreeSpace" Then
      MemoWrite ("Freier Speicher : "& $Free)
      EndIf

      If GuiCtrlRead ($Input1) = "#Pixels" Then
      MemoWrite ("Höhe :" &@DesktopHeight& " Weite :"& @DesktopWidth )
      EndIf

      If GuiCtrlRead ($Input1) = "#Date" Then
      MemoWrite ("Heute ist der : " & @MDAY&"." & @MON &"."& @YEAR )
      EndIf

      If GuiCtrlRead ($Input1) = "#Time" Then
      MemoWrite ("Es ist : " & @HOUR&":" & @MIN &":"& @SEC )
      EndIf

      If GuiCtrlRead ($Input1) = "#Shutdown" Then
      MemoWrite ("5")
      Sleep (1000)
      MemoWrite ("4")
      Sleep (1000)
      MemoWrite ("3")
      Sleep (1000)
      MemoWrite ("2")
      Sleep (1000)
      MemoWrite ("1")
      Sleep (1000)
      Shutdown (0)
      EndIf
      If GuiCtrlRead ($Input1) = "#Processlist" Then
      $list = ProcessList()
      for $i = 1 to $list[0][0]
      MemoWrite($list[$i][0])
      next
      EndIf

      If GuiCtrlRead ($Input1) = "#About" Then
      MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      EndIf

      If GuiCtrlRead ($Input1) = "#ScanUpdate" Then
      MemoWrite ("Es gibt kein Update")
      EndIf

      EndFunc


      da wäre folgendes viel einfacher gestaltet

      Quellcode

      1. Func _Func ()
      2. Switch GuiCtrlRead ($Input1)
      3. case "#IpAdress"
      4. MemoWrite ("Deine Ip Adresse ist : "& _GetIP ())
      5. case"#PCName
      6. MemoWrite ("Dein PC hat den Namen : "& @ComputerName)
      7. case"#UserName
      8. MemoWrite ("Dein Benutzer Name ist : "& @UserName)
      9. case"#ServicePack
      10. MemoWrite ("Du hast folgenes Service Pack Installiert : "& @OSServicePack)
      11. case"#TotalSpace
      12. MemoWrite ("Gesammter Speicher : "& $Total)
      13. case"#FreeSpace
      14. MemoWrite ("Freier Speicher : "& $Free)
      15. case"#Pixels
      16. MemoWrite ("Höhe :" &@DesktopHeight& " Weite :"& @DesktopWidth )
      17. case"#Date
      18. MemoWrite ("Heute ist der : " & @MDAY&"." & @MON &"."& @YEAR )
      19. case"#Time
      20. MemoWrite ("Es ist : " & @HOUR&":" & @MIN &":"& @SEC )
      21. case"#Shutdown
      22. MemoWrite ("5")
      23. Sleep (1000)
      24. MemoWrite ("4")
      25. Sleep (1000)
      26. MemoWrite ("3")
      27. Sleep (1000)
      28. MemoWrite ("2")
      29. Sleep (1000)
      30. MemoWrite ("1")
      31. Sleep (1000)
      32. Shutdown (0)
      33. case"#Processlist
      34. $list = ProcessList()
      35. for $i = 1 to $list[0][0]
      36. MemoWrite($list[$i][0])
      37. next
      38. case"#About
      39. MemoWrite ("Dieses Tool wurde in Autoit geschrieben von Takezo Kensei")
      40. case"#ScanUpdate
      41. MemoWrite ("Es gibt kein Update")
      42. EndSwitch
      43. EndFunc
      Alles anzeigen


      und mit

      Quellcode

      1. case "Befehl"
      2. ;; Funktionen

      kann man das dann ziwschen die Switch Abfrage eintragen und einen neuen Befehl "registrieren".

      Und Takezo, wenn an Parameter eintragen könnte wäre das doch von Vorteil =P[/SIZE][/COLOR][/FONT]