1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. autoBert

Beiträge von autoBert

  • GUICtrlCreateInput: Pic als Background?

    • autoBert
    • 20. Februar 2011 um 06:30

    Ineluki

    Zitat von AndyTR

    gibt es eine Möglichkeit für ein GUI-Input ein Bild als Hintergrund festzulegen?

  • Chip wurde gestern 24

    • autoBert
    • 20. Februar 2011 um 04:10

    sorry, dass es etwas verspätet ist aber leider dauerte es etwas länger bis ich die AutoIt-Nachwussband zusammengetrommelt hatte. Aber jetzt Happy Birthday von der AutoIt_Nachwussband (Original Beatles). Von mir natürlich auch die besten Wünsche, vor allem Gesndheit, Erfolg im Beruf/Studium und viel Glück

    autoBert

  • Includes in Datei einbinden

    • autoBert
    • 20. Februar 2011 um 03:50
    Zitat von Molaynox

    Script Kompilieren und wieder Dekompilieren. (Zum Dekompileren sag ich aber sonst nichts weiter)


    ist auch besser so und es ist lizenztechnisch verboten auch für eigene Skripte.

    [eingefügt]

    Zitat

    Is there a 3rd-party decompiler?

    Yes. There is software in existence which can decompile all versions of AutoIt. This software is in direct violation of the AutoIt license agreement. Creation or use of such software may be a violation of the law depending on your local laws. Do not use it.

    Quelle: http://www.autoitscript.com/wiki/Decompiling_FAQ
    [/eingefügt]

    @Silverlight, benutze den Compiler, mit folgenden Einstellungen auf dem Tab Obfuscator: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    du erhälst dann ein File Name_obfuscated.au3 (dieses wird auch compiliert) und sieht dann z.B. so aus:

    2GUIsOnEvent_obfuscated.au3
    [autoit]

    Global Const $GUI_EVENT_CLOSE = -3
    Global Const $GUI_DOCKLEFT = 0x0002
    Global Const $GUI_DOCKTOP = 0x0020
    Global Const $GUI_DOCKSIZE = 0x0300
    Global Const $WS_MAXIMIZEBOX = 0x00010000
    Global Const $WS_MINIMIZEBOX = 0x00020000
    Global Const $WS_SIZEBOX = 0x00040000
    Global Const $WS_SYSMENU = 0x00080000
    Global Const $WS_CAPTION = 0x00C00000
    Global Const $WS_POPUP = 0x80000000
    Global Const $GUI_SS_DEFAULT_GUI = BitOR($WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP, $WS_SYSMENU)
    Opt('GUIOnEventMode', 1)
    $cidGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')
    $cidbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_CallGui2')
    $cidbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_RunICQ')
    $cidbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_End')
    $cidGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $cidGui1)
    GUISetOnEvent($GUI_EVENT_CLOSE, '_BackToGui1')
    $cidButton1 = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_MsgBox')
    $cidButton2 = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_BackToGui1')
    $cidbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    GUICtrlSetOnEvent(-1, '_End')
    GUISetState(@SW_SHOW, $cidGui1)
    While 1
    Sleep(1000)
    WEnd
    Func _end()
    GUIDelete($cidGui2)
    GUIDelete($cidGui1)
    Exit
    EndFunc
    Func _CallGui2()
    GUISetState(@SW_HIDE, $cidGui1)
    GUISetState(@SW_SHOW, $cidGui2)
    EndFunc
    Func _RunICQ()
    MsgBox(0, "", "Jetzt würde ICQ gestartet")
    EndFunc
    Func _BackToGui1()
    GUISetState(@SW_SHOW, $cidGui1)
    GUISetState(@SW_HIDE, $cidGui2)
    EndFunc
    Func _MsgBox()
    MsgBox(0, 'Test', 'Test', 0, $cidGui2)
    EndFunc

    [/autoit]

    Ausgangsskript:

    2GUIsOnEvent.au3
    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Run_Obfuscator=y
    #Obfuscator_Parameters=/striponly
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt('GUIOnEventMode', 1) ;schaltet den OnEvent-Modus ein

    [/autoit] [autoit][/autoit] [autoit]

    $cidGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $cidGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_CallGui2')
    ;Beim Klicken des Buttons wird die Funktion _CallGui2 aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_RunICQ')
    ;Beim Klicken des Buttons wird die Funktion _RunICQ aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $cidGui1)
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $cidGui2 gespeichert
    GUISetOnEvent($GUI_EVENT_CLOSE, '_BackToGui1')

    [/autoit] [autoit][/autoit] [autoit]

    $cidButton1 = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_MsgBox')
    ;Beim Klicken des Buttons wird die Funktion _MsgBox aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidButton2 = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_BackToGui1')
    ;Beim Klicken des Buttons wird die Funktion _BackToGui1 aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen
    GUISetState(@SW_SHOW, $cidGui1)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    Sleep(1000)
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _end()
    GUIDelete($cidGui2)
    GUIDelete($cidGui1)
    Exit
    EndFunc ;==>_end

    [/autoit] [autoit][/autoit] [autoit]

    Func _CallGui2()
    GUISetState(@SW_HIDE, $cidGui1) ;entweder so
    ;GUISetState(@SW_DISABLE, $cidGui1) ;oder so dann bleibt die 1. Gui sichtbar ist aber nicht aktriv
    GUISetState(@SW_SHOW, $cidGui2)
    EndFunc ;==>_CallGui2

    [/autoit] [autoit][/autoit] [autoit]

    Func _RunICQ()
    MsgBox(0, "", "Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    EndFunc ;==>_RunICQ

    [/autoit] [autoit][/autoit] [autoit]

    Func _BackToGui1()
    GUISetState(@SW_SHOW, $cidGui1) ;nur nötig falls Gui versteckt
    ;GUISetState(@SW_ENABLE, $cidGui1) ;nur nötig falls Gui DISABLEd
    GUISetState(@SW_HIDE, $cidGui2)
    EndFunc ;==>_BackToGui1

    [/autoit] [autoit][/autoit] [autoit]

    Func _MsgBox()
    MsgBox(0, 'Test', 'Test', 0, $cidGui2)
    EndFunc ;==>_MsgBox

    [/autoit]

    wobei ich nicht verstehe, warum du alles in einem File benötigst

    Edit: ohforf, nein die Lizenzbedingungen von AutoIt muss jeder einhalten. AutoItScript,com hat deshalb dazu ganz strenge Regeln:

    Zitat

    What happens if I use the 3rd-party decompiler?

    If you mention you have used a 3rd-party decompiler you will be permanently blocked from the forum and issue tracker. You may be blocked for any of the following:

    * Admitting you have decompiled your own script with a 3rd-party decompiler.
    * Admitting you have decompiled another user's script with a 3rd-party decompiler.
    * Posting any script that has been decompiled by a 3rd-party decompiler.

    Quelle: http://www.autoitscript.com/wiki/Decompiling_FAQ und jetzt bitte keine weitere Diskussion dazu,

    mfg autoBert

    Dateien

    36_AutoIt3Wrapper GUI to Compile AutotIt3 Script (ver 2.0.1.24).jpg 240,25 kB – 0 Downloads
  • Tabellen formatieren in autoit

    • autoBert
    • 20. Februar 2011 um 01:37

    Hallo hamburgerjung,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die deutsche Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    und jetzt zu deiner Frage: Zeilenumbrüche in einer Listview-Zelle sind afaik nicht möglich. Links anklicken sollte sich realisieren lassen, da ja jede einzelne Zelle abfragbar ist

    mfg autoBert

  • GUICtrlSetGraphic Koordinaten

    • autoBert
    • 20. Februar 2011 um 01:05

    Hallo Jautois,

    leider habe ich mich auch noch nicht mit diesem Element eingehend beschäftigt.

    Zitat von Auszug aus Hilfe

    Bemerkungen
    Die Position des Punktes (x,y) ist relativ zu den GUICtrlCreateGraphic Koordinaten. Er kann außerhalb des Graphic-Controls aber innerhalb des GUI-Fensters liegen.

    das heisst du müsstest die Zeile 29 so anpassen:

    [autoit]

    GUICtrlSetGraphic(-1, $GUI_GR_RECT, 0, 0, 60, 60)

    [/autoit]

    mfg autoBert

  • CMD / _RunDOS Problem

    • autoBert
    • 19. Februar 2011 um 23:31

    Hallo Silverlight,

    dein Skript versucht folgendes auszuführen

    Code
    C:\Dokumente und Einstellungen\KKK\Desktop\test\chtml.exe 414.html

    kannst du das denn in der Eingabeaufforderung so starten?

    mach es besser so:

    [autoit]

    #include <Process.au3>
    $i = RANDOM(1, 1000, 1)
    $sWdir = "c:\test\" ;auf den korrekten Pfad einstellen
    $cmd = "C:\Dokumente und Einstellungen\KKK\Desktop\test\chtml.exe" & " " & $sWdir & $i & ".html"
    ConsoleWrite($cmd & @CRLF) ;zur Kontrolle der ausgebene String in der Scite Konsole sollte sich auch manuell in der Eingabeaufforderung starten lassen
    _RunDOS($cmd)

    [/autoit]

    mfg autoBert

  • Aufbau eines Scriptes

    • autoBert
    • 19. Februar 2011 um 23:01

    Hallo radioactiveman,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die deutsche Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    und jetzt zu deiner Frage: wenn du uns postest wofür du es benötigst ist es leichter für die Helfer. Denn 1. sind Skripte die auf Bild-, Pixelsucherei und Mausschubserei beruhen, sehr ungenau und 2. gibt es bessere Möglichkeiten. Falls es sich um ein Browserfenster handelt solltest du dir die Befehle zu IE Management in der Hilfe unter benutzerdefinierte Funktion anschauen, anspnsten [ gelöst ] text minimiertes fenster anschauen und die dort empfohlenen Seiten durchlesen, du musst evtl. auch die nachfolgenden Posts lesen.

    Solange du nicht postet was du genau möchtest sollte diese Hilfestellung ausreichend sein, denn es soll ja nicht in einem Rätselwettbewerb enden,

    mfg autoBert

    mfg autoBert

  • Erster Versuch , und schon gleich am Anfang schwierigkeite. Benutzereingaben

    • autoBert
    • 19. Februar 2011 um 19:50

    Hallo Himmelsboote,

    [OT]welche Nachrichten hast du denn?, oder machst du es wie Aloysius? [/OT]

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die deutsche Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    und jetzt zu deinem Problem, schau dir dazu [ gelöst ] text an minimiertes fenster an und lies die dort empfohlenen Seiten, du musst evtl. auch die nachfolgenden Posts lesen,

    mfg autoBert

  • Problem mit auswahl des Änderungsfensters

    • autoBert
    • 19. Februar 2011 um 19:42

    Hallo hauerli,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die deutsche Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    und jetzt zu deinem Problem, die Control... Funktionen sollten es lösen, (wie Dietmar schon schrieb) lies dir dazu am besten auch https://autoit.de/index.php?page…98773#post98773 an, du musst evtl. auch die nachfolgenden Posts lesen,

    mfg autoBert

  • Silverlight stellt sich auch mal vor!?

    • autoBert
    • 19. Februar 2011 um 02:39

    das verstehe ich jetzt aber nicht, dies ist ein autoit-Board,

    mfg autoBert

  • Ausührung ihm Hintergrund der GUI

    • autoBert
    • 19. Februar 2011 um 02:16

    Hallo Jacer,

    schön, dann ist dein Problem ja gelöst, schön wäre es allerdings auch wenn du den Thread auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

    mfg autoBert

  • Scanner Tool - drück das hervorgehobene Knöpfen

    • autoBert
    • 19. Februar 2011 um 02:06

    Hallo ,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die deutsche Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    und jetzt zu:

    Zitat von TSchneider75

    eine exe zu erstellen, die ich mit dem 'Scanknopf' meines Scanners aufrufen kann


    Wusste bis eben nicht dass man bei Scannern auch EXE-Dateien nachinstallieren kann.

    Zitat von TSchneider75

    Scanner : EPSON GT-15000 - alt


    Und das anscheinend schon länger!
    Spass beiseite,starte das Window-Infotool = Au3Info.exe, danach gehst du mit dem Finder-Tool auf den gewünschten Button, nach dem loslassen hast du die Daten im Infotool. Die Daten aus dem Tabsheet Summary stellst du dann hier ein. Oder falls du es selbst machen willst, dann schau dir dazu https://autoit.de/index.php?page…98773#post98773 an, du musst evtl. auch die nachfolgenden Posts lesen,

    mfg autoBert

  • AVG Anti-Virus Free 10 erkennt Scripte als Virus

    • autoBert
    • 19. Februar 2011 um 01:09
    Zitat von Sentionline

    Was UPX ist, muss ich auch mal recherchieren.


    Wenn du über das Menü in Scite den Compiler aufrufst solltest du es sehen.
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    UPX steht für the Ultimate Packer for eXecutables (engl. für Ultimativer Packer für ausführbare Dateien). UPX ist ein freier (GNU General Public License) Packer für ausführbare Dateien, der eine Reihe von Formaten unterstützt.

    Zitat

    UPX eignet sich besonders zur Komprimierung von ELF- (Linux), DOS-EXE (16- und 32-Bit)- , EXE- (Windows) oder auch TOS-Dateien. Im Unterschied zu den mittels weitverbreiteter Komprimierungsverfahren (wie ZIP und RAR) komprimierten Dateien lassen sich mit UPX komprimierte Dateien normal (also ohne vorige Entpackung) ausführen.
    Quelle: http://de.wikipedia.org/wiki/UPX

    mfg autoBert

    Dateien

    35_AutoIt3Wrapper GUI to Compile AutotIt3 Script (ver 2.0.1.24).jpg 52 kB – 0 Downloads
  • Script geht nicht weiter nach öffnen zweiter Form

    • autoBert
    • 18. Februar 2011 um 23:44

    Hallo dr.Mo,

    Zitat von autoBert

    ist eh nicht viel Arbeit, einfach beide Guis am Anfang erstellen und dann hin- nd her switchen. Du musst dich halt an das (08/15) Schema as meinem Beispiel halten


    das bezog sich eigentlich auf das Zitat, dass du meinen Lösungweg nehmen möchtest, also auf MsgLoop-Modus. [eingefügt]Das würde dann so aussehen:

    Spoiler anzeigen
    [autoit]

    ;~ ---------------------------------------------------------erste Form-----------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global $Input1, $Input2
    #region ### START Koda GUI section ### Form=
    #region ### START Koda GUI section ### Form=
    $Tastatur = GUICreate("Tastatur", 478, 182, 195, 124)
    $ZielfensterFestgelegt = GUICtrlCreateLabel("Zielfenster festgelegt.", 16, 16, 102, 25)
    $Control = GUICtrlCreateLabel("Control:", 16, 64, 53, 25)
    $Label1 = GUICtrlCreateLabel($Input2 & "", 104, 64, 348, 25)
    $Titel = GUICtrlCreateLabel("Titel:", 16, 112, 56, 33)
    $Label2 = GUICtrlCreateLabel($Input1 & "", 104, 112, 356, 33)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_HIDE)
    #endregion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    $Form1 = GUICreate("Tastatur", 598, 257, 192, 157)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $q = GUICtrlCreateButton("q", 16, 88, 35, 33, $WS_GROUP)
    $w = GUICtrlCreateButton("w", 48, 88, 35, 33, $WS_GROUP)
    $e = GUICtrlCreateButton("e", 80, 88, 35, 33, $WS_GROUP)
    $r = GUICtrlCreateButton("r", 112, 88, 35, 33, $WS_GROUP)
    $t = GUICtrlCreateButton("t", 144, 88, 35, 33, $WS_GROUP)
    $z = GUICtrlCreateButton("z", 176, 88, 35, 33, $WS_GROUP)
    $u = GUICtrlCreateButton("u", 208, 88, 35, 33, $WS_GROUP)
    $i = GUICtrlCreateButton("i", 240, 88, 35, 33, $WS_GROUP)
    $o = GUICtrlCreateButton("o", 272, 88, 35, 33, $WS_GROUP)
    $p = GUICtrlCreateButton("p", 304, 88, 35, 33, $WS_GROUP)
    $u2 = GUICtrlCreateButton("ü", 336, 88, 35, 33, $WS_GROUP)
    $a = GUICtrlCreateButton("a", 24, 120, 35, 33, $WS_GROUP)
    $s = GUICtrlCreateButton("s", 56, 120, 35, 33, $WS_GROUP)
    $d = GUICtrlCreateButton("d", 88, 120, 35, 33, $WS_GROUP)
    $f = GUICtrlCreateButton("f", 120, 120, 35, 33, $WS_GROUP)
    $g = GUICtrlCreateButton("g", 152, 120, 35, 33, $WS_GROUP)
    $h = GUICtrlCreateButton("h", 184, 120, 35, 33, $WS_GROUP)
    $j = GUICtrlCreateButton("j", 216, 120, 35, 33, $WS_GROUP)
    $k = GUICtrlCreateButton("k", 248, 120, 35, 33, $WS_GROUP)
    $l = GUICtrlCreateButton("l", 280, 120, 35, 33, $WS_GROUP)
    $o2 = GUICtrlCreateButton("ö", 312, 120, 35, 33, $WS_GROUP)
    $a2 = GUICtrlCreateButton("ä", 344, 120, 35, 33, $WS_GROUP)
    $y = GUICtrlCreateButton("y", 32, 152, 35, 33, $WS_GROUP)
    $x = GUICtrlCreateButton("x", 64, 152, 35, 33, $WS_GROUP)
    $c = GUICtrlCreateButton("c", 96, 152, 35, 33, $WS_GROUP)
    $v = GUICtrlCreateButton("v", 128, 152, 35, 33, $WS_GROUP)
    $b = GUICtrlCreateButton("b", 160, 152, 35, 33, $WS_GROUP)
    $n = GUICtrlCreateButton("n", 192, 152, 35, 33, $WS_GROUP)
    $m = GUICtrlCreateButton("m", 224, 152, 35, 33, $WS_GROUP)
    $komma = GUICtrlCreateButton(",", 256, 152, 35, 33, $WS_GROUP)
    $punkt = GUICtrlCreateButton(".", 288, 152, 35, 33, $WS_GROUP)
    $Enter = GUICtrlCreateButton("Enter", 320, 152, 67, 33, $WS_GROUP)
    $Select = GUICtrlCreateButton("Select", 13, 24, 70, 33, $WS_GROUP)
    $Leertaste = GUICtrlCreateButton("Leertaste", 40, 184, 331, 33, $WS_GROUP)
    $grossKlein = GUICtrlCreateButton("^", 504, 208, 75, 33, $WS_GROUP)
    $back = GUICtrlCreateButton("<-", 504, 176, 75, 33, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #endregion ### END Koda GUI section ###

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg(1)
    Switch $nMsg[1]
    Case $Form1 ;die Message betrifft das Fenster 1
    Switch $nMsg[0] ;was für eine Nachricht
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Select

    [/autoit] [autoit][/autoit] [autoit]

    Sleep(3000)
    $Input1 = WinGetTitle("[active]")
    GUICtrlSetData($Label1,$Input1)
    $hHandle = WinGetHandle($Input1)

    [/autoit] [autoit][/autoit] [autoit]

    $Input2 = ControlGetFocus($Input1)
    GUICtrlSetData($Label2,$Input2)
    GUISetState(@SW_SHOW, $Tastatur)
    GUISetState(@SW_DISABLE,$Form1)

    [/autoit] [autoit][/autoit] [autoit]

    EndSwitch
    ;~ ---------------------------------------------------zweite Form--------------------------------------------------------------------------------
    Case $Tastatur
    Switch $nMsg[0]
    Case $GUI_EVENT_CLOSE

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_HIDE, $Tastatur)
    GUISetState(@SW_ENABLE,$Form1)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ;~ ------------------------------------------------------Funcs erste form--------------------------------------------------------------------------------
    Case $a2
    ControlSend($Input1, "", $Input2, "ä", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $o2
    ControlSend($Input1, "", $Input2, "ö", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $u2
    ControlSend($Input1, "", $Input2, "ü", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $komma
    ControlSend($Input1, "", $Input2, ",", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $punkt
    ControlSend($Input1, "", $Input2, ".", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $grossKlein
    ControlSend($Input1, "", $Input2, "{CAPSLOCK on}", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $back
    ControlSend($Input1, "", $Input2, "{BACKSPACE}", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $Enter
    ControlSend($Input1, "", $Input2, "{ENTER}", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $Leertaste

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, " ", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $a

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "a", 0)

    [/autoit] [autoit][/autoit] [autoit]

    Case $b

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "b", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $c

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "c", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $d

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "d", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $e

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "e", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $f

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "f", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $g

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "g", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $h

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "h", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $i

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "i", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $j

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "j", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $k

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "k", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $l

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "l", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $m

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "m", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $n

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "n", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $o

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "o", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $p

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "p", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $q

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "q", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $r

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "r", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $s

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "s", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $t

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "t", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $u

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "u", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $v

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "v", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $w

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "w", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $x

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "x", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $y

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "y", 0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Case $z

    [/autoit] [autoit][/autoit] [autoit]

    ControlSend($Input1, "", $Input2, "z", 0)
    EndSwitch
    EndSwitch
    WEnd

    [/autoit]

    so ist das Skript lauffähig[/eingefügt]
    Ja bis hierhin passt es. Aber warum die nicht auch gleich name22 's Vorschlag berücksichtigst und auf Array umstellst versteh ich nicht.

    Zitat von misterspeed

    Das Makro @GUI_CtrlId kannte ich btw nicht, macht das ganze natürlich noch einfacher.

    im MsgLoopMods würde es so fnktionieren

    Spoiler anzeigen
    [autoit]

    ; *** Start added by AutoIt3Wrapper ***
    #include <GUIConstantsEx.au3>
    ; *** End added by AutoIt3Wrapper ***
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Add_Constants=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <GUIConstants.au3>

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Global $aButtons[11] = [10]

    [/autoit] [autoit][/autoit] [autoit]

    $hWnd = GUICreate("Test", 410, 50)
    For $i = 1 To $aButtons[0]
    $aButtons[$i] = GUICtrlCreateButton(Chr($i + 64), ($i - 1) * 40 + 5, 5, 40, 40)
    Next
    GUISetState()

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $aButtons[1] To $aButtons[0]
    _ButtonClicked($aButtons[$nMsg] - $aButtons[1]-1);wobei -1 nur in diesem Fall stimmt, d
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func _ButtonClicked($i)
    MsgBox(64, "Button Pressed", GUICtrlRead($aButtons[$i]))
    EndFunc ;==>_ButtonClicked

    [/autoit]

    mfg autoBert

  • AVG Anti-Virus Free 10 erkennt Scripte als Virus

    • autoBert
    • 18. Februar 2011 um 22:37

    Hallo antispeed,

    ich weis nich welche schlechte Erfahrungen du mit Avira gemacht hast, ich habe Avira Antivir Personal und bin sehr zufrieden.False Positive Meldungen hatte ich noch keine, oder wolltest du sagen dass es zu lasch ist?
    Das Problem hatte ich jedoch am Anfang als ich den vorinstallierten Scanner von McAffee benutzte.

    Zitat von ohforf

    Eigentlich muss der Hersteller von AVG reagieren, wenn man ihm den Fehler meldet.

    Kann ja nicht angehen, dass eine Scriptsprache als Virus gilt.


    AutoIt und False Positive Meldungen haben leider etwas damit zu tun, dass viele BotKiddies deren System nicht gut geschützt ist ihre BOTs weiterverbreiten (tauschen etc.) dadurch sind natürlich auch mit AutoIt erstellte EXEn unterwegs die infiziert sind.

    Das AVG keineswegs AutoIt grundsätzlich als Virus erkennt kannst du heieran erkennen http://www.virustotal.com/file-scan/repo…fa1e-1298062878
    das ist ein aktueller Scan meines https://autoit.de/index.php?page…2461#post162461 MP3-Players und er ist bei keinem der 43 bentzten Scanner als Positiv bewertet, dies liegt sicherlich auch daran dass ich kein UPX benutze, dies wird gerne von Mal- und Scare-Ware und andererschädlicher Software (zum Teil auch nur wegen Unvermögens des Skipters schädlich) benutzt um die Identifizierung zu verschleiern

    Da ich auch kommerzielle SOftware (in kleinem Umfang) schreibe habe ich mir nach einer kurzen AutoItzeit ernsthaft überlegt zu einer anderen Programmiersprache zu wechseln, wo es diese "Vorverurteilung" nicht gibt.

    Bevor ich eine Software release lasse ich diese über VirusTotal.com checken.

    mg autoBert

  • Script geht nicht weiter nach öffnen zweiter Form

    • autoBert
    • 18. Februar 2011 um 21:41
    Zitat von dr. mo

    Wie würde das dann mit dem OnEventMode aussehen?


    das gleiche Beispiel im OnEvent-Modu

    Zitat von dr. mo

    So sieht der Vorschlag von autoBert aus:


    so sieh das gleiche Beispiel im OnEvent-Modus aus:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt('GUIOnEventMode', 1) ;schaltet den OnEvent-Modus ein

    [/autoit] [autoit][/autoit] [autoit]

    $cidGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $cidGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_CallGui2')
    ;Beim Klicken des Buttons wird die Funktion _CallGui2 aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_RunICQ')
    ;Beim Klicken des Buttons wird die Funktion _RunICQ aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $cidGui1)
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $cidGui2 gespeichert
    GUISetOnEvent($GUI_EVENT_CLOSE, '_BackToGui1')

    [/autoit] [autoit][/autoit] [autoit]

    $cidButton1 = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_MsgBox')
    ;Beim Klicken des Buttons wird die Funktion _MsgBox aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidButton2 = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_BackToGui1')
    ;Beim Klicken des Buttons wird die Funktion _BackToGui1 aufgerufen

    [/autoit] [autoit][/autoit] [autoit]

    $cidbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    GUICtrlSetOnEvent(-1, '_End')
    ;Beim Klicken des Buttons wird die Funktion _END aufgerufen
    GUISetState(@SW_SHOW, $cidGui1)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    Sleep(1000)
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _end()
    GUIDelete($cidGui2)
    GUIDelete($cidGui1)
    Exit
    EndFunc ;==>_end

    [/autoit] [autoit][/autoit] [autoit]

    Func _CallGui2()
    GUISetState(@SW_HIDE, $cidGui1) ;entweder so
    ;GUISetState(@SW_DISABLE, $cidGui1) ;oder so dann bleibt die 1. Gui sichtbar ist aber nicht aktriv
    GUISetState(@SW_SHOW, $cidGui2)
    EndFunc ;==>_CallGui2

    [/autoit] [autoit][/autoit] [autoit]

    Func _RunICQ()
    MsgBox(0, "", "Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    EndFunc ;==>_RunICQ

    [/autoit] [autoit][/autoit] [autoit]

    Func _BackToGui1()
    GUISetState(@SW_SHOW, $cidGui1) ;nur nötig falls Gui versteckt
    ;GUISetState(@SW_ENABLE, $cidGui1) ;nur nötig falls Gui DISABLEd
    GUISetState(@SW_HIDE, $cidGui2)
    EndFunc ;==>_BackToGui1

    [/autoit] [autoit][/autoit] [autoit]

    Func _MsgBox()
    MsgBox(0, 'Test', 'Test', 0, $cidGui2)
    EndFunc ;==>_MsgBox

    [/autoit]
    Zitat

    ok, Ich denke ich nehme einfach autoBerts Lösung.

    ist eh nicht viel Arbeit, einfach beide Guis am Anfang erstellen und dann hin- nd her switchen. Du musst dich halt an das (08/15) Schema as meinem Beispiel halten
    mfg autoBert

  • Form schließen ohne Script zu beenden

    • autoBert
    • 18. Februar 2011 um 15:57

    Hallo dr.mo,

    nimm die #include Zeilen aus der Schleife und setze sie am Anfang. So wie du es machst musst du GuiDelete verwenden, denn sonst bekommst du mehrere Instanzen von Form2.
    In meinem Beispiel werden die GUIs am Skriptanfang erstellt und dann je nach Bedarf ein- und ausgeblendet.

    Zitat von dr. mo

    bei deinem hab ichs irgendwie nicht verstanden.

    Da gehe ich davon aus, dass du hauptsächlich die Endlosschleife meinst, aber was ist daran nicht zu verstehen, ist doch alles im Skript kommentiert.

    mfg autoBert

  • Jeopardy! (beta)

    • autoBert
    • 18. Februar 2011 um 05:21
    Zitat von L3viathan

    (Hinweis: Etwa 10 Sekunden nach Programmstart laut "This... is Jeopardy!" rufen)


    Auch wenn man kein Mikro hat :?:

    mfg autoBert

  • Ausührung ihm Hintergrund der GUI

    • autoBert
    • 17. Februar 2011 um 18:43

    Hallo Jacer,

    damit geht es einfacher

    • Mozrepl wird dafür benötigt, kannst du von hier installieren: http://wiki.github.com/bard/mozrepl/
    • FF.au3 herunterladen
    • Mozrepl über Extras|Mozrepl im Firefox starten
    • Funktionsrefernz findest du hier
    • Zum testen Skript starten: [autoit]#Include <FF.au3>

      _FFStart("http://www.autoit.de", Default, 2)

      If _FFIsConnected() Then
      If _FFLoadWait() Then MsgBox(64, "", "Page was loaded in " & @extended & "ms")

      Sleep(3000)
      ;_FFQuit() ;FireFox schliessen
      EndIf

      [/autoit]
    [autoit]
    • Eine Tutorial findest du hier
    • [autoit]
    • dieser Link Wenn mal was nicht geht ... bitte zuerst hier nachschauen ... enthält auch sehr nützliche Hinweise von [user='200122']Stilgar[/user] (Author von ff.au3)
    [/autoit]
      [/autoit]


    Viel Spass bei der FireFox-Automatisierung und falls du auf ImageSearch weitermachen willst, du hast ja eine Demo die du anpassen kannst,

    mfg (Auto)Bert

  • Form schließen ohne Script zu beenden

    • autoBert
    • 17. Februar 2011 um 18:40

    Hallo dr.mo,

    da du kein Skript gepostet hast, hier eine allgemein gehaltenes:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include<WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global $idGui1, $idGui2=-99, $idMsgBox, $idZurueck, $idbtnExit2
    _CreateGui2() ;entweder hier oder erst wenn benötigt ($idbtmToGui2 Klick)

    [/autoit] [autoit][/autoit] [autoit]

    $idGui1 = GUICreate('GUI 1', 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
    ;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $idGui1 gespeichert
    ;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
    GUISetOnEvent($GUI_EVENT_CLOSE, '_End')

    [/autoit] [autoit][/autoit] [autoit]

    $idbtnToGui2 = GUICtrlCreateButton('&Aufruf GUI 2', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

    [/autoit] [autoit][/autoit] [autoit]

    $idbtnICQ = GUICtrlCreateButton('&ICQ', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "ICQ" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

    [/autoit] [autoit][/autoit] [autoit]

    $idbtnExit1 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "Afruf Gui 2" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW, $idGui1)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg(1) ;extended Modus wichtig!!
    Switch $nMsg[1] ;für welches Fenster ist die Message
    Case $idGui1 ;ab hier ist Gui 1 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idbtnToGui2
    GUISetState(@SW_Hide, $idGui1) ;Gui 1 verstecken, damit nur Gui2 sichtbar ist und bearbeitet werden kann
    ;If $idGui2 = -99 Then _CreateGui2() ;nur wenn nicht am Anfang bereits erzeugt nötig, dann auf Vorbelegung der Variable in Global achten)
    GUISetState(@SW_SHOW, $idGui2) ;Gui 2 anzeigen
    Case $idbtnICQ
    MsgBox(0,"","Jetzt würde ICQ gestartet")
    ;Run("C:\Program Files\ICQ7.0\ICQ.exe")
    Case $idbtnExit1, $GUI_EVENT_CLOSE
    _end()
    EndSwitch
    Case $idGui2 ;ab hier ist Gui 2 dran
    Switch $nMsg[0] ;welche Message wurde ausgelöst
    Case $idMsgBox
    MsgBox(0, 'Test', 'Test', 0, $idGui2)
    Case $idZurueck, $GUI_EVENT_CLOSE
    GUISetState(@SW_Show, $idGui1) ;Gui 1 wieder anzeigen
    GUISetState(@SW_HIDE, $idGui2) ;Gui 2 verstecken
    Case $idbtnExit2
    _end()
    EndSwitch
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _CreateGui2()
    $idGui2 = GUICreate('GUI 2', 500, 300, 200, 50, -1, -1, $idGui1) ;wichtig ist der letzte Parameter
    ;erzeugt eine GUI als Child von Gui1, die zurückgebebene ID wird in der Variablen $idGui2 gespeichert

    [/autoit] [autoit][/autoit] [autoit]

    $idMsgBox = GUICtrlCreateButton('&MsgBox', 20, 20, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "MsgBox" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

    [/autoit] [autoit][/autoit] [autoit]

    $idZurueck = GUICtrlCreateButton('&Zurück zu GUI 1', 20, 50, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "zurück" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand

    [/autoit] [autoit][/autoit] [autoit]

    $idbtnExit2 = GUICtrlCreateButton('be&enden', 20, 80, 100, 21)
    GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLEFT + $GUI_DOCKTOP)
    ;verankert den Button "beenden" links und oben und fixiert die Größe
    ;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
    EndFunc ;==>_CreateGui2

    [/autoit] [autoit][/autoit] [autoit]

    Func _end()
    GUIDelete($idGui2)
    GUIDelete($idGui1)
    Exit
    EndFunc ;==>_end

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    mfg autoBert

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™