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. Jasfar

Beiträge von Jasfar

  • 3 verschiedene Farben auf bestimmten Koordinaten erkennen und Meldung ausgeben

    • Jasfar
    • 26. April 2019 um 15:26

    Hey Code4Fun,

    Alpines hatte mir damals bei einem Audioplayer einen Tipp geben können: WMPlayer.ocx

    Fand ich persönlich einfacher als mit der Bass.au3.

    Eine kleine Doku von Microsoft:

    https://docs.microsoft.com/en-us/windows/…e-for-scripting

  • Mehrere MP3 Dateien in unterschiedlicher Lautstärke abspielen

    • Jasfar
    • 13. Dezember 2017 um 16:25

    alpines Das schaut echt leicht, schnell und einfach aus, danke für den Tipp! :)

  • Mehrere MP3 Dateien in unterschiedlicher Lautstärke abspielen

    • Jasfar
    • 13. Dezember 2017 um 16:24
    Zitat von Kanashius

    Falls du nur was zum Faden brauchst, und nicht selbst Programmieren möchtest hab ich hier noch nen älteres Projekt von mir: MusikPlayer mit Equalizer,Playlist, etc.

    Damit kann man Lieder abspielen und auch Faden (mit bestimmter Zeit,...), mehrere Playlists, Equalizer, Streams,...

    Eventuell solltest du dir auch VirtualDJ mal ansehen :)

    Vielen Dank!

    Ich hab mir die Version 3 mal heruntergeladen, die UDFs ins Include Verzeichnis gezogen, bekomme aber leider eine Fehlermeldung:

    "C:\Users\mschaefer\Documents\MusicIt\Bass.au3" (158) : ==> Duplicate function name.:

    Func _BASS_Startup($sBassDLL = "")

  • Mehrere MP3 Dateien in unterschiedlicher Lautstärke abspielen

    • Jasfar
    • 13. Dezember 2017 um 11:21

    Vielen Dank für die Einführung, damit sollte ich klar kommen :)

    BananaJoe Mit Audacity habe ich das früher gemacht, allerdings wenn das fertig geschnitten ist, gibt es das Problem, dass man nie genau weiß wie lange die verschiedenen Feuertools brennen, das kommt immer drauf an, deswegen muss man Flexibel sein können was die Musik angeht. Wir haben immer abwechselnd Leute hintern, die die Show im Blick haben und wissen wann das Feuer bald ausgeht, und so das nächste Lied faden können um einen flüssigen Ablauf zu gewährleisten :)

  • Mehrere MP3 Dateien in unterschiedlicher Lautstärke abspielen

    • Jasfar
    • 12. Dezember 2017 um 11:12

    Hallo zusammen,

    ich habe leider beim suchen nicht wirklich etwas gefunden, außer die bass UDF.

    Ich würde gerne folgendes realisieren:

    Und zwar möchte ich gerne 2 MP3 Dateien gleichzeitig abspielen können und zwar in unterschiedlicher Lautstärke.

    Hintergrund ist folgender:

    Ich habe am Freitag einen Feuerschow Auftritt und habe dafür mehrere Musikstücke, diese sollen teilweise gleichzeitig Laufen, teilweiße Soundeffekte abspielen, sobald ein Button dafür gedrückt wird.

    Allerdings habe ich bisher noch nie etwas in dieser Richtung geschrieben, deswegen wollte ich einfach mal um ein paar Denkanstöße bitten :)

    Vielen Dank schon einmal!

  • FileCopy() alle Dateien

    • Jasfar
    • 3. November 2017 um 13:28

    Ich danke die vielmals!!

    Durch dein Script bin ich auf den Fehler bei mir gestoßen, die Variable $username war das GUI Control, ich hätte $read_username setzen müssen :D

    Ich werde mir dein Script aber mal genauer anschauen und es dann umsetzen, vielen Dank für deine Unterstützung :)

  • FileCopy() alle Dateien

    • Jasfar
    • 3. November 2017 um 13:20

    Ah, den neuen Beitrag erst jetzt gesehen, werde das gleich einmal ausprobieren, danke dir :)

  • FileCopy() alle Dateien

    • Jasfar
    • 3. November 2017 um 13:19

    Das kopieren hat leider auch nicht funktioniert...

    Ich poste einmal das komplette Script, vl. hilft das weiter :)

    C
    ;*****************************************
    ;Datenübertragung.au3 by mschaefer
    ;Erstellt mit ISN AutoIt Studio v. 1.06
    ;*****************************************
    
    ; -- Created with ISN Form Studio 2 for ISN AutoIt Studio -- ;
    #include <StaticConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Include <GuiButton.au3>
    #include <EditConstants.au3>
    #include <ProgressConstants.au3>
    $mypcname = @ComputerName
    
    
    
    $gui = GUICreate("Datenübertraung",492,217,-1,-1,-1,-1)
    GUICtrlCreateLabel("Alter PC:",20,30,106,15,-1,-1)
    GUICtrlSetBkColor(-1,"-2")
    $olddns = GUICtrlCreateLabel($mypcname,142,30,170,15,-1,-1)
    GUICtrlSetBkColor(-1,"-2")
    GUICtrlCreateLabel("Neuer PC:",20,69,106,15,-1,-1)
    GUICtrlSetBkColor(-1,"-2")
    Global $newpc = GUICtrlCreateInput("",162,64,150,20,-1,$WS_EX_CLIENTEDGE)
    Global $username = GUICtrlCreateInput("",162,107,150,20,-1,$WS_EX_CLIENTEDGE)
    GUICtrlCreateLabel("Benutzername:",20,112,106,15,-1,-1)
    GUICtrlSetBkColor(-1,"-2")
    $button = GUICtrlCreateButton("Übertragung starten",20,157,142,30,BitOr($BS_CENTER,$BS_MULTILINE),-1)
    ;~ $status = GUICtrlCreateLabel("",180,170,235,15,-1,-1)
    GUICtrlSetBkColor(-1,"-2")
    GUISetState(@SW_SHOW,$gui)
    
    
    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $button
                
                $gui2 = GUICreate("REAL Administator Passwort",390,132,-1,-1,-1,-1)
                GUICtrlCreateLabel("Bitte die ADM-Zugangsdaten eingeben:",10,10,358,15,-1,-1)
                GUICtrlSetBkColor(-1,"-2")
                GUICtrlCreateLabel("Benutzername:",10,37,95,15,-1,-1)
                GUICtrlSetBkColor(-1,"-2")
                GUICtrlCreateLabel("Passwort:",10,60,95,15,-1,-1)
                GUICtrlSetBkColor(-1,"-2")
                $admuser = GUICtrlCreateInput("",131,32,150,20,-1,$WS_EX_CLIENTEDGE)
                $admpw = GUICtrlCreateInput("",131,55,150,20,$ES_PASSWORD,$WS_EX_CLIENTEDGE)
                $admbutton = GUICtrlCreateButton("OK",131,88,100,30,-1,-1)
                GUISetState(@SW_SHOW,$gui2)
                
                
                
                
                While 1
                    $nMsg = GUIGetMsg()
                        Switch $nMsg
                            Case $GUI_EVENT_CLOSE
                                Exit
                            Case $admbutton
                                $read_newpc = GUICtrlRead($newpc)
                                $read_admuser = GUICtrlRead($admuser)
                                $read_admpw = GUICtrlRead($admpw)
                                $read_user = GUICtrlRead($username)
                                GUIDelete($gui)
                                $a = DriveMapAdd("A:","\\" & $read_newpc & "\C$\Users\" & $read_user,0,"real\" & $read_admuser,$read_admpw)
                                $read_admuser = "anmkrthon4q3foi aödhfnq4aficvoaöqARUITRH)NVUDFADFAOFHAJERHABFJKBABFbfajksdfhbhqiubakjbf"
                                $read_admpw = "amdsifnarignajdfghanrguvafdlkvgnafldi5tut84wih539084tifhernotuih3498thweurt3948trhwuth34trrhw348t3n"
                                    If @error = 1 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 1 " & @CRLF & "Undefinierter / anderer Fehler. " & @CRLF & "Fehlercode der Windows API:" & @CRLF & @extended,0)
                                    ElseIf @error = 2 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 2 " & @CRLF & "Der Zugriff auf die Remote-Freigabe wurde verweigert.",0)
                                    ElseIf @error = 3 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 3 " & @CRLF & "Dieses Gerät ist bereits zugewiesen.",0)
                                    ElseIf @error = 4 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 4 " & @CRLF & "Der Gerätename ist ungültig.",0)
                                    ElseIf @error = 5 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 5 " & @CRLF & "Ungültige Remote-Freigabe.",0)
                                    ElseIf @error = 6 Then
                                        MsgBox(16,"Datenübertragungsfehler","Fehlercode: 6 " & @CRLF & "Ungültiger Benutzername oder Passwort.",0)
                                    ElseIf @error = 0 Then
                                        GUIDelete($gui2)
                                        $gui3 = GUICreate("Datenübertragung läuft...",422,78,-1,-1,-1,-1)
                                        $progress = GUICtrlCreateProgress(10,10,403,20,$PBS_SMOOTH ,-1)
                                        $progressbutton = GUICtrlCreateButton("OK",162,40,100,30,-1,-1)
                                        GUICtrlSetState(-1,BitOr($GUI_SHOW,$GUI_DISABLE))
                                        GUISetState(@SW_SHOW,$gui3)
                                        
                                        ;Daten übertragen
                                        
                                        $olddrive = "C:\Users\" & $username
                                        $newdrive = "A:\"
                                        If DirCopy($olddrive & "\Desktop",$newdrive & "\Desktop\",1) Then
                                            GUICtrlSetData($progress,10)
                                        Else
                                            MsgBox(16,"Datenübertragunsfehler","Dateien vom Desktop konnten nicht kopiert werden.")
                                        EndIf
                                        
                                        $copy_bilder = FileCopy($olddrive & "\Pictures\*.*",$newdrive & "\Pictures\",1)
                                        If $copy_bilder = 1 then
                                            GUICtrlSetData($progress,20)
                                        ElseIf $copy_bilder = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Datein von "Bilder" konnten nicht kopiert werden.')
                                        EndIf
                                        $copy_dokumente = FileCopy($olddrive & "\Documents\*.*",$newdrive & "\Documents\",1)
                                        If $copy_dokumente = 1 Then
                                            GUICtrlSetData($progress,30)
                                        ElseIf $copy_dokumente = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Dokumente" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_download = FileCopy($olddrive & "\Downloads\*.*",$newdrive & "\Downloads\",1)
                                        If $copy_download = 1 Then
                                            GUICtrlSetData($progress,40)
                                        ElseIf $copy_download = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Downloads" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_fav = FileCopy($olddrive & "\Favorites\*.*",$newdrive & "\Favorites\",1)
                                        If $copy_fav = 1 Then
                                            GUICtrlSetData($progress,50)
                                        ElseIf $copy_fav = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Favorieten" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_contact = FileCopy($olddrive & "\Contacts\*.*",$newdrive & "\Contacts\",1)
                                        If $copy_contact = 1 Then
                                            GUICtrlSetData($progress,60)
                                        ElseIf $copy_contact = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Kontakte" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_links = FileCopy($olddrive & "\Links\*.*",$newdrive & "\Links\",1)
                                        If $copy_links = 1 Then
                                            GUICtrlSetData($progress,70)
                                        ElseIf $copy_links = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Links" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_music = FileCopy($olddrive & "\Music\*.*",$newdrive & "\Music\",1)
                                        If $copy_music = 1 Then
                                            GUICtrlSetData($progress,80)
                                        ElseIf $copy_music = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Musik" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_video = FileCopy($olddrive & "\Videos\*.*",$newdrive & "\Videos\",1)
                                        If $copy_video = 1 Then
                                            GUICtrlSetData($progress,90)
                                        ElseIf $copy_video = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Videos" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_ffbackup = FileCopy($olddrive & "\AppData\Roaming\Mozilla\Firefox\Profiles\*.*",$newdrive & "\FIREFOX BACKUP\",8)
                                        If $copy_ffbackup = 1 Then
                                            GUICtrlSetData($progress,95)
                                        ElseIf $copy_ffbackup = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Firefox Backup" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        Sleep(250)
                                        DriveMapDel("A:")
                                        GUICtrlSetData($progress,100)
                                        Sleep(100)
                                        GUICtrlSetState($progressbutton,$GUI_ENABLE)
                                        
    
    
                                        While 1
                                            
                                            $nMsg = GUIGetMsg()
                                            Switch $nMsg
                                                Case $GUI_EVENT_CLOSE
    ;~                                                 Exit
                                                Case $progressbutton
                                                    Exit
    
                                            EndSwitch
                                        WEnd
                                    EndIf
                                
                                
                                
                                
                                
                                
                                
                                
    
                        EndSwitch
                WEnd
    
        EndSwitch
    WEnd
    Alles anzeigen
  • FileCopy() alle Dateien

    • Jasfar
    • 3. November 2017 um 11:57

    Danke für die Antwort! :)

    Hat leider auch nicht funktioniert. Es kommt wieder eine Fehlermeldung.

  • FileCopy() alle Dateien

    • Jasfar
    • 3. November 2017 um 09:49

    Hallo zusammen,

    nach langem muss ich mal wieder was in au3 schreiben, da wir auf Arbeit aber momentan viel zutun haben, benötige ich Hilfe bei einem einfachen Programm.

    Es geht darum, dass wir nach einem Rechnertausch schnell die Daten per Script auf den neuen Rechner übertragen wollen. Dafür wird auf dem alten Rechner der neue als Laufwerk eingebunden. Funktioniert alles problemlos.

    Nun ist es aber so, dass bei der Datenübertragung immer ein Fehler auftritt. Wahrscheinlich ist es ein Anfängerfehler, aber ich komme leider trotzdem nicht weiter.

    Hier einmal das Script ab dem Zeitpunkt des Fehlers:

    Code
    ;Daten übertragen
                                        $olddrive = "C:\Users\" & $username
                                        $newdrive = "A:\"
                                        $copy_desktop = FileCopy($olddrive & "\Desktop\*.*",$newdrive & "\Desktop\",1)
                                        If $copy_desktop = 1 Then
                                            GUICtrlSetData($progress,10)
                                        ElseIf $copy_desktop = 0 Then
                                            MsgBox(16,"Datenübertragunsfehler","Dateien vom Desktop konnten nicht kopiert werden.")
                                        EndIf
                                        $copy_bilder = FileCopy($olddrive & "\Pictures\*.*",$newdrive & "\Pictures\",1)
                                        If $copy_bilder = 1 then
                                            GUICtrlSetData($progress,20)
                                        ElseIf $copy_bilder = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Datein von "Bilder" konnten nicht kopiert werden.')
                                        EndIf
                                        $copy_dokumente = FileCopy($olddrive & "\Documents\*.*",$newdrive & "\Documents\",1)
                                        If $copy_dokumente = 1 Then
                                            GUICtrlSetData($progress,30)
                                        ElseIf $copy_dokumente = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Dokumente" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_download = FileCopy($olddrive & "\Downloads\*.*",$newdrive & "\Downloads\",1)
                                        If $copy_download = 1 Then
                                            GUICtrlSetData($progress,40)
                                        ElseIf $copy_download = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Downloads" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_fav = FileCopy($olddrive & "\Favorites\*.*",$newdrive & "\Favorites\",1)
                                        If $copy_fav = 1 Then
                                            GUICtrlSetData($progress,50)
                                        ElseIf $copy_fav = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Favorieten" konnten nicht kopiert werden.')                                
                                        EndIf
                                        $copy_contact = FileCopy($olddrive & "\Contacts\*.*",$newdrive & "\Contacts\",1)
                                        If $copy_contact = 1 Then
                                            GUICtrlSetData($progress,60)
                                        ElseIf $copy_contact = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Kontakte" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_links = FileCopy($olddrive & "\Links\*.*",$newdrive & "\Links\",1)
                                        If $copy_links = 1 Then
                                            GUICtrlSetData($progress,70)
                                        ElseIf $copy_links = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Links" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_music = FileCopy($olddrive & "\Music\*.*",$newdrive & "\Music\",1)
                                        If $copy_music = 1 Then
                                            GUICtrlSetData($progress,80)
                                        ElseIf $copy_music = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Musik" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_video = FileCopy($olddrive & "\Videos\*.*",$newdrive & "\Videos\",1)
                                        If $copy_video = 1 Then
                                            GUICtrlSetData($progress,90)
                                        ElseIf $copy_video = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Videos" konnten nicht kopiert werden.')                                
                                        EndIf
                                        
                                        $copy_ffbackup = FileCopy($olddrive & "\AppData\Roaming\Mozilla\Firefox\Profiles\*.*",$newdrive & "\FIREFOX BACKUP\",8)
                                        If $copy_ffbackup = 1 Then
                                            GUICtrlSetData($progress,95)
                                        ElseIf $copy_ffbackup = 0 Then
                                            MsgBox(16,"Datenübertragungsfehler",'Dateien von "Firefox Backup" konnten nicht kopiert werden.')                                
                                        EndIf
    Alles anzeigen

    Auf die einzelnen Ordner hat man Zugriff, auch die Pfade habe ich überprüft, allerdings scheitert das immer wieder aufs neue :(

    Für Hilfe bin ich sehr Dankbar :)

  • Buttonabfrage bei GDI+

    • Jasfar
    • 12. November 2015 um 11:25

    Hallo zusammen,

    im Moment habe ich ein recht großes Projekt vor mir, ein Managerspiel... :rolleyes:
    Bisher klappte auch alles Problemlos. Ich kann ein Spiel starten und bekomme die entsprechenden Grafiken angezeigt. Ich kann einzellne Punkte auf einer Karte ansteuern usw. Doch jetzt hänge ich und komme seit zwei Tagen nicht mehr weiter... ;(

    Hier das Problem:
    Ich habe eine Karte, welche normal als Hintergrundgrafik angelegt ist. Die Karte hat einige Punkte welche mit Unsichtbaren Labels angeklickt werden können (GUISetOnEventMode, 1). Beim Ansteuern soll folgendes Passieren:
    Neben dem Objekt wird ein Fenster erstellt indem man verschiedene Optionen hat: Gehört es keinem, kann man es Kaufen, gehört es mir kann ich es betreten und gehört es dem Gegner kann ich es Angreifen. Das erstellen des Fensters mit GDI+ war kein Problem (habe mich zum ersten mal an GDI+ versucht und durch Tutorials war das kein Problem).
    Jetzt habe ich aber folgenden Wunsch.. Drückt man irgendwo auf die Karte soll das Fenster verschwinden (funktioniert mit _IsPressed)
    Drückt man aber innerhalb des Fensters auf einen Button soll eine neue Funktion aufgerufen werden.

    Ich zeig euch hierzu mal die Funktion:

    Spoiler anzeigen
    AutoIt
    Func toObj($ObjID)
    	Opt("GUIOnEventMode", 0)
    	Sleep(100)
    	$mousepos = MouseGetPos()
    	$InfoGui = GUICreate("InfoGui",200,200,$mousepos[0],$mousepos[1], $WS_POPUP, -1,$game)
    
    	GUISetState()
    	_GDIPlus_Startup()
    	$GDIInfoGui = _GDIPlus_GraphicsCreateFromHWND($InfoGui)
    	$red = _GDIPlus_BrushCreateSolid(0xF7FFB0B0)
    	$redpen = _GDIPlus_PenCreate(0xF7FF0000, 3)
    	$green = _GDIPlus_BrushCreateSolid(0xF7C2FFB0)
    	$greenpen = _GDIPlus_PenCreate(0xF74DFF00,3)
    	$gray = _GDIPlus_BrushCreateSolid(0xF7E6E6E6)
    	$graypen = _GDIPlus_PenCreate(0xF78A8A8A,3)
    
    	; Überprüfen des Objekts und setzen der richtigen Farbe
    	$owner = IniRead(@ScriptDir & "\tmpsave.shg","Game","Obj" & $ObjID,"0")
    	If $towner = 0 Then ; Gehört keinem
    		_GDIPlus_GraphicsFillRect($GDIInfoGui,0,0,1100,800,$gray)
    		_GDIPlus_GraphicsDrawRect($GDIInfoGui,0,0,199,199,$graypen)
    		_GDIPlus_GraphicsDrawRect($GDIInfoGui,50,50,100,40,$graypen)
    		;_GDIPlus_GraphicsDrawString($GDIInfoGui,"KAUFEN",50,50)
    	ElseIf $toiletowner = 1 Then ; Gehört Spieler
    		_GDIPlus_GraphicsFillRect($GDIInfoGui,0,0,1100,800,$green)
    		_GDIPlus_GraphicsDrawRect($GDIInfoGui,0,0,199,199,$greenpen)
    	ElseIf $toiletowner = 2 Then ; Gehört Gegner
    		_GDIPlus_GraphicsFillRect($GDIInfoGui,0,0,1100,800,$red)
    		_GDIPlus_GraphicsDrawRect(GDIInfoGui,0,0,199,199,$redpen)
    	EndIf	
    
    	WinSetTrans("InfoGui","",220)
    	_GDIPlus_GraphicsDrawString(GDIInfoGui,"Obj " & $ObjID & " Informationen",25,10,"Comic Sans MS",12)
    	$buttontest = _GUICtrlButton_Create($InfoGui,"KAUFEN",50,50,100,40)
    	While 1
    
    
    Switch GuiGetMsg()
    Case $buttontest
    MsgBox(0,"","Bestanden")
    EndSwitch
    
    
    	If _IsPressed("01") Then
    		_GDIPlus_BrushDispose($red)
    		_GDIPlus_BrushDispose($green)
    		_GDIPlus_BrushDispose($gray)
    		_GDIPlus_GraphicsDispose($GDIInfoGui)
    		_GDIPlus_PenDispose($redpen)
    		_GDIPlus_PenDispose($greenpen)
    		_GDIPlus_PenDispose($graypen)
    		_GDIPlus_Shutdown()
    		GUIDelete($InfoGui)
    		Opt("GUIOnEventMode", 1)
    		ExitLoop
    	EndIf
    	WEnd
    EndFunc
    Alles anzeigen

    Ich würde mich freuen wenn mir jemand helfen könnte oder mir vielleicht eine einfacherer oder elegantere Lösung zeigt :)

    Liebe Grüße
    Marvin

  • [Sammelthread] Fangfragen, Rätsel & Co

    • Jasfar
    • 27. Mai 2015 um 10:57

    Kenne da auch noch eine kleine Wette die man auf jeden Fall gewinnt^^
    Bietet einem Freund eine Wette an indem ihr sagt: "Ich Wette mit dir, wenn du stehen bleibst und ich einmal um die herumlaufe wirst du keine Hose mehr anhaben." Sollte er das nicht mitmachen wollen sagt ihm, dass ihr in nicht berühren werdet.
    Willigt er die Wette ein geh einfach langsam um ihn herum, er wird euch gespannt und irritiert dabei ansehen, allein der Blick ist es Wert. Danach stellt euch vor ihn, ihr habt die Wette gewonnen.
    Denn: Er Stand mit einer Hose da, ihr seid um ihn herum gelaufen, er steht weiterhin nur mit einer Hose da, er hat also keine Hose mehr an, mehr im sinne von keine weitere Hose.

  • Error: Variable used without being declared

    • Jasfar
    • 15. September 2014 um 11:25

    Hi,

    versuch mal den Fehler herauszufinden wenn du nicht die exe startest, sondern deine au3 Datei. Dann bekommst du die entsprechende Fehlerzeile angezeigt.

  • Na dann stell ich mich auch mal vor.

    • Jasfar
    • 10. September 2014 um 15:17

    Auch von mir ein freundliches Hallo und Willkommen! :)

  • [spiel] Wünsch dir was !

    • Jasfar
    • 29. August 2014 um 17:24

    Mein wunsch wurde erfüllt ^^

    Dann bekommst du natürlich auch deinen Hirncomputer... Allerdings hat er nun auch Bedürfnisse, die du wohl jetzt erfüllen musst, bist du nicht lieb zu ihm verweigert er das arbeiten :P


    Ich wünsche mir meinen bestandenen Jagdschein und Falknerschein :)

  • [spiel] Wünsch dir was !

    • Jasfar
    • 29. August 2014 um 15:31

    Den PC mit Spiel bekommt deine Freundin. Allerdings wird sie süchtig nach dem Spiel und ihr seht euch im realen Leben niemals wieder :P

    Ich wünsche mir Feierabend ^^

  • Grundlegende Frage zu TCP

    • Jasfar
    • 29. August 2014 um 15:18

    Super vielen Dank :)

  • Grundlegende Frage zu TCP

    • Jasfar
    • 29. August 2014 um 15:05

    Hallo, und danke für die wirklich sehr schnelle Antwort^^

    Müssen die Clients und der Server in einem Netzwerk sein oder können Clients welche sich nicht im selben Netzwerk befinden auch auf den Server zugreifen?

    Das mit der Sicherheit, nunja gut, ... :S
    Vl. fällt mir da irgendwas ein, mir schwirren da schon diverse Dinge im Kopf... Würde das ganze dann zwar nicht unüberwindbar machen, aber etwas aufwändiger^^

    LG

  • Grundlegende Frage zu TCP

    • Jasfar
    • 29. August 2014 um 14:54

    Hallo zusammen,

    ich habe es noch nicht ausprobiert, aber einfach mal eine Grundlegende Frage zu den TCP - Möglichkeiten in AutoIt.

    Geplant ist ein Server/Client System. Der Server soll alle TCP - Anfragen der Clients verwalten und dementsprechend Aufgaben ausführen (Daten speichern etc.), allerdings sollen auch die Clients die Möglichkeit haben TCP - Anfragen vom Server zu erhalten. Nachdem was ich bisher gelesen habe, sollte das soweit erstmal kein Problem darstellen.

    Meine Frage ist jetzt folgende:
    Die IP Adresse des Servers ändert sich nicht. Die der Clients können sich aber natürlich jederzeit ändern bzw. es können jederzeit neue dazu kommen. Über eine Art "Login - System" wird die neue IP - Adresse an den Server übermittelt.
    Frage nun ist allerdings, da es sich nicht um ein Netzwerk handelt sondern es auch über das Internet funktionieren soll, was beachtet werden muss damit es funktioniert. Was für mögliche Sicherheitsrisiken gibt es und wie kann man diese "absichern"?
    Wie viele Clients lassen sich über TCP mittels AutoIt gleichzeitig verwalten? Hat jemand bereits Erfahrung mit einem ähnlichen Vorhaben gemacht?

    Ich bedanke mich schon jetzt recht herzlich für eure Antworten :love:

  • Bugtracker

    • Jasfar
    • 29. August 2014 um 14:45

    Hallo, danke für eure Antworten!

    Ich habe mir eure Systeme mal angesehen und wir haben uns für Mantis entschieden, einfach und sauber :)

    Natürlich wird AutoIt verwendet, und natürlich werden wir zumindest die "Client" - Seite OpenSource handhaben. Den entsprechenden Server dazu erstmal nicht, das wird evtl. später OpenSource.

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™