Beiträge von mirko2002

Ich habe das ganze jetzt mal etwas weiterentwickelt... der Code ist zwar sicherlich nicht der sauberste - erfüllt aber seinen Zweck. Neue Dateien + Quellcode sind im ersten Beitrag neu eingefügt und die alten habe ich entfernt.

*Neuerungen*
Man kann, nachdem das Handy geöffnet wurde, unten den "Menu" Button klicken. Daraufhin öffnet sich das Handymenü... natürlich noch ohne Funktion - das kann dann später evtl mal kommen.

Hier brauche ich jedoch Hilfe von Euch. Der Menu-Button ruft eine While-Schleife auf. Solange diese Schleife aktiv ist, funktioniert zwar das Hauptmenü - jedoch sind natürlich alle anderen Sachen dann deaktiviert (wie zum Beispiel der Close/Exit-Button etc.

Wie kann ich die Whileschleife verlassen, so das alles weiterhin funktioniert? Exitloop brachte nicht das gewünschte Ergebniss, da dann zwar so im allgemeinem alles funktioniert - jedoch das Hauptmenü mit den Hovereffekten dann ausser Kraft gesetzt wird.

Danke für die Feedbacks

Joah das Androidsystem da zu includieren werd ich sicher nicht machen.

Aber dank machbarer Hover Effekten und GUI HIDE/SHOW Befehlen kann man, denke ich, locker eine Art Menü mit Funktion nachbasteln.

Werd mich da mal ranmachen...

Was aktuell in dem jetzigen Code nicht funktioniert ist die Minimize Funktion... bin aber am überlegen ob ich die generell einfach entferne.

Schmaler ewrd ich's auch noch etwas machen - ist mir gestern Nacht dann später auch aufgfallen im Vergleich zum originalen Bild

Ich hab etwas Langeweile gehabt und war in den letzten Tagen immer wieder auf der Suche nach "schicken" GUI's die man so mit AutoIT erstellen könnte.

Leider wird man über Google kaum fündig - oder ich hab einfach falsch gesucht, meist waren die Treffer doch nur Guides wie man überhaupt eine GUI erstellen kann (im allgemeinen) oder es wurde alles mit GDI+ gemacht (was mir persönlich ne Stufe zu hoch ist ).

Daher habe ich hier mal eine GUI erstellt, die wie das HTC Desire HD ausschaut (weil ich es zufälligerweise besitze)... über Sinn und Funktionalität läßt sich natürlich streiten. Auch ist der Code nicht komplett von mir, da ich mich einiger Codeschnipsel bedient habe um zum Beispiel die Runden GUI Ecken darzustellen oder die Hovereffekte für die Buttons zu realisieren (wenn gewünscht mit Animation).

Aber lange Rede, kurzer Sinn... hier das Script. Im Anhang das ganze auch als Komplettpaket zum Download + Vorschaubilder.

*Neuerungen*
26.02.2012 (v1.1)
Man kann, nachdem das Handy geöffnet wurde, unten den "Menu" Button klicken. Daraufhin öffnet sich das Handymenü... natürlich noch ohne Funktion - das kann dann später evtl mal kommen.

27.02.2012 (v1.2)
Browser/Suche eingebaut

Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

[EDIT]:
Alte Anhänge entfernt
Handy GUI.rar (40,96 kB - 19 mal heruntergeladen - zuletzt: 27.02.2012, 19:24)
Handy GUI 26.02.2012.rar (65,6 kB - 17 mal heruntergeladen - zuletzt: 27.02.2012, 19:56)

Gibts eine Erklärung was genau dein Codeschnipsel macht? Bin gerade noch auf Arbeit und kanns nicht testen

Lieben Dank!

Hallo,

sorry für die verspätete Antwort, hatte arbeitbedingt viel zu tun.

Auf Deine Frage zu beantworten ob es denn Tabs sein müssen: Ja!

Warum? Ganz einfach - das ganze soll für uns hier auf Arbeit verwendet werden. Dort sind unsere Rechte soweit eingeschränkt, dass wir die Taskleiste nicht vergrößern können oder mehrere Elemente eines Programms gruppieren lassen können.
Da wir zusätzlich etliche Programme am laufen haben ist so schon unsere Taskleiste brechend voll und unübersichtlich. Daher sind wir auf Tabbed-Browsing komplett angewiesen.

Auch soll der User zwar alle Tabs öffnen können, bei Bedarf die Adresse aber jederzeit wecheln können und Tabs hin- und her ziehen können.

So wie beim IE halt. Firefox dürfen wir leider nicht installieren also kann ich darauf auch nicht zurückgreifen.

Soweit ich Deine Aussagen also verstanden habe ist damit mein Versuch also gescheitert, oder?

Danke für die Antwort, jedoch hilft leider der Vorschlag, stattdessen _IECreate zu verwenden nicht, da er somit neue Fenster, statt neue Tabs öffnet. Bei meinem Skript sind das mal eben 9 IE Fenster die sich öffnen. Genau das soll ja mit den Tabs umgegangen werden, was mit der __IENavigate auch wunderbar funktioniert. Mit der originalen _IENavigate lassen sich halt keine weiteren Tabs öffnen, sondern nur von einer URL zur nächsten navigieren.

Nur das auslesen der URL scheint mit __IENavigate schier unmöglich...

Da ich das Tool hier für meine Arbeit schreibe und wir auch nur den IE nutzen dürfen, kann ich somit nicht auf die FF Variante zurückgreifen.

Gibts denn irgendeinen Trick, wie ich im IE einfach an die URL's der offenen Tabs komme?

Hallo AutoIt'ler

ich versuche gerade krampfhaft in einem IE Fenster, wo mehrere TABs geöffnet sind, dessen URL auszulesen.

Für ein einzelnes IE Fenster funktioniert es wunderbar. Sobald jedoch Tabs ins Spiel kommen liest er dennoch immer die URL des ersten Tab aus - obwohl z.b. das letzte aktiv / im Fokus ist.

Hier mal der Code (ist nicht vollständig, war erst nur zum testen):

#include <GUIConstantsEx.au3>
#include <IE.au3>

GUICreate("IE Session Manager", 300, 200)

GUICtrlCreateLabel("Gespeicherte Session:", 10, 28)
GUICtrlSetFont(-1, 8, 400, 4, "Arial")

$button = GUICtrlCreateButton("Internet öffnen", 120, 5)

$var1 = "http://www.google.de"
$var2 = "http://www.ebay.de"
$var3 = "http://www.google.com"
$var4 = "http://www.wikipedia.org"
$var5 = "http://www.google.de"
$var6 = "http://www.google.de"
$var7 = "http://www.google.de"
$var8 = "http://www.google.de"
$var9 = "http://www.google.de"

GUICtrlCreateLabel($var1, 20, 45)
GUICtrlCreateLabel($var2, 20, 60)
GUICtrlCreateLabel($var3, 20, 75)
GUICtrlCreateLabel($var4, 20, 90)
GUICtrlCreateLabel($var5, 20, 105)
GUICtrlCreateLabel($var6, 20, 120)
GUICtrlCreateLabel($var7, 20, 135)
GUICtrlCreateLabel($var8, 20, 150)
GUICtrlCreateLabel($var9, 20, 165)

GUISetState()

While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
Case $button
_start()
EndSwitch
WEnd

Func _start()
$oIE = _IECreate($var1)
$oIE1 = __IENavigate($oIE, $var2, 0, 0x800)
$oIE2 = __IENavigate($oIE, $var3, 0, 0x800)
$oIE3 = __IENavigate($oIE, $var4, 0, 0x800)
$oIE4 = __IENavigate($oIE, $var5, 0, 0x800)
$oIE5 = __IENavigate($oIE, $var6, 0, 0x800)
$oIE6 = __IENavigate($oIE, $var7, 0, 0x800)
$oIE7 = __IENavigate($oIE, $var8, 0, 0x800)
$oIE8 = __IENavigate($oIE, $var9, 0, 0x800)

$test = _IEPropertyGet ($oIE, "locationurl")
$test1 = _IEPropertyGet ($oIE1, "locationurl")
$test2 = _IEPropertyGet ($oIE2, "locationurl")
$test3 = _IEPropertyGet ($oIE3, "locationurl")
$test4 = _IEPropertyGet ($oIE4, "locationurl")
$test5 = _IEPropertyGet ($oIE5, "locationurl")
$test6 = _IEPropertyGet ($oIE6, "locationurl")
$test7 = _IEPropertyGet ($oIE7, "locationurl")
$test8 = _IEPropertyGet ($oIE8, "locationurl")

Sleep(15000)

MsgBox(0,"", $test)
MsgBox(0,"", $test1)
MsgBox(0,"", $test2)
MsgBox(0,"", $test3)
MsgBox(0,"", $test4)
MsgBox(0,"", $test5)
MsgBox(0,"", $test6)
MsgBox(0,"", $test7)
MsgBox(0,"", $test8)
EndFunc

Er gibt quasi immer nur die "Haupt"-URL aus. Aber nicht die, der weiteren Tabs. Keine Ahnung ob ich was falsch mache, oder ob es mit der IE.au3 nicht weiter realisierbar ist.

Vielen Dank für Eure Hilfe!

Wunderbar.... musste nochmal 1-2 kleine Änderungen vornehmen aber so gehts....

*hut ab*

Ich danke Dir

So hatte ich es auch schonmal probiert, jedoch ist auch hier ein Fehler:

So akzeptiert er zwar das ENTER nur wenn mein Programm aktiv ist, blockiert es aber bei anderen Anwendungen nun total.

Beispiel wieder am Notepad. Hole ich mein Programm in den Fokus funktioniert es wie gewünscht. Hole ich Notepad in den Vordergrund und drücke dort ENTER reagiert zwar (gewollterweise) mein Programm nicht mehr darauf - aber Notepad auch nicht mehr - sprich man kann dort keine Sätze schreiben wenn mein Programm im Hintergrund läuft.

Also einfach statt

If WinActive("FIRST RUN - Choose Master PW") Then
HotKeySet ("{enter}", "_enter")
EndIf

jetzt

If WinActive($input) Then
HotKeySet ("{enter}", "_enter")
EndIf

?

Guten Morgen alle zusammen,

ich habe derzeit eine kleine Herausforderung.

Bei meinem Programm soll beim ersten Start ein Passwort vergeben werden. Dies wird entweder durch drücken eines Buttons oder durch ENTER gespeichert.

War nun allerdings der Fokus nicht auf meinem Programmfenster sondern ich habe zum Beispiel Notepad geöffnet und habe dort Enter gedrückt, hat er natürlich trotzdem die ENTER "drücken" Funktion ausgeführt, da ich nicht angegeben habe, dass er dies nur ausführen soll wenn das Fenster auch aktiv ist.

Nun habe ich das Skript soweit umgeschrieben, dass er in der While-Schleife immer erst prüft ob das Fenster aktiv ist und nur dann die Funktion _enter ausführt.

Jedoch kann ich mein skript auf diesen Wege sogar minimieren und dennoch wendet er die _enter Funktion an was gar nicht sein dürfte. Kann hier jemand meinen Fehler finden?

#RequireAdmin

Opt("TrayIconHide", 1)

#include <WindowsConstants.au3>
#include <StructureConstants.au3>
#include <GUIConstants.au3>
#include <String.au3>
#include-once 'UPS-login.exe'

$crypt = 'QWERTZ'
$winuser = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")

$loginGui = GUICreate("FIRST RUN - Choose Master PW", 270, 70)
GUICtrlCreateLabel("Please choose a Master Password to protect your data:", 5, 5)

$input = GUICtrlCreateInput("", 5, 20, 260, 20, 0x21)
$button = GUICtrlCreateButton("Save", 110, 43, 55, 25)
$read = GUICtrlRead($input)
$check = IniRead(@WindowsDir & "\" & $winuser & "pws.ini", "MASTER", "MASTER", "")

If $check = "" then
GUIsetstate()
Else
If not FileExists(@TempDir & "\UPS-login.exe") Then
FileInstall("C:\Documents and Settings\751076\Desktop\UPS\UPS-login.exe", @TempDir & "\UPS-login.exe")
EndIf
ShellExecute(@TempDir & "\UPS-login.exe")
Exit
EndIf

Func _enter()
$read = GUICtrlRead($input)
IniWrite(@WindowsDir & "\" & $winuser & "pws.ini", "MASTER", "MASTER", _StringEncrypt(1, GUICtrlRead($input), $crypt, 2))
MsgBox(0, "", "Password saved successful!")
If not FileExists(@TempDir & "\UPS-login.exe") Then
FileInstall("C:\Documents and Settings\751076\Desktop\UPS\UPS-login.exe", @TempDir & "\UPS-login.exe")
EndIf
ShellExecute(@TempDir & "\UPS-login.exe")
Exit
EndFunc

While 1
If WinActive("FIRST RUN - Choose Master PW") Then
HotKeySet ("{enter}", "_enter")
EndIf
$msg = GUIgetmsg()
Switch $msg
Case $GUI_EVENT_CLOSE
Exit
Case $button
$read = GUICtrlRead($input)
IniWrite(@WindowsDir & "\" & $winuser & "pws.ini", "MASTER", "MASTER", _StringEncrypt(1, GUICtrlRead($input), $crypt, 2))
MsgBox(0, "", "Password saved successful!")
If not FileExists(@TempDir & "\UPS-login.exe") Then
FileInstall("C:\Documents and Settings\751076\Desktop\UPS\UPS-login.exe", @TempDir & "\UPS-login.exe")
EndIf
ShellExecute(@TempDir & "\UPS-login.exe")
Exit
EndSwitch
WEnd

Hm alles klar. Getestet, funktioniert wunderbar, Danke! Mehr kann ich nicht sagen - wie immer wird einem in diesem Board vorzüglich geholfen. Macht weiter so!!!

Zitat:
Für Wordpad-Dokumente findest du den Aufruf unter folgendem Schlüssel:
HKEY_CLASSES_ROOT\Wordpad.Document.1\shell\print\command
also: '"Pfad_wordpad.exe" /p "Pfad_zu_druckende_Datei"'

Versteh ich nicht

Das ist das Problem - das Fenster soll eigentlich gar nicht aktiv werden.

Ich möchte eigentlich nur ein Druckbutton in der GUI von der aus der Druck startet, ohne das der entsprechende User irgendetwas anderes sieht.

Die erste Variante hat dies perfekt umgesetzt - jedoch gefällt mir das Layout vom Notepad nicht.

Somit hab ich die WordPad Variante probiert - da der user aber eigentlich vom Hintergrundprozess des Druckens nmichts mitbekommen soll stört es mich schon das WordPad überhaupt aufgeht. Mit WinWaitActive muss auch hier das WordPad maximiert sein um arbeiten zu können...

Da ich grad auf Arbeit bin kann ich den Registryteil von Bugfix nicht testen, hab mich derweil mit folgender Version rumgeschlagen:

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ButtonDrucken
ShellExecute(@WindowsDir & "\system32\write.exe", "", "", "")
Sleep(1000)
ControlSend("Document - WordPad", "", "", GUICtrlRead($Edit1))
Sleep(500)
ControlSend("Document - WordPad", "", "", "^p")
Sleep(500)
ControlSend("Document - WordPad", "", "", "{ENTER}")
Sleep(1000)
ProcessClose("wordpad.exe")
EndSwitch
WEnd

Jedoch funktioniert der ControlSend hier nicht, wenn ich WordPad auf minimize oder gar auf Hide setze... er öffnet es dann zwar aber sämtliche Send's gehen dann ins leere... warum auch immer...

Joah wunderbar.... mußte noch nen kleines Sleep einbauen, da die Datei sonst schneller gelöscht war bis der Druckauftrag zustande kam

Aber hier hab ich doch glatt noch was zu bemängeln^^

Soweit ich die Funktion _FilePrint richtig gesehen habe wird über die shell32.dll das notepad geöffnet, mit Hide versteckt und darüber der Print durchgeführt.

Notepad hat aber die blöde eigenschaft, über dem Dokument den Dokumentennamen (in unserem Beispiel temp.txt) mit auszudrucken und unten drunter noch Page 1 usw.

Wenn ich denselben ausdruck über Wordpad mache druckt er solchen Mist nicht mit aus. Google hoch und runter gesucht - aber nichts gefunden wie man über Wordpad drucken könnte. Gibts da auch irgendeinen shell32 Zugriff?

Schließlich läßt es sich ja auch einfach mit dem Befehl wordpad.exe starten so wie sonst die notepad.exe...

Hat da noch wer Rat?

Hallo Freunde der leichten Unterhaltung,

heute habe ich ein neues Thema womit ich mich beschäftige

Ich habe mir in de Kopf gesetzt ein bestimmtes Editfeld aus meiner GUI über einen Button "ausdruckbar" zu machen.

Ansich kein Problem mit _PrintFile sollte man jetzt denken.

Jedoch ist der Inhalt meiner Editbox immer nur ein Abschnitt aus einer *.ini Datei und dieser sogar noch mit StringReplace formatiert wegen der Zeilenumbrüche.

würde ich also _PrintFile benutzen würde er ja a) die gesamte Datei drucken statt nur dem grad angezeigten Teil und b) natürlich auch die Formatierungen wie [CRLF] da diese ja erst im Skript ersetzt werden.

Wie also kann ich das Editfeld so ausdrucken lassen wie ich es eigentlich auch direkt in der GUI aktuell sehe?

Google und hier die Boardinterne Suchfunktion ergaben leider immer nur Hinweise auf _PrintFile.

LG
Mirko

Ja na klar warum bin ich nicht selber drauf gekommen

Oh man... vielen vielen Dank!

Hallo Autit'ler,

ich habe ein Problem, welches ich in einen meiner alten Projekte schonmal gelöst hatte, es aber nun nicht mehr zur Hand habe und damit erneut auf dem Schlauch stehe.

Ich schreibe in eine ini Datei bestimmte Daten. Ansich kein Problem - das auslesen sowie schreiben funktioniert problemlos.

Jedoch soll alles was ich beim erneuten speichern eingetragen habe nicht die alten Daten löschen/überschreiben, sondern ergänzen.

Hier ein kleiner Auszug wo der iniwrite stattfindet:

If @Mon & @Year = "112011" Then
$read = GUICtrlRead($notizen)
IniWrite(@ScriptDir & "\eDiary.ini", "Dezember 2011", "Eintrag", "***" & @MDAY&"."&@MON&"., "& @HOUR&":"&@MIN&":"&@SEC & "***" & "[CRLF]" & StringReplace($read, @CRLF, '[CRLF]')& "[CRLF][CRLF]")
MsgBox(64, "Speichern erfolgreich", "Dein Eintrag wurde gespeichert!")

Zwar speichert er mir das ganze natürlich ab was in meinem Notizfeld steht, jedoch wenn ich nun erneut speicher dann ersetzt er den vorherigen Wert anstatt ihn zu ergänzen.

Ich weiß dass man irgendwie mit einer Variable +1 arbeiten musste. Aber unter Google finde ich derzeit einfach nichts passendes (mit Sicherheit einfach nur die falschen Suchbegriffe verwendet) und ich selber hab gerade einfach nur ne Denkblockade, was mir ein solch simples Problem beschert.

Nur nochmal zum Verständniss:

Ich speicher folgenden Wert in eine ini-Datei:

[Januar 2012]
Eintrag=Januar 2012[CRLF]Kein Eintrag vorhanden

Nun möchte ich einen weiteren Text hinzufügen ohne das der alte Text ersetzt wird:

[Januar 2012]
Eintrag=Januar 2012[CRLF]Kein Eintrag vorhanden[CRLF]Hier soll mein weiterer Text stehen...

Hat da jemand nochmal Hilfe für mich?

Ahhhh..... alles klar - jetzt wo Du es so erklärt hast habe ich es verstanden und es erfolgreich in meinem Skript untergebracht.

Vielen Dank für Eure großartige Hilfe!!!!!