Hallo m-Obi,
habe leider noch ein kleines Problem mit der Return-Taste!
Wenn das Script aktiv ist, kann ich leider keine Return-Taste
mehr nutzen.
Die bräuchte ich leider unbedingt.
WinActive hat leider nicht geklappt
[autoit]
If WinActive($Form1) then
HotKeySet("{Enter}", "_RunFunc")
Else
HotKeySet("{Enter}"); Hotkey ausschalten!
endif
Hoffe du hast noch eine Idee?
Grüße
Ilse
oh...SUPER!
Genau so,
du hast mein Tag gerettet!
VIELEN DANK
Liebe Grüße
Ilse
Guten Morgen m-Obi,
...nicht gefunden $i.
Wenn ich da 1 nehme klappt das.
aber irgendwie stimmt mein Loop schon nicht!
Wenn ich die SpaceTaste drückte sollte sich das Label jedesmal ändern!
Da komme ich schon nicht hin!
Und wie mache ich das mit dem Return?
Ich meine ein Enter egal f. welchen Ini Eintrag den das Label zeigt.
Huh...stehe noch etwas auf dem Schlauch...
Liebe Grüße
Ilse
Mit Call bin ich gerade am probieren
Guten Morgen zusammen,
hab mal wieder ein dickes ini Problem.
Zuerst erkläre ich mal...
also:
Ich habe eine ini.
[Link]
1=Hunde
2=Katzen
3=Tiere
[Func]
1=_hunde()
2=_katzen()
3=_Tiere()
Die Links in der ini möchte ich mit dem Hotkey Spacetaste durchblättern. (endlos) 1,2,3--1,2,3--
Die Gui sollte den Eintrag zeigen!(Label)
Wenn z.B. Tiere gezeigt wird, sollte man mit Return die Funktion _Tiere starten.
Habe mal alles auskommentiert...
Mein Code
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <array.au3>
$Form1 = GUICreate("Form1", 499, 300, 198, 147)
$Auswahl = GUICtrlCreateLabel("Auswahl", 104, 24, 272, 41, $SS_CENTER)
GUICtrlSetFont(-1, 24, 800, 0, "Arial")
GUISetState(@SW_SHOW)
WinSetOnTop("Form1", "", 1)
HotKeySet("{Space}", "_inireader"); mein Hotkey Spacetaste
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _IniReader(); wird mit SpaceTaste gestartet
Local $i
$var = IniRead("Funk.ini", "Link", $i, "NichtGefunden"); Meine Ini mit Funktionen
MsgBox(0, "", "Ini wird gelesen", 1)
If @error Then
MsgBox(4096, "", "Keine Ini vorhanden")
Else
For $i = 1 To UBound($var); hier sollte das Label beim drücken v. Space geändert werden!
[/autoit] [autoit][/autoit] [autoit]MsgBox(4096, "Ergebnis", $var[$i])
GUICtrlSetData($Auswahl, $var[$i])
;...wenn Return gedrückt wird, startet INIRead [Func] $i...
Next
EndIf
EndFunc ;==>_IniReader
Func _Hunde()
MsgBox(4096, "", "Das Hundeprogramm wird gestartet")
EndFunc ;==>_Hunde
Func _Katzen()
MsgBox(4096, "", "Das Katzenprogramm wird gestartet")
EndFunc ;==>_Katzen
Ich dachte so:
Wird die z.B. die Link Nr. 8 in der INI mit RETURN gestartet,
dann wird die Func Nr. 8 gestartet.
Komme da einfach nicht weiter.
Liebe Grüße Ilse
Hallo Chesstiger,
ja, hatte ich auch gelesen
hat aber irgendwie nicht funktioniert.
Ich versuche mal alles neu aufzubauen...
melde mich wieder.
Liebe Grüße Ilse
Hallo Bugfix,
Hallo Chesstiger,
merci für die Hilfe.
Klappt Super!
Liebe Grüße
Ilse
Hallo Chesstiger,
leider klappt jetzt das Return beim 1. Input nicht mehr.
Ich hatte für dieses Feld Case in der Schleife verwendet!
Eine Frage noch:
Wirklich perfekt wäre so:
Sobald in das erste Feld was eingetragen wird
öffnet sich das große Feld. Muß man das mit einem Timer lösen.
Wie kann man das abfragen?
Ich meine so:
Das Feld besitzt den Focus. Es passiert noch nichts!
Wird jetzt irgendeine Taste gedrückt, dann geht die Gui auf.
Liebe Grüße Ilse
Hallo zusammen,
mußte gestern leider wieder weg.
@m-obi
Child-Guis...muß ich mir nochmal ansehen
chesstiger
merci für das Script.
Ich habe es etwas angepasst.
Dazu noch eine Frage:
Wie kann ich das Feld mit Return beenden?
Ich trage den Text ins große Feld und drücke Return
Beispiel:
[autoit]
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 205, 74, 192, 124, BitOR($WS_MINIMIZEBOX, $WS_SIZEBOX, $WS_THICKFRAME, $WS_SYSMENU, $WS_CAPTION, $WS_POPUP, $WS_POPUPWINDOW, $WS_GROUP, $WS_BORDER, $WS_CLIPSIBLINGS))
;$Form1 = GUICreate("Form1", 205, 74, 192, 124, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
$Input1 = GUICtrlCreateInput("", 40, 24, 121, 21)
GUISetState(@SW_SHOW)
$LargeForm = GUICreate("", @DesktopWidth/2, @DesktopHeight/2, -1, -1, $WS_POPUP, $WS_EX_TOOLWINDOW)
$LargeInput = GUICtrlCreateInput("", -1, -1, @DesktopWidth/2, @DesktopHeight/2)
HotKeySet("{F1}", "_Gross")
[/autoit][autoit][/autoit][autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _Gross()
GUICtrlSetData($LargeInput, GUICtrlRead($Input1))
GUICtrlSetFont(-1, 40, 400, 0, "@Arial Unicode MS")
GUISetState(@SW_SHOW, $LargeForm)
HotKeySet("{F1}", "_Klein")
EndFunc ;==>_Gross
Func _Klein()
GUICtrlSetData($Input1, GUICtrlRead($LargeInput))
GUISetState(@SW_HIDE, $LargeForm)
HotKeySet("{F1}", "_Gross")
EndFunc ;==>_Klein
Grüße Ilse
Hallo,
folgendes Problem:
Ich habe eine Gui mit einem Inputfeld.
Alles hat eine bestimmte Größe.
Ich möchte nun, daß wenn ich F1 drücke
das Inputfeld auf dem ganzen Monitor in der Breite zur EIngabe
vergrößert wird. Meine Gui sollte aber bleiben.
Wird die Eingabe gemacht und dann Return gedruckt dann sollte das Grosse Inputfeld verschwinden
und der Inhalt in das kleine Inputfeld übertragen werden.
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 205, 74, 192, 124, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
;$Form1 = GUICreate("Form1", 205, 74, 192, 124, BitOR($WS_MINIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
$Input1 = GUICtrlCreateInput("", 40, 24, 121, 21)
GUISetState(@SW_SHOW)
HotKeySet("{F1}", "_gross")
[/autoit][autoit][/autoit][autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _gross()
;$Form1 = GUICreate("Form1", -1, 74, @DesktopWidth, 124)
GUICtrlSetPos($Input1,-1,-1,@DesktopWidth,100)
endfunc
Ich weiß nicht recht wie man das am besten machen kann.
Brauche ich da mehrere Inputfelder und Guis
oder kann man das alles mit diesem einen Inputfeld machen?
Daß sich nur das Inputfeld löst.....?
Grüße
Ilse
...ist alles gut!
Läuft!
Danke...
Grüße Ilse
Hallo Bugfix,
genau...
ich hab's auch gerade in der Hilfe gefunden!
-1
das hat mich heute etliche Zeit gekostet.
Dank dir...
Liebe Grüße Ilse
Hallo,
Ich bin fast am verzweifeln...
Ich möchte ein Bild (egal wie groß der Bildschirm ist)
in der Mitte anzeigen und zentrieren lassen.
Ich schaff das einfach nicht!
[autoit]
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$frmSplash = GUICreate("", 300, 150, @DesktopWidth / 2 - 150, @DesktopHeight / 2 - 75, BitOR($WS_SYSMENU,$WS_POPUP), 0)
$picSplash = GUICtrlCreatePic("splash.jpg", 0, 0, 300, 150, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
$proSplash = GUICtrlCreateProgress(56, 104, 193, 9)
GUISetState(@SW_SHOW,$frmSplash)
For $i = 10 to 100 Step 10
GUICtrlSetData($proSplash,$i)
Sleep(500)
Next
GUISetState(@SW_HIDE,$frmSplash)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Es sollte so sein, daß ein großes Bild in der Bildschirmmitte ist.
Wenn ich diese Werte ändere passt irgendwie nichts mehr!
Grüße Ilse
Hallo,
muß mich leider nochmal melden.
$txtAnzahl = 20
Send ("{NUMPADADD "& GUICtrlRead ($txtAnzahl) &"}")
das klappt soweit.
Folgendes Problem:
Wie kann ich bei jedem "einzelnen send" eine Pause machen
Also send schickt 20 x den Befehl direkt schnell hintereinander!
Ich meine: 1 Sleep(1000) 2 Sleep(1000)...
geht das?
Grüße Ilse
super, hat geklappt.
Grüße Ilse
Hallo Schickedim,
ich erklärs mal so:
Meine Gui hat ein Textfeld Anzahl.(etwas zu groß um hier zu zeigen)
In dieses Feld trage ich eine Nummer ein: z.B. 20
Im code kommt dann irgendwann der SendBefehl!
$Anz = Guictrlread($txtAnzahl); also die 20 wird gelesen!
; jetzt soll 20x der Sendbefehl ausgeführt werden.
Send("{NUMPADADD$anz);....
[/autoit]wie lautet hier die korrekte Syntax?
Wird z.B 33 eingegeben, dann soll 33 x send...ausgeführt werden.
sorry, mußte kurz weg...
ja... genau so!
Dank dir!
Liebe Grüße Ilse
Hallo,
Ich zerbrech mir schon die ganze Zeit den Kopf
und komm einfach nicht ans Ziel:
Ich möchte dass z.B. 5x der Sendbefehl ausgeführt wird.
5 soll aber eine %Var sein
Beispiel Normal:
[autoit]
Send("{NUMPADADD 5}")
das geht, aber wie kann ich die 5 Variabel machen
z.B. irgendwie so:
[autoit]
$Anz = 10
Send("{NUMPADADD ????}"); wenn ich hier $Anz einbaue geht das nicht!
Grüße Ilse
Hallo Chesstiger,
wollte das eigentlich nicht mit der FF3 machen.
Geht das nicht irgendwie mit
ControlFocus("[Class:MozillaWindowClass]", "", "")
Ilse
Hallo Chesstiger,
super, das war ja einfach.
Aber trotzdem: Wie kann ich den Focus auf Firefox setzen?
Wenn ich z.B. alle Tabs bis auf einen schliessen möchte...
Dann muß ich Firefox den Focus geben und dann send...
Eine Idee?
Liebe Grüße Ilse
Hallo,
ich habe folgendes Problem:
1. Ich habe Firefox mit mehreren Tabs geöffnet.
2. Mein Script soll nun Firefox mit allen Tabs beenden
Wie kann ich von meiner Gui den Fokus auf Mozilla setzen
(Also nicht einen bestimmten Tab), und dann das ganze beenden?
Mein Script
[autoit]
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 197, 80, 954, 286)
$Beenden = GUICtrlCreateButton("Beenden", 8, 16, 171, 49, $WS_GROUP)
GUISetState(@SW_SHOW)
WinSetOnTop($Form1, "", 1)
[/autoit][autoit][/autoit][autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Beenden
WinActivate("[CLASS:MozillaWindowClass]", "")
Sleep(5000)
Send("{ALTDOWN}{F4}{ALTUP}")
EndSwitch
WEnd
Das klappt leider nicht!
Grüße Ilse
