Beiträge von bernd670

**bernd670**

Ich kenne Silkroad leider nicht, es wäre vllt. hilfreich wenn du mal einen Screenshot vom loginscreen und von au3info posten würdest.

**bernd670**

Hallo,

wie der Name schon sagt kann man mit FileSelectFolder nur Verzeichnisse auswählen. Was du benötigst ist FileOpenDialog.

**bernd670**

Zitat

Original von peethebee
Hallo!

Neue Ideen von Gun-Food und mir:
- Kalender auf FTp schieben und von dort laden, damit man gemeinsam einen Klaender bearbeiten kann
- Upload per FTP auf eine Webseite, auf der eine HTML-Version (vom Export?) dann per Passwort (JavaScript?) zugägnlich ist.

peethebee

Dafür habt ihr SVN installiert, oder?

**bernd670**

Hallo,

in der Hilfe zu GUICtrlCreateObj (Beta-Version) ist ein Beispiel

Spoiler anzeigen

Code

#include <GUIConstants.au3>
; Simple example: Embedding an Internet Explorer Object inside an AutoIt GUI
;
; The full example is available in the test\ActiveX directory (TestXInternet.au3)
;
; See also: http://msdn.microsoft.com/workshop/browser/webbrowser/reference/objects/internetexplorer.asp


$oIE = ObjCreate("Shell.Explorer.2")


; Create a simple GUI for our output
GUICreate ( "Embedded Web control Test", 640, 580,(@DesktopWidth-640)/2, (@DesktopHeight-580)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX			= GUICtrlCreateObj		( $oIE,		 10, 40 , 600 , 360 )
$GUI_Button_Back	= GuiCtrlCreateButton	("Back",	 10, 420, 100,  30)
$GUI_Button_Forward	= GuiCtrlCreateButton	("Forward",	120, 420, 100,  30)
$GUI_Button_Home	= GuiCtrlCreateButton	("Home",	230, 420, 100,  30)
$GUI_Button_Stop	= GuiCtrlCreateButton	("Stop",	330, 420, 100,  30)


GUISetState ()       ;Show GUI


$oIE.navigate("http://www.autoitscript.com")


; Waiting for user to close the window
While 1
    $msg = GUIGetMsg()

	Select
		Case $msg = $GUI_EVENT_CLOSE
			ExitLoop
		Case $msg = $GUI_Button_Home
			$oIE.navigate("http://www.autoitscript.com")
		Case $msg = $GUI_Button_Back
			$oIE.GoBack
		Case $msg = $GUI_Button_Forward
			$oIE.GoForward
		Case $msg = $GUI_Button_Stop
			$oIE.Stop
	EndSelect

Wend


GUIDelete ()


Exit

Alles anzeigen

**bernd670**

Zitat

Original von peethebee

Verhalten bestätigt, das muss ich mir noch mal anschauen... Danke!

...

peethebee

Der Grund ist, das die Globale Variable $_open_filename nach dem 1. Aufruf den Pfad zum geöffneten Kalender beinhaltet. FileOpenDialog wird aber nur aufgerufen wenn die Variable leer ist. Er öffnet also immer den Kalender der beim 1. Aufruf ausgesucht wurde.

**bernd670**

Nur im Text! Wenn in Funktionen was ändere schreibe ich das immer dazu!

**bernd670**

Zitat

Original von gtaspider
Hallo!

.... Das mit dem immer wider ja digsda versteh ich auch nicht und @pee das meinte ich auch letztens..

...

Mfg Spider

Ich habe mir mal deine Funktion angeschaut die beim schliessen aufgerufen wird und habe zwei kleine Fehler gefunden. Die Endlosschleife kommt daher, das du die Funktion _Save mit 1 als 2. Parameter aufrufst. Wenn der Parameter 1 ist ruft die Funktion _Save nämlich auch wieder die Funktion unten auf und so ensteht die Endlosschleife.

Das speichern der Position und schliessen des Fensters muss natürlich bei den Buttons "ja" und "nein" gemacht werden und nicht nur wenn auf "nein" gedrückt wird!

korrigierte Funktion:

Code

Func _close_newTask()
	If $gui_newTask_opened = 1 Then
		$msgbox = MsgBox(67, $PROGRAM_NAME, "Wollen Sie vor dem Schließen speichern?")

        If $msgbox = 6 Then	_Save("", 0)


        If $msgbox = 6 Or $msgbox = 7 Then
			$gui_newTask_opened = 0
			; Position speichern
			$gui_newTask_pos = WinGetPos($gui_newTask)
			SetGenOpt("Winpos", "GUI_newTask_x", $gui_newTask_pos[0])
			SetGenOpt("Winpos", "GUI_newTask_y", $gui_newTask_pos[1])
			; Fenster verstecken und Main anzeigen
			GUISetState(@SW_HIDE, $gui_newTask)
			_SetStatus("NewTask-GUI versteckt")
			GUISetState(@SW_ENABLE, $gui_main)
			GUISetState(@SW_RESTORE, $gui_main)
			_SetStatus("Main-GUI enabled")
		EndIf
	EndIf
EndFunc   ;==>_close_newTask

Alles anzeigen

**bernd670**

Zitat

von @pee
Das hatte ich schon mal drin, aber er resiuzt nicht, wenn ich ihn mit WInMove anpasse. Wenn du mir da einen HInweis geben kannst, wie ich das umgehe, ist das Speichern der Größe sofort wieder möglich

Was geht den nicht, ich habe es mal getestet, bei mir gehts ohne Probleme. Nur wenn eine bestimmte größe unterschritten wird stimmen halt die Controlfelder und deren Inhalte nicht mehr. Das ist aber kein Fehler von WinMove, kann man aber einfach abfangen und eine mindestgrösse einstellen.

Code

Func _stbResize()
    $arWinData = WinGetPos("")
    $gui_main_width = $arWinData[2] - 6
    $gui_main_height = $arWinData[3] - 6
    ; Evtl. Scrollbalken einschalten und Controlls mit 
    ; Opt("GUIResizeMode", 802) verbieten ihre grösse zu ändern
    ; wenn best. Grösse unterschritten wird
    If $gui_main_width < 1000 Then $gui_main_width = 1000
    If $gui_main_height < 705 Then $gui_main_height = 705
    WinMove($gui_main, "", $gui_main_x, $gui_main_y, $gui_main_width, $gui_main_height)
	_GuiCtrlStatusBarResize($gui_stb_1)
    SetGenOpt("Winpos", "GUI_main_width", $gui_main_width)
    SetGenOpt("Winpos", "GUI_main_height", $gui_main_height)
EndFunc   ;==>_stbResize

Alles anzeigen

**bernd670**

Testbericht:

Das Blau hat mir pers. besser gefallen als dieses Cyan! Eine Farbauswahl wie sie Chicago vorgeschalgen hat ist auch von vorteil für Farbenblinde und Sehbehinderte die nur bestimmte Farben auseinanderhalten können (Barrierefreiheit).

Es wäre schön wenn auch die Dialoggrösse gespeichert wird. Ich habe z.B. eine Auflösung 1024x768 und eine 2-reihige Startleiste auf meinen Notebook. Aus diesem Grund sehe ich die Statuszeile nicht, ich kann jetzt zwar das Fenster verkleinern aber beim nächsten Start ist die alte grösse wieder eingestellt.

Wenn man in der Tagesansicht ist und im Menü "Datei" den Menüpunkt "Neuer Kalender" wählt, einen neuen Kalender anlegt und dann bei der Abfrage ob der neue Kalender geladen werden soll "ja" wählt, bleiben die alten Termine in der Ansicht stehen, erst wenn man noch mal die Tagesansicht auswählt wird aktualisiert. Das gleiche passiert bei "Kalender öffnen".

Wenn man den Menüpunkt "Neuer Kalender" gewählt hat und drückt dann auf Cancel legt der trotzdem einen Kalender ohne Namen an.

"Kalender öffnen" kann ich nur ein mal aufrufen.

Im Dialog "Neuen Termin anlegen" kann ich keine Termine speichern und wenn ich den Dialog schliessen will und die Abfrage ob gespeichert werden soll mit ja bestätige kommt die gleiche abfrage noch mal und noch mal und...

**bernd670**

Funktion in einer Funktion geht (leider) nicht! Du kannst aber Variablen auch mit ByRef übergeben (s. Hilfe zu Func) dann kannst du sie innerhalb der Funktion verändern. Wenn du innerhalb von Event-Funktionen auf Variablen zugreifen willst geht es nur über Global.

**bernd670**

Ich habe dir die falschen Funktionen gepostet, sorry! Für Controlelemente heisst die Funktion GuiCtrlSetOnEvent(). :tier:

Code

GUICtrlSetOnEvent($list_online, "_OpenChatClicked")
GUICtrlSetOnEvent($dropdown_status, "_ChangeStatus")
GUISetOnEvent($GUI_EVENT_CLOSE, "close", $windowmain)

**bernd670**

Es wäre hilfreich wenn du zumindest die GUI komplett posten könntest!

**bernd670**

Doppelt hält besser!

**bernd670**

Hallo,

der RunWait-Befehl funktioniert schon, das Problem ist nur das die RunDLL wieder beendet wird sobald die Netzwerkumgebung gestartet wurden was nur wenige Augenblicke dauert. Eine Möglichkeit ist vor dem WinWaitClose noch ein WinWait einzubauen, dann sollte es funktionieren.

Code

Run("RunDll32.exe shell32.dll,Control_RunDLL ncpa.cpl", "")
WinWait("Netzwerkverbindungen")
WinWaitClose("Netzwerkverbindungen")
Run("notepad.exe")

@pee, warst mal wieder schneller!

**bernd670**

Ich habe soeben einen neuen Highscore erreicht: 332 :party4: :party3:

**bernd670**

Hallo,

in der Funktion highScoreGUI ist auch noch ein kleiner Fehler:

Code

If ControlGetText("", "", $point_PL) >= Int(StringMid($highScore_A[9], 1, 3)) And $finished = True Then

Es wird nur überprüft ob die erreichte Punktzahl höher oder gleich der auf Platz 10 ist. Gespeichert werden aber 12 Plätze, wenn meine Punktzahl also besser ist als Platz 11 oder 12 aber schlechter als Platz 10 wird sie nicht berücksichtigt!

besser wäre:

Code

If ControlGetText("", "", $point_PL) >= Int(StringMid($highScore_A[UBound($highScore_A)-1], 1, 3)) And $finished = True Then

Der Fehler 'Steiniger Gebirgspfad' von ytwinky ist bei mir bisher noch nicht aufgetreten!

**bernd670**

das sollte so gehen:

Code

WinWait("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode")
; Die gewünschte Option wählen
ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "Freischaltcode eingeben")
; OK-Button drücken
ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "&OK")

**bernd670**

Und was möchtest du jetzt genau machen?

Falls du ein Startscript schreiben willst das jedes mal prüft ob die Meldung erscheint und dann automatisch weitertesten auswählen soll, sollte das so gehen:

Code

; Programm starten
; Run(....)


; 2 Sek. auf das Fenster warten -> Zeit muss evtl. verlängert werden
WinWait("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", 2000)
If WinActive("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode" ) Then
    ; Die gewünschte Option wählen
    ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "Für weitere 10 Tage testen.")
    ;~ ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "Kostenlosen Vollversions-Freischaltcode holen.")
    ;~ ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "Ein Upgrade für Ashampoo Burning Studio 6 zum Sonderpreis kaufen!")
    ;~ ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "Freischaltcode eingeben")
    ; OK-Button drücken
    ControlClick("Ashampoo Burning Studio 5" ,"Ashampoo Burning Studio 5 hat eine Testperiode", "&OK")
EndIf

Alles anzeigen

**bernd670**

Barrierefreiheit bedeutet die uneingeschränkte Nutzung von Gegenständen, Gebrauchsgütern und Objekten durch alle Menschen über denselben Zugangsweg. Eine Zugänglichkeit über alternative Zugangswege gilt dabei nicht als barrierefrei.

Im bezug auf Internet heisst das z.B., das auch körperlich und geistig Behinderte Menschen das Medium auf die gleiche Art nutzen können sollen wie nicht Behinderte Menschen.

Was für ein Glück das es wikipedia gibt.

**bernd670**

Zitat

Original von peethebee
Da gab es doch einen Thread wo jemand behauptet hatte, dass er dann zurückschaltet (Stichwort Pi...)

peethebee

Der hatte in seiner scheife ja auch die Funkton GuiGetMsg aufgerufen und die entlastet die CPU sowieso!

Beiträge von bernd670

AutoLogin zu Silkroad

AutoLogin zu Silkroad

Geschlossen: AutoIt-Kalender

IE in Gui einbinden

Geschlossen: AutoIt-Kalender

Geschlossen: AutoIt-Kalender

Geschlossen: AutoIt-Kalender

Geschlossen: AutoIt-Kalender

Geschlossen: AutoIt-Kalender

1. Gui findet 2. Gui doof! - Oder: 2. GUI lässt 1. GUI einschlafen

1. Gui findet 2. Gui doof! - Oder: 2. GUI lässt 1. GUI einschlafen

1. Gui findet 2. Gui doof! - Oder: 2. GUI lässt 1. GUI einschlafen

RunDll32.exe und Wait ?

RunDll32.exe und Wait ?

Yahtzee(Mega)

Yahtzee(Mega)

RadioButton lässt sich nicht ansprechen ... hilfe

RadioButton lässt sich nicht ansprechen ... hilfe

[Frage] Script zum Emails abrufen

PING - Schleife, aber wie?