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

Beiträge von MalteH2012

  • PSU - PrivateServingUnit

    • MalteH2012
    • 5. Mai 2013 um 21:21

    Wenn ich grade so daran arbeite fällt mir auf das das garnicht soviel Arbeit ist wie ich gedacht hatte :D :rolleyes: .
    Danke für den Weckruf BugFix!

    Dann close ich das hier mal :)

  • PSU - PrivateServingUnit

    • MalteH2012
    • 5. Mai 2013 um 21:00

    Der eigentliche Zweck des Programms liegt darin, Dateipfade und URL's Buttons zuzuweisen um sie schnell aufrufen zu können. Wenn ich beispielsweise in den Ordner Roaming will muss ich nicht erst die Windows Taste + R drücken, %appdata% eingeben und enter drücken, sondern lediglich den Button drücken. Das soll einfach Zeit sparen, und es sollen auch "Mehrbefehlbuttons" implementiert werden, also Buttons die beispielsweise Google öffnen können und bestimmte Suchbegriffe automatisch suchen oder Facebook aufrufen und die Anmeldedaten automatisch einfüllen. Hoffe das klärt deine Frage

  • PSU - PrivateServingUnit

    • MalteH2012
    • 5. Mai 2013 um 19:44

    Hey ihr Lieben,

    nach langem habe ich endlich wieder Zeit zum Programmieren und habe direkt mit einem neuen Projekt angefangen.
    Ich will jedoch vorweg sagen: Alle Updates usw. werden nicht hier reingestellt sondern werden hier zu finden sein.

    PSU wird nach meiner Vorstellung in Deutsch und Englisch, vorerst aber NUR in englisch, verfügbar sein.
    Ich suche also Programmierer die motiviert sind ein KOSTENLOSES, Spaßorientiertes Programm zu erstellen!
    Wenn ihr mitmachen wollt dann schreibt mich bitte hier an.

    Wenn ihr Fragen habt könnt ihr diese auch auf der Seite unter der Sparte Questions? schreiben, kann auch auf Deutsch sein ;)!

    Ich würde mich über ein wenig Hilfe freuen :) :) :thumbup:

    EDIT: natürlich könnt ihr euch auch hier melden!

  • Bei Programmstart überprüfen, ob das Programm zum ersten mal auf dem PC läuft.

    • MalteH2012
    • 14. April 2012 um 17:22

    Ach jetzt versteh ich das......aber warum die mit fileinstall ginge doch genau so mit Ini / FileWrite.....

  • Bei Programmstart überprüfen, ob das Programm zum ersten mal auf dem PC läuft.

    • MalteH2012
    • 14. April 2012 um 17:04

    Ich steig nich mehr durch

  • Error bei If FileExists..

    • MalteH2012
    • 14. April 2012 um 16:50

    Hilft mir bei meinem Problem aber auch nicht weiter....trotzdem danke!

  • Error bei If FileExists..

    • MalteH2012
    • 14. April 2012 um 16:17

    Die ganzen Buttons etc. sind noch nicht belegt aber der Error wird in Zeile 12 angezeigt!
    Sonst hab ich noch keine If/EndIf verwendet...

    (Ich steh noch ganz am Anfang!)

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <File.au3>

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

    If Not FileExists(@ScriptDir&"\Path.ini") Then
    MsgBox(0,0,"Sie werden nun in die Optionen weitergeleitet. Bitte geben sie alle nötigen Pfade an!")
    FileWrite(@ScriptDir&"\Path.ini", "Not Defined")
    _Pfad
    EndIf
    If FileExists(@ScriptDir&"\Path.ini") Then
    Pfad
    EndIf

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

    #Region ### START Koda GUI section ### Form=
    $FreeBird = GUICreate("FreeBird", 449, 345, 303, 172)
    $MenuItem1 = GUICtrlCreateMenu("&Menü")
    $MenuItem5 = GUICtrlCreateMenuItem("Exit Shift+Ctrl+E"&@TAB&"", $MenuItem1)
    $MenuItem2 = GUICtrlCreateMenu("&Optionen")
    $MenuItem3 = GUICtrlCreateMenu("&Hilfe")
    $MenuItem4 = GUICtrlCreateMenu("Ü&ber")
    $HAllo = GUICtrlCreateLabel("Hallo, bitte wählen sie eine der folgenden Optionen indem sie einen der Buttons klicken! .", 8, 8, 423, 17)
    $Hallo2 = GUICtrlCreateLabel("Sie werden dann zum jeweiligen Untermenü weitergeleitet!", 88, 32, 278, 17)
    $Button1 = GUICtrlCreateButton("Nicht belegt!", 8, 56, 65, 33)
    $Button2 = GUICtrlCreateButton("Nicht belegt!", 80, 56, 65, 33)
    $Button3 = GUICtrlCreateButton("Nicht belegt!", 152, 56, 65, 33)
    $Button4 = GUICtrlCreateButton("Nicht belegt!", 224, 56, 65, 33)
    $Button5 = GUICtrlCreateButton("Nicht belegt!", 296, 56, 65, 33)
    $Button6 = GUICtrlCreateButton("Nicht belegt!", 368, 56, 65, 33)
    $Button7 = GUICtrlCreateButton("Nicht belegt!", 8, 100, 65, 33)
    $Button8 = GUICtrlCreateButton("Nicht belegt!", 80, 100, 65, 33)
    $Button9 = GUICtrlCreateButton("Nicht belegt!", 152, 100, 65, 33)
    $Button10 = GUICtrlCreateButton("Nicht belegt!", 224, 100, 65, 33)
    $Button11 = GUICtrlCreateButton("Nicht belegt!", 296, 100, 65, 33)
    $Button12 = GUICtrlCreateButton("Nicht belegt!", 368, 100, 65, 33)
    $Button13 = GUICtrlCreateButton("Nicht belegt!", 8, 229, 65, 33)
    $Button14 = GUICtrlCreateButton("Nicht belegt!", 80, 229, 65, 33)
    $Button15 = GUICtrlCreateButton("Nicht belegt!", 152, 229, 65, 33)
    $Button16 = GUICtrlCreateButton("Nicht belegt!", 224, 229, 65, 33)
    $Button17 = GUICtrlCreateButton("Nicht belegt!", 296, 229, 65, 33)
    $Button18 = GUICtrlCreateButton("Nicht belegt!", 368, 229, 65, 33)
    $Button19 = GUICtrlCreateButton("Nicht belegt!", 8, 273, 65, 33)
    $Button20 = GUICtrlCreateButton("Nicht belegt!", 80, 273, 65, 33)
    $Button21 = GUICtrlCreateButton("Nicht belegt!", 152, 273, 65, 33)
    $Button22 = GUICtrlCreateButton("Nicht belegt!", 224, 273, 65, 33)
    $Button23 = GUICtrlCreateButton("Nicht belegt!", 296, 273, 65, 33)
    $Button24 = GUICtrlCreateButton("Nicht belegt!", 368, 273, 65, 33)
    $Button25 = GUICtrlCreateButton("Nicht belegt!", 8, 145, 65, 33)
    $Button26 = GUICtrlCreateButton("Nicht belegt!", 80, 145, 65, 33)
    $Button27 = GUICtrlCreateButton("Nicht belegt!", 152, 145, 65, 33)
    $Button28 = GUICtrlCreateButton("Nicht belegt!", 224, 145, 65, 33)
    $Button29 = GUICtrlCreateButton("Nicht belegt!", 296, 145, 65, 33)
    $Button30 = GUICtrlCreateButton("Nicht belegt!", 368, 145, 65, 33)
    $Button31 = GUICtrlCreateButton("Nicht belegt!", 8, 189, 65, 33)
    $Button32 = GUICtrlCreateButton("Nicht belegt!", 80, 189, 65, 33)
    $Button33 = GUICtrlCreateButton("Nicht belegt!", 152, 189, 65, 33)
    $Button34 = GUICtrlCreateButton("Nicht belegt!", 224, 189, 65, 33)
    $Button35 = GUICtrlCreateButton("Nicht belegt!", 296, 189, 65, 33)
    $Button36 = GUICtrlCreateButton("Nicht belegt!", 368, 189, 65, 33)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $MenuItem5
    Exit
    Case $Button1
    Case $Button2
    Case $Button3
    Case $Button4
    Case $Button5
    Case $Button6
    Case $Button7
    Case $Button8
    Case $Button9
    Case $Button10
    Case $Button11
    Case $Button12
    Case $Button13
    Case $Button14
    Case $Button15
    Case $Button16
    Case $Button17
    Case $Button18
    Case $Button19
    Case $Button20
    Case $Button21
    Case $Button22
    Case $Button23
    Case $Button24
    Case $Button25
    Case $Button26
    Case $Button27
    Case $Button28
    Case $Button29
    Case $Button30
    Case $Button31
    Case $Button32
    Case $Button33
    Case $Button34
    Case $Button35
    Case $Button36

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

    EndSwitch
    WEnd

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

    Func _Pfad
    $Path1 = IniRead( @ScriptDir&"Path.ini", "Line1")
    EndFunc

    [/autoit]
  • Error bei If FileExists..

    • MalteH2012
    • 14. April 2012 um 14:33

    Die 2te Möglichkeit wäre soweit ok, der Error will aber nich gehen :huh:

  • Error bei If FileExists..

    • MalteH2012
    • 14. April 2012 um 14:22

    ich bekomme bei folgendem einen Syntax-Error und weiß nicht wieso: (Zeile 5)

    Script
    [autoit]

    If Not FileExists(@ScriptDir&"\Path.ini") Then
    MsgBox(0,0,"Sie werden nun in die Optionen weitergeleitet. Bitte geben sie alle nötigen Pfade an!")
    FileWrite(@ScriptDir&"\Path.ini", "Not Defined")
    _Pfad
    If FileExists(@ScriptDir&"\Path.ini") Then
    _Pfad
    EndIf

    [/autoit]

    Danke im Voraus

  • Bei Programmstart überprüfen, ob das Programm zum ersten mal auf dem PC läuft.

    • MalteH2012
    • 14. April 2012 um 13:19

    Stimmt das hatt ich ganz vergessen....dank dir :D
    Dann test ich das ma ^^

  • Bei Programmstart überprüfen, ob das Programm zum ersten mal auf dem PC läuft.

    • MalteH2012
    • 14. April 2012 um 12:54

    Das wär schon mal n Anfang auch mit der ini....da gäbs 1 problem....der pfad der datei ändert sich ja wahrscheinlich....dann wirds schwierig ausser man konstruiert n installer und das wäre ja unnötig...

    Aber schon mal n guter Anfang! :D

  • Bei Programmstart überprüfen, ob das Programm zum ersten mal auf dem PC läuft.

    • MalteH2012
    • 14. April 2012 um 12:46

    Hallo,

    ich möchte ein Multitool erstellen von dem aus der Benutzer einige Programme (bspw:: Firefox, Word, Skype, etc...) öffnen kann...
    Da ich nun aber die Pfade der dateien brauche und nicht weiß wie ich das machen kann brauche ich ein bischen Hilfe :)

    Ich hatte mir das im Prinzip so vorgestellt das das Programm alle Pfade in einer z.B. Txt datei speichert. Wenn diese nicht vorhanden ist wird der User darauf hingewiesen und in die Optionen geleitet wo er dann die Pfade eingibt.....

    Danke im Voraus

  • "Wo ist mein Wasser?" Projekt sucht mithilfe

    • MalteH2012
    • 7. Dezember 2011 um 15:30

    Falls ihr noch Helfer sucht:
    <----------------

    Skype: minimalte95

  • GuiCtrlSetState Problem

    • MalteH2012
    • 16. Juni 2011 um 18:58

    Ok 1tens ich hab in sklype dir das schon 20 mal erklärt und 2tens....ja das mein ich Raupi , es ist fürn Browser Free Bird, ist jetzt erledigt!

  • GuiCtrlSetState Problem

    • MalteH2012
    • 15. Juni 2011 um 15:05

    Mhhhmmmmmmm geht nicht.!

  • GuiCtrlSetState Problem

    • MalteH2012
    • 15. Juni 2011 um 14:42

    ICh möchte das ein Input, wenn er angeklickt ist, nich mit GuiCtrlSetState editiert werden darf......wenn er jedoch nicht angeklickt ist, darf er editiert werden!

    :D

  • Betriebssystem Umfrage

    • MalteH2012
    • 15. Juni 2011 um 12:05

    Hab auch Vista.....will Win7 aber hab im Moment nich soooo viel kohle für n ordentlichen gaming-PC :S

  • Input mit Enter auslesen

    • MalteH2012
    • 11. Juni 2011 um 18:42

    @H2112....habs abgeändert

    [autoit]

    If _IsPressed("0D") And WinActive($GUI_main) Then
    _Send()
    EndIf

    [/autoit]

    DIe Func _Send() hab ich scho definiert.....
    Jetzt klappt alles
    @XovoxKingdom.......ähhhm check das script iwie nich....

    DANKE!

  • Input mit Enter auslesen

    • MalteH2012
    • 11. Juni 2011 um 18:19

    Wo muss ich das einfügen könnts du das vllt ins Scripteinfügen!

  • Input mit Enter auslesen

    • MalteH2012
    • 11. Juni 2011 um 18:05

    Hi,

    ich möchte das bei dem Browser die URL aus dem Input mit dem Button "Send" und mit der EnterTaste geladen wird......!

    Script
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <ProgressConstants.au3>
    #include <IE.au3>
    #include <TreeViewConstants.au3>
    #include <File.au3>
    #include <FileConstants.au3>
    #include <GuiEdit.au3>
    #include <GuiConstantsEx.au3>
    #Include <Misc.au3>

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

    $IE = _IECreateEmbedded()

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

    #Region ### START Koda GUI section ### Form=c:\users\malte\desktop\autoit scripts\koda_2008-10-03\forms\browser.kxf
    $GUI_main = GUICreate("FreeBird", 1186, 889, 51, 44)
    $Adresszeile = GUICtrlCreateInput("http://www.google.de/", 96, 8, 425, 24)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label1 = GUICtrlCreateLabel("URL:", 16, 8, 34, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $GUI_Send = GUICtrlCreateButton("Send", 528, 8, 75, 25, 0)
    $GUI_Home = GUICtrlCreateButton("Home", 608, 8, 67, 25, 0)
    $GUI_menu_datei = GUICtrlCreateMenu("Datei")
    $GUI_menu_Einstellungen = GUICtrlCreateMenu("Einstellungen")
    $Gui_menu_e2 = GUICtrlCreateMenuItem("Einstellungen", $GUI_menu_Einstellungen)
    $Gui_menu_facebook = GUICtrlCreateMenu("Facebook")
    $Gui_facebook = GUICtrlCreateMenuItem("Facebook-Anmeldung", $Gui_menu_facebook)
    $GUI_menu_about = GUICtrlCreateMenu("About")
    $Gui_menu_a2 = GUICtrlCreateMenuItem("About", $GUI_menu_about)
    $browser = GUICtrlCreateObj($IE, 0, 40, 1164, 788)
    $GUI_Menu_Beenden = GUICtrlCreateMenuItem("Beenden", $GUI_menu_datei)
    $Enter_KEY = GUICtrlCreateDummy()
    Dim $Arr[1][2] = [["{ENTER}", $Enter_KEY]]

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

    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    _IENavigate($IE, "http://www.google.de/")
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    GUIDelete($GUI_main)
    Exit
    Case $GUI_menu_datei
    Case $GUI_menu_Einstellungen
    Case $Gui_menu_e2
    _Einstellungen()
    Case $GUI_menu_about
    Case $Gui_menu_a2
    MsgBox(0, "About FreeBird", "FreeBird was written by MalteH2012 and Fabi!" & @CRLF & "It was not maden for commercials, just for private use!" & @CRLF & "Dont edit script!")
    Case $GUI_Menu_Beenden
    GUIDelete($GUI_main)
    Exit
    Case $GUI_Send
    _Send()
    Case $Enter_KEY
    _Send()
    Case $GUI_Home
    _IENavigate($IE, "http://www.google.de")
    Case $Gui_facebook
    _IENavigate($IE, "http://www.facebook.de")
    Sleep(3000)
    $FacebookName = InputBox("Name", "Please insert your facebook username: ")
    Sleep(200)
    Send($FacebookName)
    Sleep(3000)
    Send("{Tab}")
    Sleep(200)
    $Pass = InputBox("Passwort", "Please insert your facebook Password: ")
    Send($Pass)
    Sleep(1000)
    Send("{Enter}")
    EndSwitch
    WEnd

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

    Func _Send()
    $html = GUICtrlRead($Adresszeile)
    _IENavigate($IE, $html)
    EndFunc

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

    Func _Einstellungen()
    $gui = GuiCreate("Firebird Einstellungen",300,200)

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

    GUICtrlCreateLabel("Startseite:", 0,2)
    $readhp = IniRead(@ScriptDir & "\Einstellungen.ini","Internet","Startseite","http://www.google.de/")
    $hp = GUICtrlCreateInput("",55,2.5,220)
    GUICtrlSetData($hp,$readhp)
    $save = GUICtrlCreateButton("Speichern", 230, 175)
    $close = GUICtrlCreateButton("Abbrechen",150,175)

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

    GUISetState()

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

    While 1
    $fbeinstellungen = GUIGetMsg()

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

    Select
    Case $fbeinstellungen = $GUI_EVENT_CLOSE
    GUIDelete($gui)

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

    Case $fbeinstellungen = $save
    $sethp = GUICtrlRead($hp)
    IniWrite(@ScriptDir & "\Einstellungen.ini","Internet","Startseite","" & $sethp)
    GUIDelete($gui)
    Run("Free Bird.exe")
    Exit
    Case $fbeinstellungen = $close
    GUIDelete($gui)
    Run("Free Bird.exe")
    Exit

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

    EndSelect

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

    WEnd
    While GuiGetMsg() <> $GUI_EVENT_CLOSE
    WEnd
    EndFunc

    [/autoit]

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™