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

  • GUICtrlCreateTab hinterher elemente in tabitem einfügen

    • autoBert
    • 16. August 2011 um 16:58
    Zitat von misterspeed

    Ahja nun kapier ich auch warum es sowohl bei Oscar als auch bei mir im msgloop modus nicht funktionierte. Im Beispielscript aus Posting1 ist ein gravierender Fehler:

    Diesen Bug zusätzlich zu den fehlenden Zeiten habe ich auch nicht gesehen.

    mfg autoBert

  • GUICtrlCreateTab hinterher elemente in tabitem einfügen

    • autoBert
    • 16. August 2011 um 15:03

    Dies fnktioniert auch im MsgLoop-Modus. Aber natürlich nur wenn man auch GuiSwitch und das abschliessende GUICtrlCreateTabItem("") in seinem Skript benutzt.

    Zitat von Inferior

    das hab ich in meinem Beispiel doch getan ;)
    zudem löst es ja mein problem nicht.

    was der TE zwar bejaht es aber trotzdem nicht getan hat. Dass es funktioniert siehe:

    Spoiler anzeigen

    [autoit]#include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

    $Main = GUICreate("test", 500, 300)
    GUICtrlCreateTab(0, 0, 500, 250)
    $tab1 = GUICtrlCreateTabItem("Tab 1")
    $button1 = GUICtrlCreateButton("button1", 50, 50, 150, 25)
    $tab2 = GUICtrlCreateTabItem("Tab 2")
    $tab3 = GUICtrlCreateTabItem("Tab 3")
    GUICtrlCreateTabItem("")

    GUISetState()
    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $button1
    GUISwitch($Main, $tab1)
    GUICtrlCreateLabel("label1", 100, 100, 30, 16)
    GUICtrlCreateTabItem("")
    EndSwitch
    WEnd]/autoit]

    mfg autoBert

  • _FTP_FilePut und Leerzeichen

    • autoBert
    • 16. August 2011 um 14:51

    Hallo HugBert,

    verwende einfach Dateinamen ohne Leerzeichen, dann klappt es ja. Hast du schon einmal versucht mit einem FTP-Client wie z.B.: FileZilla Dateien mit Leerstellen auf diesen FTP-Server zu kopieren?
    Auf meinem FTP-Zugang funktioniert

    [autoit]

    _FTP_FilePut

    [/autoit]

    nämlich auch bei Dateien mit Leerstellen. Getestet mit example1 aus der Hilfe zu _FTP_FilePut.
    Eine andere Möglichkeit die zu prüfen ist ob diese Zeile:

    [autoit]

    $filetouploadnameonserver = StringRegExpReplace($filetoupload, '.+\\(.+)', '$1')

    [/autoit]

    wirklich einen zulässigen Dateinamen zurückliefert. Einfach danach

    [autoit]

    ConsoleWrite($filetoupload & @CRLF)

    [/autoit]

    einfügen und den Dateinamen überprüfen,

    mfg autoBert

  • Laben, Input, SlideBar usw. Transparent machen?

    • autoBert
    • 16. August 2011 um 14:11

    Ich vermute stark dass RealMadrid08rk die Transparenz auf ein Hintergrundbild bezieht, denn ein Label hat ohne jegliche Farnsetzung automatisch die Hindtergrundfarbe der GUI:

    Spoiler anzeigen
    [autoit]

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

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

    Opt('MustDeclareVars', 1)

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

    Example1()
    Example2()

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

    Func Example1()
    Local $msg

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

    GUICreate("Meine GUI Hintergrundfarbe") ; Erstellt ein GUI-Fenster welches mittig ausgerichtet wird
    GUISetBkColor(0xff0000)
    GUICtrlCreateLabel("Mein Label", 10, 20)

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

    GUISetState()

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

    ; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
    While 1
    $msg = GUIGetMsg()

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

    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    EndFunc ;==>Example

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

    Func Example2()
    Local $msg

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

    GUICreate("Meine GUI mit Bild",800,600) ; Erstellt ein GUI-Fenster welches mittig ausgerichtet wird
    GUICtrlSetDefBkColor($GUI_BKCOLOR_TRANSPARENT )
    GUICtrlCreatePic("C:\Dokumente und Einstellungen\All Users\Dokumente\Eigene Bilder\Beispielbilder\Blaue Berge.jpg",0,0,800,600)
    GUICtrlSetState(-1,$GUI_DISABLE)
    GUICtrlCreateLabel("Mein Label auf einem Hintergrundbild", 10, 380,780,30,$SS_CENTER)
    GUICtrlSetFont(-1,12,1400)
    GUISetState()

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

    ; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
    While 1
    $msg = GUIGetMsg()

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

    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
    EndFunc ;==>Example

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

    mfg autoBert

  • FileCommander

    • autoBert
    • 16. August 2011 um 02:03

    Hallo Oscar,

    ich habe deinen FileCommander einer Bekannten aus einem anderen Forum empfohlen. Jetzt hat sie folgende Frage:

    Zitat

    Macht einen guten Eindruck, sogar von einem USB Stick für Unterwegs läßt der sich starten. Aber hast du ne Ahnung ob man in dem Oscars File Commander beispielsweise auch die Vorschau für Bilder und so aktivieren kann? Hab da bisher noch nix dergleichen gefunden.

    Des weiteren ist mir aufgefallen, dass oben eine Fläche nicht benutzt wird, wäre eigentlich der Platz für eine Werkzeugleiste:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    mfg autoBert

    Dateien

    OscarsFC.JPG 117,72 kB – 0 Downloads
  • _IECreateEmbedded bei einer bestimmten Seite fehlerhaft?

    • autoBert
    • 15. August 2011 um 20:23

    Hallo HanZ,

    bei mir wird die Seite im IE7 auch nicht geladen. Eine Überprüfung der Seite ergibt dass sie fehlerhaft ist: http://validator.w3.org/check?uri=http%3A%2F%2Fwww.boerse-go.de%2Fjandaya%2FTicker%2FFeed%2F%23%3F&charset=%28detect+automatically%29&doctype=Inline&group=0
    Ich gehe davon aus dass die Seite deshalb nicht geladen werden kann.

    mfg autoBert

  • via. GUI Button Script Pausieren

    • autoBert
    • 15. August 2011 um 19:59
    Zitat von MrM.
    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #RequireAdmin
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Icon=favicon.ico
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include <GUIConstants.au3>
    HotKeySet("{F6}","Exit_")
    Func Exit_()
    Exit
    EndFunc

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

    #Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\fabian\desktop\koda\forms\form.kxf
    $Form1_1 = GUICreate("Form1", 515, 218, 193, 125)
    GUISetBkColor(0x716F64)
    $Button1 = GUICtrlCreateButton("Credits", 184, 80, 153, 33, 0)
    GUICtrlSetFont(-1, 12, 800, 4, "Comic Sans MS")
    GUICtrlSetCursor (-1, 0)
    $Button2 = GUICtrlCreateButton("Adversiting", 352, 80, 153, 33, 0)
    GUICtrlSetFont(-1, 12, 800, 4, "Comic Sans MS")
    GUICtrlSetCursor (-1, 0)
    $Button3 = GUICtrlCreateButton("Informationen", 16, 120, 153, 57, 0)
    GUICtrlSetFont(-1, 12, 800, 4, "Comic Sans MS")
    GUICtrlSetCursor (-1, 0)
    $Button4 = GUICtrlCreateButton("Start", 184, 120, 153, 57, 0)
    GUICtrlSetFont(-1, 12, 800, 4, "Comic Sans MS")
    GUICtrlSetCursor (-1, 0)
    $Button5 = GUICtrlCreateButton("Pause", 352, 120, 153, 57, 0)
    GUICtrlSetFont(-1, 12, 800, 4, "Comic Sans MS")
    GUICtrlSetCursor (-1, 0)
    $Label1 = GUICtrlCreateLabel("Copyright by Bl4CkIsTheBest http://cleanii.eu/ - Webdesigns", 16, 184, 486, 21)
    GUICtrlSetFont(-1, 9, 400, 6, "Comic Sans MS")
    GUICtrlSetBkColor(-1, 0xFFFFFF)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    ShellExecute("http://cleanii.eu/")
    Exit
    Case $Button1
    MsgBox(0,"Credits","Bl4CkIsTheBest - Coding"&@CRLF&"Cleanii - Design")
    Case $Button2
    ShellExecute("http://cleanii.eu/")
    ShellExecute("http://blackworld3.com/")
    Case $Button3
    Case $Button5
    ;Hier sollte er Pausieren
    Case $Button4
    MsgBox(0,"","Mit F6 beendet sich das Script")
    While 1
    MouseClick("left")
    WEnd

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

    EndSwitch
    WEnd

    [/autoit]

    Er soll MouseKlick Unendlich oft ausführen, allerdings soll Paussiert werden ohne das script zu beenden.

    Alles anzeigen

    Denke doch dass so ein sinnloser Klick-BOT hier nichts zu suchen hat,

    mfg autoBert

  • GUICtrlCreateTab hinterher elemente in tabitem einfügen

    • autoBert
    • 15. August 2011 um 00:58

    Hallo Inferior,

    Zitat

    TabitemID ist zu benutzen, um neue Controls in dem angegebenen tabitem zu erstellen. Es darf nicht vergessen werden, das tabitem mit der Funktion GuiCtrlCreateTabItem("") zu schließen

    Quelle: aus Bemerkungen zu GuiSwitch in der dt. Hilfe Schau dir dort auch das Beispiel an.

    mfg autoBert

  • Listview: Item per Skript selektieren, Darstellung aber nicht grau - sondern, wie per Hand in blau

    • autoBert
    • 14. August 2011 um 23:49

    Hallo BugFix,

    am einfachsten ist es wenn du der LV den Focus gibst:

    [autoit]

    ; ========================================================================================
    ; == Die Funktion sucht nach dem eingegebenen Text in der ersten Spalte
    ; == wenn gefunden soll die Zeile blau markiert werden, wie beim Draufklicken per Hand
    Func _Search()
    $txt = GUICtrlRead($iSearch)
    If $txt = '' Then Return
    Local $indx = _LV_FindInSubItem($hWnd, $txt, 0)
    If $indx = -1 Then Return
    _GUICtrlListView_EnsureVisible($hWnd, $indx)
    _GUICtrlListView_SetItemSelected($hWnd, $indx)
    _GUICtrlListView_SetItemFocused($hWnd, $indx) ; wirkungslos
    _GUICtrlListView_SetHotItem($hWnd, $indx) ; wirkungslos
    ;~ _GUICtrlListView_SetItemState($hWnd, $indx, $LVIS_SELECTED, $LVIS_SELECTED) ; wirkungslos
    ControlFocus($Form1,"",$ListView1)
    EndFunc ;==>_Search
    ; =======================================================================================

    [/autoit]

    Die andere Methode wäre mit der bei dir gesehenen Methode [LV (Sub-) Items einzeln färben] die entsprechende Zeile einzufärben,

    mfg autoBert

  • Textdatei in Array lesen

    • autoBert
    • 14. August 2011 um 18:52

    Hallo Master of Time,

    dies kannst du so lösen:

    [autoit]

    #include <file.au3>
    #include <array.au3>

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

    Local $aFile = ""
    _FileReadToArray(@ScriptDir & "\Mot.txt", $aFile)
    Local $a2D[$aFile[0]][2]
    For $i = 1 To $aFile[0]
    $aSplit = StringSplit($aFile[$i], @TAB)
    $a2D[$i-1][0] = $aSplit[1]
    $a2D[$i-1][1] = $aSplit[2]
    Next
    _ArrayDisplay($a2D)

    [/autoit]

    getestet mit Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    mfg autoBert

    Dateien

    MoT.txt 54 Byte – 417 Downloads
  • kleines Problem beim Email senden

    • autoBert
    • 13. August 2011 um 12:58

    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/Tutorial Sehr hilfreich ist auch das Buch von peethebee .

    In deinem Skriptausschnitt kann ich 2 Fehler erkennen Web.de benutzt Port 587 und keine SSL-Verschlüsselung.

    In [ gelöst ] Daten an email senden habe ich ein Skript gepostet dass mit GMX funktioniert. In [ gelöst ] Daten an email senden sind die Daten für Web.de und HotMail.de aufgeführt,

    PS.: benutze das nächste mal bitte die AutoIt-Tag's (Schaltfäche mit dem AutoIt-Zeichen) um dein Skript ein zu stellen
    mfg autoBert

  • Shayn is Back [Erklärung im Thread]

    • autoBert
    • 13. August 2011 um 01:38
    Zitat von name22


    Ob die Scripte von ihm stammen oder nicht, weiß im Moment wohl nur er selbst. Aber solange sich niemand beschwert und beweisen kann, dass sein Script ohne Erlaubnis kopiert und unter anderem Namen weiterverbreitet wurde, sehe ich keinen Grund hier nochmals eine Diskussion zu entfachen.

    Gute Einstellung, es wird sich hier warscheins niemand finden, von dem cambweb geguttenbergt hat. Er hat aber imho eine andere Quelle (das "blaue Form") aber solange sich von dort hier niemand beschwert kümmert es mich nicht, obwohl es nicht zum guten Stil gehört.
    Mich wundert wie Mattthias herausgefunden hat das Shayn = CambWeb ist. Ich wäre vom Schreibstil her nicht darauf gekommen, vor allem da campweb 1 Monat länger hie registriert ist als Shayn.
    Dass er ein geschickter Verwerter Ideen anderer Leute ist habe ich zwar auch schon bemerkt, aber der grosse Billy G. hat es am Anfang ähnlich gemacht.

    Also @campweb wenn du Routinen 1:1 übernimmst bitte in Zukunft die Quelle im Skriptcode hinterllegen. Damit ist das Thema für mich erledigt.

    @Mattthias du hast dies (auch was Portierung betrifft) mittlerweile ja auch verstanden, warum wirfst du dann den 1. Stein?

    mfg autoBert

  • Ordnerinhalte auflisten

    • autoBert
    • 13. August 2011 um 00:03
    Zitat von Nachid

    Liegt daran das ich erst seit gestern bei euch bin :DD

    Herzlich willkommen Nachid. ntw: wer hat deine Rüstung so blank poliert ;) ?

  • letzte Zeile eines String auslesen

    • autoBert
    • 12. August 2011 um 23:53

    Hallo DerSchatten,

    ein Array lässt sich mit

    [autoit]

    StringSplit

    [/autoit]

    ganz leicht erzeugen, aber ich habe noch ein Beispiel mit StringMid angehängt (den String bastel ich mir vorher zusammen, dies benötigst du nicht) :

    Spoiler anzeigen
    [autoit]

    #Include <File.au3>
    #Include <Array.au3>

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

    Global $aDirList
    _FileReadToArray(@ScriptDir & "\DirListing.txt",$aDirList)

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

    MsgBox(0,"Lösung bei Zeihlenanzahl in Elemnt 0", $aDirList[$aDirList[0]])

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

    _ArrayDelete($aDirList,0)
    MsgBox(0,"Lösung wenn Elemnt 0 bereits ein Dateieintrag", $aDirList[UBound($aDirList)-1])

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

    $sDir = ""
    for $i = 0 to UBound($aDirList) - 1
    $sDir &= $aDirList[$i]
    if $i < UBound($aDirList) - 1 Then $sDir &= @LF
    Next

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

    ConsoleWrite($sDir)

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

    $sDirFree = StringUpper(StringMid($sDir, StringInStr($sDir, @LF, 0, -1)))

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

    MsgBox(0,"Deine Lösung",$sDirFree)

    [/autoit]

    mfg autoBert

  • Allerletzte Frage

    • autoBert
    • 12. August 2011 um 23:35
    Zitat von Nachid

    White..... bitte bitte keine Fragen mehr - HILFE lesen
    die is sogar extra auf deutsch.

    BTW ich erkenn den unterschied zwischen unserern erklärungen nicht, auto ?

    Ich denke du meinst mich Bert wäre allein ja noch in Ordnunng aber auto (kommt von AutoIt) alleine gefällt mir gar nicht!

    Es gibt im entscheidenden Teil keine, ich hatte mir dein Skrpt nicht angeschaut sonst hätte ich nicht mehr gepostet,

    @White: ich (und ich denke die meisetn anderen hier auch) haben keine Probleme damit Fragen zu beantworten. Wenn aber jemand bereits über 4 Monate hier angemeldet ist und auch schon über 200 Beiträge geschrieben hat erwarte ich einfach dass er das Lösen solch einfacher Fragen über das Lesen der Hilfe zu Stande bringt.

    mfg autoBert

  • letzte Zeile eines String auslesen

    • autoBert
    • 12. August 2011 um 23:26

    Hallo DerSchatten,

    hier 2 Lösungsmöglichkeiten:

    Spoiler anzeigen
    [autoit]

    #Include <File.au3>
    #Include <Array.au3>

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

    Global $aDirList
    _FileReadToArray(@ScriptDir & "\DirListing.txt",$aDirList)

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

    MsgBox(0,"Lösung bei Zeihlenanzahl in Elemnt 0", $aDirList[$aDirList[0]])

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

    _ArrayDelete($aDirList,0)
    MsgBox(0,"Lösung wenn Elemnt 0 bereits ein Dateieintrag", $aDirList[UBound($aDirList)-1])

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

    um das Beispiel zu testen benötigst du: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. In deinem echten Programm erzeugst du dir das Array sicherlich anders,

    mfg autoBert

    Dateien

    DirListing.txt 686 Byte – 243 Downloads
  • Allerletzte Frage

    • autoBert
    • 12. August 2011 um 23:12

    Hallo White,

    in de Hoffnung dass du dein Versprechen war machst, so kannst du feststellen welches ListBox-Item ausgewählt ist:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <WindowsConstants.au3>
    $Form1 = GUICreate("Form1", 419, 358, 192, 124)
    $List1 = GUICtrlCreateList("", 0, 0, 305, 357)
    GUICtrlSetData(-1, "first|hehe|second")
    $Button1 = GUICtrlCreateButton("Button1", 328, 8, 75, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    MsgBox(0,"Aktuelell ausgewählt:",GUICtrlRead($List1))
    EndSwitch
    WEnd

    [/autoit]

    mfg autoBert

  • Ordnerinhalte auflisten

    • autoBert
    • 12. August 2011 um 23:02

    Es kammen zwar viele Antworten, mich wundert aber dass @Oscars FileCommander nicht erwähnt wurde. Dieser enthält imho alle nötigen Grundlagen um das Problem zu lösen.

  • Chat?

    • autoBert
    • 12. August 2011 um 10:37
    Zitat von White

    Also mit TCPConnect verbinde ich mich ja mit einer anderen IP.

    Welche Befehle werde ich noch gebrauchen um seinen Bildschirm zu sehen bzw. Fern zu steuern?

    Möchte so ein kleines Prog schreiben, womit man Chaten kann, verbinden kann ( Fernsteuerung, Präsentation und Datenübertragung ) wie bei Teamviewer halt.

    Aber zuerst einmal die Fernsteuerung.

    Vorher solltest du dir die Grundlagen von AutoIt und die nötigen Kenntnisse in Netzwerken speziell TCP aneignen, danach kannst du darran denken ein solches Projekt anzufangen. Wenn du dann die ersten Versuche hinter dir hast und feststellst, dass bei der Bildschirmübertragung alles sehr langsam und zäh vor sich geht lernst du geschwind noch Assembler um deine Routinen zu beschleunigen. In 3-5 Jahren frühesntens hast du dann deinen eigenen Teamviewer geschrieben,

    mfg autoBert

  • Office 2010 Installationsschlüssel auslesen

    • autoBert
    • 10. August 2011 um 22:42
    Zitat von hightower

    Hab die 105 jetzt mal durch 1617 ersetzt, kommt aber immernoch nicht das richtige :/


    In der Zeit in der du hier rumprobierst an "deine" Keys zu kommen hättest du locker alle Office-Keys einer grossen Bank per Hand inventarisieren können,

    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™