morgen Bugfix,
ok, reload Properties wird ausgeführt!
Klappt aber trotzdem nicht!
Fun geht,
aber meine befehle nicht!
morgen Bugfix,
ok, reload Properties wird ausgeführt!
Klappt aber trotzdem nicht!
Fun geht,
aber meine befehle nicht!
guten Morgen Bugfix,
konnte mich leider am Wochenende nicht mehr melden.
Hm.. ich kann das ganze leider auch nicht verstehen.
in Deinem Programm ist der Code drin und wird auch in deinem Script gefunden.
Zitat$MyKeyWordPath = @UserProfileDir & '\au3.keywords.my'
Diese Datei habe ich gerüft, die hat aber Vollzugriff und alle Schreibrechte.
Lesen, Schreiben, Vollzugriff.... überall gesetzt!
Mein Scite ist in Englisch
ZitatSomit kannst du über das Menü "Wiederherstellung" deine Abbrevs wiederherstellen.
...SciTE Command --> :45024266:reloadproperties, das habe ich leider nicht gefunden
Grüße
Ilse ![]()
Hallo,
mal eine Frage zur Abbrevs Verwaltung von Bugfux.
Ich nehme mal an, daß man damit auch kpl. Funktionen abspeichern kann.
Das habe ich versucht, aber es ging leider nicht!
Wenn ich nun in der Abbrevs.au3 suche, dann finde ich auch den Code.
Was ich nicht verstehe:
ZitatStarte ich Scite, schreibe fun und drücke dann die Leertaste, dann erscheint der Code!
Schreibe ich in Scite aber meine CodeAbkürzung und drücke die Leertase, dann passiert nichts!
Grüße
Ilse ![]()
Hallo Misterspeed,
...konnte mich erst heute wieder melden.
merci für dein Beispiel. Mit der EditBox sieht das richtig gut aus.
Ich habe noch folgende Probleme mit der Progressbar.
Kurze Erklärung:
Es gibt 2 Loops
1. Loop erstellt die Progressbars
2. Loop ist der Ablauf der die Progressbars ausfüllt.
So habe ich die Bars erstellt
1. Loop
For $i = 1 To $Anzahl
$Progresses[$i - 1] = GUICtrlCreateProgress(5, ($i - 1) * 15 + 5, 490, 10)
Next
so, also 10 Progressbars wurden erstellt. Prima
Darunter habe ich dann erneut einen Loop eingefügt.
Also der Programmteil
2. Loop
For $i=1 to $Anzahl Step +1
GUICtrlSetData($Progresses[$i],100)
; ab kommt ProgrammCode: Dauer ca. 1 Minute
;Seite wird geladen...
next
Das Problem:
Wie kann ich die Progressbar ca. 1 Minute hochzählen
ohne daß der kpl.Code zeitlich verlängert wird.
Ich meine wenn Die ForSchleife 1 beendet ist, daß dann die Progressbar bei 100% ist!
Muß man das auch mit AdlibRegister und einer Funktion machen?
Grüße
Ilse ![]()
misterspeed
dank dir für die Tipps!
exitloop, continueloop...probier ich mal einzubauen.
Aber das mit den 2 Progressbars, hm...ich glaub das schaff ich noch nicht!
Grüße
Ilse
@Matthias, merci nochmal für dein Beispiel
P.S.: Muß schon wieder los...
schade
Melde mich später nochmal
Hallo Misterspeed,
schön daß du dich meldest.
Zitat2 Progressbars....wäre jedenfalls übersichtlicher und leichter umzusetzen
auch eine gute Idee.
Kann man irgendwie eine Berichtsseite machen?
Ich meine wenn bei 10 abgebrochen wurde, daß dann in der Liste die ersten 10 mit 100% stehen?
...das wäre schon wieder die nächste Aufgabe!
Was auch wichtig wäre: kann man den Loop zwischendrin abbrechen?
Grüße
Ilse ![]()
Hallo Matthias,
hab das ganze probiert, aber es klappt irgendwie nicht!
Es gibt also nur ein Script das alles erzeugt?
Ich glaube in deinem Script wird die Progressbar nacheinander erzeugt.
Es war aber so gedacht, daß man direkt die Übersicht sieht (50 Progressbars)
und die Progressbars Synchron mit dem LOOP nacheinander loslegen.
Grüße
Ilse ![]()
Hallo,
ich möchte mir gerne eine Übersicht mit Progressbars erstellen.
Kurze Erklärung:
In meinem Hauptscript habe ich eine For Schleife.
Für die Anzahl sollen nun automatisch Progressbars erstellt werden.
Beispiel Hauptscript
[autoit]
$Anzahl = 100
For $i =1 to $Anzahl
;hier folgt der Code in meinem Hauptscript
Sleep(200)
next
Damit ich nun eine Übersicht erhalte
möchte ich das ganze mit einer neuen Gui
und Progressbars anzeigen
Beispiel Übersicht
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 437, 440, 332, 198, BitOR($WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_CLIPCHILDREN,$DS_SETFOREGROUND))
$Progress1 = GUICtrlCreateProgress(52, 28, 150, 9)
$Progress2 = GUICtrlCreateProgress(52, 44, 150, 9)
$Progress3 = GUICtrlCreateProgress(240, 28, 141, 9)
$Label1 = GUICtrlCreateLabel("Seite 1", 8, 24, 37, 17)
$Label2 = GUICtrlCreateLabel("Seite 2", 8, 40, 37, 17)
$LblProzent = GUICtrlCreateLabel("%", 212, 28, 12, 17)
GUISetState(@SW_SHOW)
$Anzahl = 100
For $i =1 to $Anzahl
GUICtrlSetData ($Progress1,$i)
GUICtrlSetData ($LblProzent,$i & '%')
Sleep(100)
next
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Das ganze sollte so ablaufen:
Beispiel Hauptscript:
Anzahl = 50
Wäre die Anzahl im Hauptscript 80, dann sollen 80 Progressbars erzeugt werden
Habt Ihr eine Idee wie man das am besten lösen kann ?
Viele Grüße
Ilse ![]()
Hallo Cyberdyne,
ich konnte mich leider erst heute wieder melden.
(Die liebe Arbeit...)
SAGE NOCHMALS MERCI
Werd jetzt alles mal in Ruhe probieren
Liebe Grüße
Ilse ![]()
Muß mich wieder melden,
ich habe noch etwas rumprobiert.
Statt den Icons habe ich eine gif-Animation benutzt.
Die gif animation wird also in einer eigenen gui geladen.
Diese gui legt sich über alle anderen Guis.
Kann man diese Beispiele auch einer Gif Animation machen?
Mit z.B.
#include "gifAnimation.au3"
Der Code gifAnimation.au3
[autoit]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$hGui = GUICreate("", 640, 350, -1, -1, $WS_POPUP,$WS_EX_TOPMOST)
$oIE = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($oIE, 0, 0, 640, 350)
$oIE.navigate("about:blank")
$oIE.document.body.style.border = "0px"
$oIE.document.body.background = @ScriptDir& "\MeineAnimation.gif"
$oIE.document.body.scroll = "no"
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Ich habe das Fenster mit $WS_EX_TOPMOST ganz oben
Wenn ich nun auf Start klicke
dann sollte die Animation in der Gui erscheinen
aber der Code im Hintergund auf der anderen Gui gleichzeitig ablaufen.
Irgendwie So:
[autoit]
Func _button_start()
AdlibRegister
;Gif Animation...
EndFunc
So, jetzt brauche ich Zeit um das alles in Ruhe zu kapieren!
War heute ein bisschen viel! ![]()
Liebe Grüße
Ilse ![]()
@ Alle
ihr seid die besten!
DANKE!
ZitatWie kann man sich seine Bilderanimationen als dll selbst machen.
Oder kann man sich irgendwo vielleicht fertige dll Animationen herunterladen.
Mach mich mal auf die Suche.
Vielleicht kennt ja jemand ein gutes Archiv.
Liebe Grüße
Ilse ![]()
Hallo AutoBert,
merci, das werde ich mal versuchen.
Noch ne Frage zu AVI's.
Kann der IE standardmäßig AVI, Flash... ohne zusätzliche Plugins anzeigen?
Viele Grüße
Ilse ![]()
@ Oscar
AdlibRegister kurze Rückfrage:
Wenn ich meine Code GUICtrlSetImage...in dieser Funktion AdlibRegister drin habe
benötige ich dann trotzdem den Loop?
Oder reicht dieser Aufruf
Case $Start
_AdlibRegister() ; wird hier dann ständig das Bild gesetzt? Alle X Sekunden?
_eineFunktion () ; während diese Funktion bereits läuft?
Msgbox(4,"Ende","Beendet")
Ich habe folgendes gefunden was so ähnlich wäre!
[autoit]
#include <GUIConstantsEx.au3>
$ani1 = GUICtrlCreateAvi(@SystemDir & "\shell32.dll", 165, 50, 10)
Case $Start
GUICtrlSetState($ani1, 1)
;_meineFunktion()
MsgBox(4096,"Beendet","Ende")
GUICtrlSetState($ani1, 0)
EndSwitch
WEnd
Eine Frage hierzu: shell32.dll
Kann man sich seine Bilderanimation als dll selbst machen.
Größer wäre prima!
Grüße
Ilse ![]()
Hallo Blume,
ich habe mal verschiedene Codec probiert:
1. uncompressed
hm...da ist was zu sehen, aber alles andere als korrekt! Striche, falscher Hintergrund...
und 10 Sekunden = 250 MB
2. Microsoft Video 1
geht auch nicht (Fehler)
Ich kann das auch als gif exportieren, aber dann bekomme ich
die gif automation ja auch nicht in eine Gui.
Noch eine Idee?
Grüße
Ilse ![]()
Hallo,
...etwas schwierig zu erklären.
Ich fange mal an:
Wenn ich auf den Startbutton klicke,
dann sollen 2 Fotos nacheinander immer gezeigt werden.
Quasi endlos! Der weitere Code soll aber sofort starten.
Man sieht 2 Bilder die wechseln und die Funktion läuft,
wenn diese fertig ist kommt die Msgbox
und dann soll die Schleife beendet werden!
Case $Start
While 1
$nMsg = GUIGetMsg()
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\Bild1.jpg", 0, 0, 521, 345)
GUICtrlSetResizing($Pic1, $GUI_DOCKAUTO + $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
Sleep(1000) ; die Pause zwischen den Bildern!
GUICtrlDelete($Pic1)
$Pic2 = GUICtrlCreatePic(@ScriptDir & "\Bild2.jpg", 0, 0, 521, 345)
GUICtrlSetResizing($Pic1, $GUI_DOCKAUTO + $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
Sleep(1000) ; die Pause zwischen den Bildern!
GUICtrlDelete($Pic2)
wEND
_MeineFunktion()
MsgBox(4096,"Beendet","Ende")
[/autoit]Ich komme irgendwie nicht weiter...
Ist die WhileSchleife in Ordnung?
Grüße
Ilse ![]()
Hallo Kleiner,
was ich nicht verstehe, wie kann ich meine eigenen avi Files starten!
Dein Beispiel läuft als *.dll
Wie mache ich das mit einem avi???
#include <GUIConstantsEx.au3>
Opt('MustDeclareVars', 1)
[/autoit][autoit][/autoit][autoit]Example()
[/autoit][autoit][/autoit][autoit]Func Example()
Local $ani1, $buttonstart, $buttonstop, $msg
GUICreate("Meine GUI-Animation", 360, 200)
;$ani1 = GUICtrlCreateAvi(@SystemDir & "\shell32.dll", 165, 50, 10)
$ani1 = GUICtrlCreateAvi(@ScriptDir & "\intro.avi", 165, 50, 10)
$buttonstart = GUICtrlCreateButton("Start", 95, 150, 70, 22)
$buttonstop = GUICtrlCreateButton("Stopp", 195, 150, 70, 22)
GUISetState()
[/autoit][autoit][/autoit][autoit]; Die Schleife wiederholt sich, bis der Benutzer eine Beenden-Aktion auslöst
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $buttonstart
GUICtrlSetState($ani1, 1)
Case $msg = $buttonstop
GUICtrlSetState($ani1, 0)
EndSelect
WEnd
EndFunc ;==>Example
Wenn ich das intro.avi eintrage erhalte ich eine Fehlermeldung.
Starte ich die Inro.avi von Hand (Im Explorer) dann ist das Video zu sehen.
Grüße
Ilse ![]()
Hallo,
ich versuche schon die ganze Zeit ein *.avi File zu integrieren.
Leider erhalte ich einen Fehler bei der Ausführung
Autoit3.exe - ungültiges Bild!
Mein Code
[autoit]
#include <AVIConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 615, 440, 192, 124)
$Avi1 = GUICtrlCreateAvi(@ScriptDir &"\Intro.avi", -1, 32, 44, 545, 345)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Wenn ich das avi File direkt aus dem explorer starte.dann läuft es!
Nur in meiner Gui nicht!
Grüße
Ilse ![]()
@alle
nochmals Danke für Eure Mühe.
...krieg das jetzt hin
Liebe Grüße
Ilse ![]()
guten Morgen AutoBert,
hatte gestern leider keine Zeit mehr.
Vielen Dank für deine Lösung
Grüße
Ilse ![]()
Hallo AutoBert,
ZitatWinSetOnTop bringt es ja nur nach vorne, du müsstest aber beim erzegen der GUI den erweiterten Stil $WS_EX_TOPMOST verwenden.
hab ich natürlich probiert, geht leider nicht.
Sobald ich auf ein anderes Fenster klicke
ist die MainGui weg. Die andere bleibt!
Und gerade noch ein Problem festgestellt:
Am Ende erscheint eine Msgbox, beendet!
Und die soll natürlch ganz oben stehen!
Sie erscheint im Hintergrund!
MsgBox(4,"Beendet","Ende")
WinSetOnTop("Beendet","Ende", $Gui)
Die Msgbox habe ich gerade gelöst:
MsgBox(4096,"Beendet","Ende")
...kann nicht mehr denken... ![]()
Grüße
Ilse ![]()