Beiträge von bernd670
-
-
Hallo und :willkommen:,
das geht mit dem '&'- Zeichen:
Dim $sString1
$sString1="Super"
$sString1=$sString1 & " Forum" -
Hallo,
ist "Adressbuch" der komplette Name des Fensters?
-
Hallo und :willkommen:,
eine Funktion die wartet bis irgendeine Taste gedrückt gibt es nicht, wie @jonk schon geschrieben hat gibt es die Funktion _IsPressed mit der man abfragen kann ob eine bestimmte Taste gedrückt wurde.
In der user32.dll gibt es die Funktion GetKeyboardState die den Status aller Tasten zurückgibt, damit könnte man sich evtl. eine Funktion schreiben die prüft ob eine Taste gedrückt wurde und diese dann zurückgibt.
-
Hallo!
Ich hatte mal wieder Zeit die neue Version von Koda zu testen und habe dabei den Erinnerung-Dialog optisch etwas angepasst!
Falls er übernommen werden soll einfach die Zeilen zw. #region und #endregion in Galenda einfügen!
Hier das Ergebnis:
Code
Alles anzeigen#include <GUIConstants.au3> Opt("GUIOnEventMode", 1) $PROGRAM_NAME = "Galenda" $PROGRAM_VERSION = "0.92" #region - Erinnerung Dialog - $gui_alarmdialog = GUICreate($PROGRAM_NAME & "-Erinnerung", 361, 451, 321, 225, BitOR($WS_SYSMENU, $WS_BORDER, $WS_CLIPSIBLINGS)) GUICtrlSetFont(-1, 12, 800) GUICtrlSetColor(-1, 0x000000) $gui_alarmdialog_lbl_title = GUICtrlCreateLabel($PROGRAM_NAME & " " & $PROGRAM_VERSION, 8, 8, 336, 28, $SS_SUNKEN) GUICtrlSetFont(-1, 14, 800) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) $gui_alarmdialog_lbl_description = GUICtrlCreateEdit("by peethebee, GtaSpider, Gun-Food", 8, 48, 336, 120, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN)) GUICtrlSetFont(-1, 11, 400, 2) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) $gui_alarmdialog_lbl_date = GUICtrlCreateLabel("http://www.galenda.de", 8, 180, 336, 24, $SS_SUNKEN) GUICtrlSetFont(-1, 12, 600) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) $gui_alarmdialog_lbl_time = GUICtrlCreateLabel("http://www.autoit.de", 8, 216, 336, 24, $SS_SUNKEN) GUICtrlSetFont(-1, 12, 600) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) $gui_alarmdialog_lbl_location = GUICtrlCreateLabel("", 8, 252, 336, 24, $SS_SUNKEN) GUICtrlSetFont(-1, 12, 400, 2) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) $gui_alarmdialog_lbl_category_color = GUICtrlCreateLabel("", 8, 288, 24, 24, $SS_SUNKEN) GUICtrlSetBkColor(-1, 0x00ffe3) $gui_alarmdialog_lbl_category = GUICtrlCreateLabel("Information", 40, 288, 304, 24, $SS_SUNKEN) GUICtrlSetFont(-1, 12, 300) GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT) ; Snooze-Controls GUICtrlCreateLabel("Erneut in:", 8, 334, 68, 20) GUICtrlSetFont(-1, 10, 800) $gui_inp_alarm_snooze_amount = GUICtrlCreateInput("15", 84, 332, 36, 24) GUICtrlSetFont(-1, 10, 800) $gui_cmb_alarm_snooze_type = GUICtrlCreateCombo("", 128, 332, 112, 24, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL)) GUICtrlSetData(-1, "Minute(n)|Stunde(n)|Tag(en)", "Minute(n)") GUICtrlSetFont(-1, 10, 800) $gui_btn_alarmdialog_snooze = GUICtrlCreateButton("e&rinnern", 248, 331, 75, 26, 0) GUICtrlSetFont(-1, 10, 800) GUICtrlSetOnEvent($gui_btn_alarmdialog_snooze, "_gui_alarmdialog_snooze") ; Buttons $gui_btn_alarmdialog_show = GUICtrlCreateButton("&Anzeigen", 72, 384, 100, 25, 0) GUICtrlSetFont(-1, 10, 800) GUICtrlSetOnEvent($gui_btn_alarmdialog_show, "_gui_alarmdialog_show") $gui_btn_alarmdialog_accept = GUICtrlCreateButton("Ak&zeptieren", 188, 384, 100, 25, 0) GUICtrlSetFont(-1, 10, 800) GUICtrlSetOnEvent($gui_btn_alarmdialog_accept, "_check_alarms") ; Schließen hat den gleichen Effekt wie Akzeptieren GUISetOnEvent($GUI_EVENT_CLOSE, "_check_alarms") _SetStatus("Alarmanzeige aufgebaut") #endregion - Erinnerung Dialog - GUISetState(@SW_SHOW) WinMove($gui_alarmdialog, "", @DesktopWidth - 361, @DesktopHeight - 540 ) While 1 Sleep(100) WEnd Func _gui_alarmdialog_snooze() ConsoleWrite("Erinnern-Button" & @CRLF) EndFunc Func _gui_alarmdialog_show() ConsoleWrite("Anzeigen-Button" & @CRLF) EndFunc Func _check_alarms() ConsoleWrite("Akzeptieren- oder Schliessen-Button" & @CRLF) Exit EndFunc Func _SetStatus($sString) ConsoleWrite($sString & @CRLF) EndFunc@edit: anderes Bild angehängt
-
Wenn überhaupt dann so:

Run("Explorer.exe " & @ScriptDir)
-
Es geht auch mit dem relativen Pfad! "Full" heißt in diesem Fall nicht absolut sonder Pfad mit Dateinamen, egal ob absolut oder relativ!
-
Nur mut, wird schon werden!

Hier noch ein paar Tutorials für C++!
-
Mit C ist natürlich möglich Programme zu schreiben die mit AutoIt nur sehr schwer bzw. garnicht umzusetzen sind! AutoIt ist eingentlich nur als Scriptsprache gedacht um schnell kleine helferlein zu programmieren die die tägliche Arbeit erleichtern.
AutoIt ist auch in C++ programmiert.
Übrigens ist C++ nichts anderes als C mit erweitertem Funktionsumfang für Objektorientierte Programmierung (OOP). Wenn du OOP lernen willst, was ich empfehle, solltest du gleich mit C++ anfangen. Als ich begonnen habe zu programmieren gab es noch keine OOP und ich kann dir sagen es ist nicht einfach von der konventionellen Programmierung auf OOP umzusteigen, weil man immer wieder in alten Stil zurückfällt.
-
Der name von deinem Programm hat doch nicht dem Programm zu tun welches du starten willst! Das Programm das mit Run gestartet werden soll ist ja die Software RapidGet.exe v1.2 und nicht die von dir erstellt RapidGet.exe.
Nenne doch einfach mal dein Programm um in FlashKlick.exe und kopiere dein Programm ins gleiche Verzeichnis in dem sich auch die Software RapidGet.exe befindet und starte dann FlashKlick.exe!
-
Ist doch logisch, du hast dein Programm RapidGet.exe genannt und rufst in deinem Programm RapidGet.exe auf, sowas nennt man endlosschleife! nenne mal dein Programm um und probiers dann nochmal!
-
Ich kann mir deinen Code morgen mal anschauen, aber hier ist ein Beispiel wei man das lösen könnte:
Spoiler anzeigen
Code
Alles anzeigen#include <GUIConstants.au3> $frmInst1 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 1", 64, 32, 114, 33) $frmInst1_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst2 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 2", 64, 32, 114, 33) $frmInst2_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst2_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst3 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 3", 64, 32, 114, 33) $frmInst3_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst3_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst4 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 4", 64, 32, 114, 33) $frmInst4_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst4_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst5 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 5", 64, 32, 114, 33) $frmInst5_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst5_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst6 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 6", 64, 32, 114, 33) $frmInst6_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst6_btnNext = GUICtrlCreateButton("> &Weiter", 296, 232, 75, 25, 0) $frmInst7 = GUICreate("Installationsmanager", 393, 274, 193, 115) GUICtrlCreateLabel("Fenster 7", 64, 32, 114, 33) $frmInst7_btnPrev = GUICtrlCreateButton("< &Zurück", 208, 232, 75, 25, 0) $frmInst7_btnReady = GUICtrlCreateButton("&Fertig", 296, 232, 75, 25, 0) GUISetState(@SW_SHOW,$frmInst1) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $frmInst1_btnNext GUISetState(@SW_SHOW,$frmInst2) GUISetState(@SW_HIDE,$frmInst1) case $frmInst2_btnPrev GUISetState(@SW_SHOW,$frmInst1) GUISetState(@SW_HIDE,$frmInst2) Case $frmInst2_btnNext GUISetState(@SW_SHOW,$frmInst3) GUISetState(@SW_HIDE,$frmInst2) case $frmInst3_btnPrev GUISetState(@SW_SHOW,$frmInst2) GUISetState(@SW_HIDE,$frmInst3) Case $frmInst3_btnNext GUISetState(@SW_SHOW,$frmInst4) GUISetState(@SW_HIDE,$frmInst3) case $frmInst4_btnPrev GUISetState(@SW_SHOW,$frmInst3) GUISetState(@SW_HIDE,$frmInst4) Case $frmInst4_btnNext GUISetState(@SW_SHOW,$frmInst5) GUISetState(@SW_HIDE,$frmInst4) case $frmInst5_btnPrev GUISetState(@SW_SHOW,$frmInst4) GUISetState(@SW_HIDE,$frmInst5) Case $frmInst5_btnNext GUISetState(@SW_SHOW,$frmInst6) GUISetState(@SW_HIDE,$frmInst5) case $frmInst6_btnPrev GUISetState(@SW_SHOW,$frmInst5) GUISetState(@SW_HIDE,$frmInst6) Case $frmInst6_btnNext GUISetState(@SW_SHOW,$frmInst7) GUISetState(@SW_HIDE,$frmInst6) case $frmInst7_btnPrev GUISetState(@SW_SHOW,$frmInst6) GUISetState(@SW_HIDE,$frmInst7) Case $frmInst7_btnReady GUISetState(@SW_HIDE,$frmInst7) MsgBox(0,"Fertig","Bye bye!") Exit EndSwitch WEnd -
Hallo!
Die einfachste Möglichkeit ist mit einem Formdesigner (z.B. Koda) alle benötigten Dialoge erstellen und dann schritt für schritt den ensprechenden Dialog anzeigen. Du kannst aber auch ein Dialog mit einem Tabcontrol erzeugen (wie z.B. Einstellungendialog bei Galenda).
-
Hallo und herzlich :willkommen:!
Ist das dir Koordinate wie du sie aus Window Info ausgelesen hast?
Wenn ja muss MouseCoorMode auf 1 gestellt werden!
-
ein kleines Beispiel:
Code
Alles anzeigen#include <GUIConstants.au3> ; Dialog Hauptmenü erzeugen $frmMain = GUICreate("Hauptmenü", 633, 454) $btnOther = GUICtrlCreateButton("&anderes Fenster", 472, 392, 121, 25, 0) ; Dialog "anderes Fenster" erzeugen $frmOther = GUICreate("anderes Fenster", 300, 200, -1, -1, -1, -1, $frmMain) $btnClose = GUICtrlCreateButton("&Zurück", 160, 160, 115, 25, 0) GUISetState(@SW_SHOW,$frmMain) ; Dialog Hauptmenü anzeigen While 1 $nMsg = GUIGetMsg(1) ; warten bis was geschieht Switch $nMsg[1] ; WinHandle (Hauptmenü o. "anderes Fenster") Case $frmMain ; Hauptfenster Switch $nMsg[0] ; EventID o. ControlID von Hauptmenü Case $GUI_EVENT_CLOSE ; ESC oder Close-Button {X] Exit ; Programmende Case $btnOther ; "anderes Fenster"-Button GUISetState(@SW_SHOW,$frmOther) ; Dialog anzeigen EndSwitch Case $frmOther ; "anderes Fenster" Switch $nMsg[0] ; EventID o. ControlID von "anderes Fenster" Case $GUI_EVENT_CLOSE, $btnClose ; ESC oder Zurück-Button GUISetState(@SW_HIDE,$frmOther) ; Dialog verstecken EndSwitch EndSwitch WEnd -
Hallo,
was noch intressant wäre ist der Teil in dem die Funktionen aufgerufen werden!
-
Ich habe die default-Werte vergessen, sorry! Hier nochmal das komplette Script.
Code
Alles anzeigen#include <GUIConstants.au3> $Form2 = GUICreate("AForm1", 622, 441, 192, 125) GUICtrlCreateLabel("Metall", 48, 16, 69, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") GUICtrlCreateLabel("Kristall", 208, 16, 77, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") GUICtrlCreateLabel("Deutorium", 368, 16, 115, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") $Input1 = GUICtrlCreateInput("", 8, 56, 153, 29, -1, $WS_EX_CLIENTEDGE) $Input2 = GUICtrlCreateInput("", 176, 56, 153, 29, -1, $WS_EX_CLIENTEDGE) $Input3 = GUICtrlCreateInput("", 352, 56, 153, 29, -1, $WS_EX_CLIENTEDGE) $Button1 = GUICtrlCreateButton("Einstellungen Saven", 8, 96, 153, 33) GUICtrlCreateLabel("Metall", 40, 168, 69, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") GUICtrlCreateLabel("Kristall", 216, 168, 77, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") GUICtrlCreateLabel("Deutorium", 392, 168, 115, 33) GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif") $Input4 = GUICtrlCreateInput("", 8, 216, 153, 29, -1, $WS_EX_CLIENTEDGE) $Input5 = GUICtrlCreateInput("", 184, 216, 153, 29, -1, $WS_EX_CLIENTEDGE) $Input6 = GUICtrlCreateInput("", 384, 216, 153, 29, -1, $WS_EX_CLIENTEDGE) $Button2 = GUICtrlCreateButton("Einstellungen Laden", 8, 256, 153, 33) $button3 = GUICtrlCreateButton("Zurück zum Hauptmenü",8, 300, 200, 33) GUISetState(@SW_SHOW) While 1 $msg = GuiGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $Button1 IniWrite("Ressourcen.ini", "Ressourcen","Metall",GUICtrlRead($Input1)) IniWrite("Ressourcen.ini", "Ressourcen","Kristall",GUICtrlRead($Input2)) IniWrite("Ressourcen.ini", "Ressourcen","Deutorium",GUICtrlRead($Input3)) Case $msg = $Button2 GUICtrlSetData($input4, IniRead("Ressourcen.ini", "Ressourcen", "Metall", "")) GUICtrlSetData($input5, IniRead("Ressourcen.ini", "Ressourcen", "Kristall", "")) GUICtrlSetData($input6, IniRead("Ressourcen.ini", "Ressourcen", "Deutorium", "")) EndSelect WEnd -
Hallo!
Im engl. Forum gibt es einen Login-Bot http://www.autoitscript.com/forum/index.php?showtopic=28627!
Hast du den schon mal getestet?
-
-
Hallo!
Freut mich wenn es dir geholfen hat! :musik2:
[EDIT]
Ich werde es morgen noch mal überarbeiten dann habe ich auch alle benötigten Daten, und ein anderes System (W2K)
[/EDIT]Das mit den Einrückungen liegt an den unterschiedlichen Tabeinstellungen zwischen deinem Texteditor und hier im Forum! Wenn du z.B. eine Tablulatorweite von 2 eingstellt hast und hier eine von 4 eingestellt ist, wird der Text hier doppelt so weit eingerückt! Viele Editoren haben eine Funktion die Tabulatoren in Leerzeichen umwandelt, wenn das einschalten wird der Text immer richtig dargestellt!