Ähm, diese Stelle nicht - Sorry ! Dein Antwort hat mir geholfen, vielen Dank.
Beiträge von TL1983
-
-
Hallo,
wie kann ich eine Zeile Code durch einen Umbruch auf mehrere verteilen ?
Will eine Combo Box statisch befüllen, das wird in einer Zeile sehr unübersichtlich.
Besten Gruß
-
Hallo,
vielen Dank, das hat mir geholfen.
Besten Gruß
-
Hallo,
ich möchte gerne bei der Veränderungen von Werten in den oben genannten Feldern reagieren und ein Labl ausblenden.
Ich finde keinen Ansatz um die Veränderung des Inhalts zu reagieren.Könnt ihr mir helfen ?
besten Gruß
-
Hallo,
ich mache seit langer Zeit mal wieder ein kleines AutoIt Projekt und scheitere daran eine Tastenkombi zu senden.
Ich möcht "Strg+M" senden, könnt ihr mir helfen ? Ich scheitere daran und die Suche brachte mir nix
Gruß Thomas
-
Hallo,
super ! Ich habe es mit dem $WS_EX_TOOLWINDOW probiert und läuft und auch die Child Methode geht prima.
Habe mich für die Child Variante entscheiden, das schien mit irgendwie sauberer.PS: Vielen Dank !
Thomas
-
Hallo,
der ist es leider nicht :-(, er friert nur die GUI ein.
Thomas
-
Moin,
ich habe nochmal eine Frage,
wenn ich in einer Anwednung 2 GUIs habe, kann ich irgendwie hinbekommen das nur eine in der Taskleiste angezeigt wird ?Gruß Thomas
-
Hey,
Danke, darauf hätte ich auch kommen können.
Das funktioniert prima.Nun noch meine Frage wie kann wieder so einen Rahmen um die GUI bekommen wie bei dem Sytle "$WS_SIZEBOX" ohne diesen
zu benutzen ?EDIT: Das mit dem Rahmen ist auch gelöst
-
1 Stunden Differenz, sind Mehrfachposts hintereinander ?
Hier nun der komplette Code :Spoiler anzeigen
[autoit]#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.8.1
[/autoit] [autoit][/autoit] [autoit]
Author: Thomas LobsienScript Function / Version:
[/autoit] [autoit][/autoit] [autoit]
Filial Maps 0.1d#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=\\Srvedv01\mitarbeiter\sc501715 (Stefan Carstensen)\developer_group\icons\Vista Icon Pack ST\Net\Net021.ico
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****; ChangeLog
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
;11.10.2012 / 0.1a / Thomas: Optimierung der Vollbild Ansicht. Im GuiCreate wurden im Style $GUI_SS_DEFAULT_GUI, $WS_MAXIMIZE und $WS_MAXIMIZEBOX hinzugefügt.
;22.10.2012 / 0.1b / Thomas: Die URL für Google Maps wurde angepasst, so kann nun der Zoomlevel übergeben werden.
;Der Zoomlevel wird in der Reg abgelegtund beim erneuten Start geladen. Der Zoomlevel gitl nur für einzelne Ziele und nicht für Routen.
;06.11.2012 / 0.1c / Thomas: Die Eingaben können nun mit Enter bestätigt werden, sollte der Fokus nicht in einem der Eingabefelder von AutoIt sondern bei GoogleMaps
;liegen wird nicht die Funktion StartNavi ausgeführt.
;26.02.2014 / 0.1d / Thomas: Der IE ist nicht mehr eingebettet sondern wird an eine eigene GUI geheftet. Die URL aufrufe wurden an das neu MAPS angepasst.
;Durch dieseÄnderungen ist das Progamm wieder mit dem IE 11 kompatibel.#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <IE.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
#include "MySQL.au3"
#include <array.au3>;Öffentliche Variablen
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Dim $Input_A ;Eingabefeld 1
Dim $Input_B ;Eingabefeld 2
Dim $Input_C ;Eingabefeld 3
Dim $Input_D ;Eingabefeld 4
Dim $Input_E ;Eingabefeld 5
Dim $oIE ;IE Objekt
Dim $Server ;Beinhaltet den Helpdesk Server
Dim $RegErg ;Der ausgelesene Wert aus der Registry
Dim $WriteReg ;Dieseer Wert wird ggf. in die Reg geschrieben
Dim $ComboBox ;Variable zum Auslesen der ComboBox
Dim $ComboErg ;Enthält den Wert des ausgelesenen Combo Feldes
Dim $ComboErgAlt ;Enthält das alte Ergebnis der ComboBox wenn der User die Auswahl ändert
Dim $RouteFiliale=0 ;Sofern nur eine Filiale mit der Funktion StartNavi angezeigt wird enthält die Variable eine 0, bei einer Route eine 1.
DIM $Daten ;Enthält die einzelnen Adressdaten für ein Ziel die dann später zu den Gesamtdaten hinzugefügt werden.
DIM $DatenGesamt ;Alle Eingaben aufbereitet für GoogleMaps
DIm $i=0 ;Counter für die Schleife zum Auslesen der Eingabefelder
Dim $Dummy ;Daten aus dem jeweiligem Eingabefeld
Dim $ST ;Beinhaltet den ST
Dim $hGUI ;Varibale zur GuiMain()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Func Main()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
;Übergabe Daten in die Eingabefelder Starten
Dim $UE1=_ArrayToString($CmdLine,"", 1, 1)
Dim $UE2=_ArrayToString($CmdLine,"", 2, 2)
Dim $UE3=_ArrayToString($CmdLine,"", 3, 3)
Dim $UE4=_ArrayToString($CmdLine,"", 4, 4)
Dim $UE5=_ArrayToString($CmdLine,"", 5, 5);------------------------------------------------Gui Start
[/autoit] [autoit][/autoit] [autoit]HotKeySet('{Enter}', '_Enter') ; Hier wird der Hotkey Enter definiert und beim Drücken von Enter wird die Funktion _Enter gestartet, diese prüft wo der Fokus liegt und starte dann StartNAvi oder eben nicht.
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
;$hGUI=GUICreate("Filial Maps 0.2", 10, 10, -1, -1, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZE, $WS_MAXIMIZEBOX)) ;GUI erstellen
$hGUI=GUICreate("Filial Maps 0.2", @DesktopWidth-15,50 , 4,4) ;GUI erstellen
GUICtrlCreateGroup("", 7, 1, (@DesktopWidth - 30), 40) ; Die Gruppe der Eingabefelder erstellen
$Button_Start = GUICtrlCreateButton("Start", 830, 13, 50,20)
GUICtrlCreateLabel("Zoomlevel: ", 900, 18, 70) ; Label ; Eingabefekld
$ComboBox=GUICtrlCreateCombo("0", 960, 13) ; create first item;Abfrage ob ein Zoomlevel in der Reg steht, ggf. wird dieser ausgelsen bzw. geschrieben. Der Zommlevel wird in die ComboBox geschrieben und ggf. in die Reg
[/autoit] [autoit][/autoit] [autoit]
If ReadReg()="" Then
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20", "18") ; add other item snd set a new default
$WriteReg="18"
WriteReg($WriteReg)
Else
GUICtrlSetData(-1, "1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16|17|18|19|20", ReadReg())
EndIf$Button_Hilfe = GUICtrlCreateButton("Hilfe", 1100, 13, 50,20)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUISetBkColor(0xCCE0F0) ; will change background colorGUICtrlCreateLabel("Ziel A: ", 13, 18, 35) ; Label ; Eingabefekld
[/autoit] [autoit][/autoit] [autoit]
$Input_A = GUICtrlCreateInput("", 53, 14, 100,20)
GUICtrlSetData($Input_A, $UE1,$UE1 )GUICtrlCreateLabel("Ziel B: ", 173, 18, 35) ; Label erstellen
[/autoit] [autoit][/autoit] [autoit]
$Input_B = GUICtrlCreateInput("", 213, 14, 100,20); Eingabefeld erstellen
GUICtrlSetData($Input_B, $UE2,$UE3 )GUICtrlCreateLabel("Ziel C: ", 330, 18, 35) ; Label erstellen
[/autoit] [autoit][/autoit] [autoit]
$Input_C = GUICtrlCreateInput("", 370, 14, 100,20); Eingabefeld erstellen
GUICtrlSetData($Input_C, $UE3,$UE4 )GUICtrlCreateLabel("Ziel D: ", 493, 18, 35) ; Label erstellen
[/autoit] [autoit][/autoit] [autoit]
$Input_D = GUICtrlCreateInput("", 533, 14, 100,20); Eingabefeld erstellen
GUICtrlSetData($Input_D, $UE4,$UE4 )GUICtrlCreateLabel("Ziel E: ", 653, 18, 35) ; Label erstellen
[/autoit] [autoit][/autoit] [autoit]
$Input_E = GUICtrlCreateInput("", 693, 14, 100,20); Eingabefeld erstellen
GUICtrlSetData($Input_E, $UE5,$UE5 )GUISetState(@SW_SHOW) ;GUI starten
[/autoit] [autoit][/autoit] [autoit];Neues IE Fenster erzeugen
[/autoit] [autoit][/autoit] [autoit]
$oIE = _IECreate()
;Parameter für den IE definieren
With $oIE
;.Left = 100
;.Top = 100
.Menubar = False
.Resizable = False
.StatusBar = False
;.TheaterMode = True
.Toolbar = False
.Visible = True
.Fullscreen = TrueEndWith
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
;Das IE Fesnter bewegen
WinMove(_IEPropertyGet($oIE, "title"), "", 5, 5,@DesktopWidth-30,@DesktopHeight-188)
; GUI erzeugen an das das IE Fenster gebunden wird
$hWnd = GUICreate("Filial Maps Navigator", @DesktopWidth-20, @DesktopHeight-180, 5,90, $WS_POPUP, 1)
;GUI an dem der IE hängt starten
GUISetState()
;GUI und IE verbinden
DllCall("user32.dll", "int", "SetParent", "hwnd", _IEPropertyGet($oIE, "hwnd"), "hwnd", $hWnd);GUISetState()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];------------------------------------------------Gui Ende
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]If $UE1="" Then ; Wenn kein Parameter üergeben wurde, wird eine Default Adresse beim Start geladen und der Focus ist im 1. Feld
[/autoit] [autoit][/autoit] [autoit]
;_IENavigate($oIE, "http://www.maps.google.com/maps?f=q&hl=de&geocode=&q=Stadtweg+2+,+Weding+24976+Handewitt&t=h&z=18") ; Aufruf Starte Adresse
_IENavigate($oIE, "http://maps.google.de/maps?q=Stadtweg+2+Weding+Handewitt&t=h&z=18") ; Aufruf Starte AdresseSleep(500)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUICtrlSetState ( $Input_A, $GUI_FOCUS ); Focus auf das Filialfeld setztenGUICtrlSetState ( $Input_A, manueller Start )
EndIf; Wenn Daten übergeben wurden die Funktion StartNavi starten
[/autoit] [autoit][/autoit] [autoit]
If $UE1<>"" Then StartNavi()$ComboErgAlt = GUICtrlRead($ComboBox)
[/autoit] [autoit][/autoit] [autoit];Schleife zum Abfragen der GUI und ausführen der ensprechenden Funktion
[/autoit] [autoit][/autoit] [autoit]
While 1$msg = GUIGetMsg()
[/autoit] [autoit][/autoit] [autoit]
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_Start
StartNavi()
Case $msg = $Button_Hilfe
Hilfe()
Case $msg = $ComboBox ;Wenn die ComboBox geändert wurde, dann wird der neue Wert in die Reg geschrieben und die Karte neugeladen.$ComboErg = GUICtrlRead($ComboBox)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
If $ComboErg<>$ComboErgAlt Then
WriteReg($ComboErg) ; In die Reg schreiben
StartNavi() ;Karte neuladen
EndIf
EndSelect
WEndEndFunc ;==>Main
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];Abfrage der Adressdaten und Übergabe der Daten ans Goole Maps
[/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Func StartNavi()
[/autoit] [autoit][/autoit] [autoit]$i=0 ;Zurücksetzten des Counters
[/autoit] [autoit][/autoit] [autoit]
$Daten="" ;Zurücksetzten
$DatenGesamt="";Zurücksetzten$RouteFiliale=0 ; Wird auf 0 gesetzt, da meist nur eine Filiale angezeigt wird.
[/autoit] [autoit][/autoit] [autoit];MySQL Init, Verbindung und Co
[/autoit] [autoit][/autoit] [autoit]
_MySQL_InitLibrary() ; ;MYSQL starten, DLL im PATH (enthält auch @ScriptDir), sont Pfad zur DLL angeben. DLL muss libmysql.dll heißen.If @error Then Exit MsgBox(0, '', "") ; Error Avfrage der Lib
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$MysqlConn = _MySQL_Init() ; MySQL Objekt erstellen
$connected = _MySQL_Real_Connect($MysqlConn,'Server','User','PSW','XY') ; Mit dem MySQL Server verbinde
If $connected = 0 Then Exit MsgBox(16, 'Connection Error', _MySQL_Error($MysqlConn)) ; Fehler Abfrage der Verbindung zum Server;Abfrage starten
[/autoit] [autoit][/autoit] [autoit]
;Daten für Adressen ermitteln und ggf. an Google übergeben
If GUICtrlRead($Input_A)="" Then
MsgBox(16,"Achtung!","Es muss eine Filialnummer eingegeben werden!")
Else
;Schleife zum Auslesen der Filialfelder
Do
$i=$i+1
Select ; Die einzelnen Felder auslesen mit den Daten
Case $i=1
$Dummy=GUICtrlRead($Input_A) ;Auslesen der Filialen
Case $i=2
$Dummy=GUICtrlRead($Input_B)
Case $i=3
$Dummy=GUICtrlRead($Input_C)
Case $i=4
$Dummy=GUICtrlRead($Input_D)
Case $i=5
$Dummy=GUICtrlRead($Input_E)
EndSelect$ST=$Dummy
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]$query = "SELECT strasse, plz, ort FROM filialen.filial_adressen where id='"&$Dummy&"'";Erstellen der MySQL Abfrage
[/autoit] [autoit][/autoit] [autoit]
_MySQL_Real_Query($MysqlConn, $query) ; Ausführen der Abfrage;Variablen für das Ergebnis der Abfrage erstellen
[/autoit] [autoit][/autoit] [autoit]
$res = _MySQL_Store_Result($MysqlConn)
$fields = _MySQL_Num_Fields($res)
$rows = _MySQL_Num_Rows($res); Ergebnis der Abfrage in ein Araay und danach in ein String schieben
[/autoit] [autoit][/autoit] [autoit]
_MySQL_Data_Seek($res, 0) ; nur zum zum Zurücksetzen an den Anfang der Abfrage
Do
$row1 = _MySQL_Fetch_Row_StringArray($res)
If @error Then ExitLoop
;~ _ArrayDisplay($row1)
$Daten=_ArrayToString($row1, "+", 0, 7) ; Das Array in ein String schieben
Until @error;Sonderzeichen aus dem String entfernen die zu Fehlfunktionen in GoogleMaps führen.
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$Daten = StringReplace($Daten, " ", "+") ; Leerzeichen durch + ersetzten
$Daten = StringReplace($Daten, "/", "+") ; Leerzeichen durch + ersetzten$ST=ST($Dummy)
[/autoit] [autoit][/autoit] [autoit];Den Strimg für GoogleMaps zusammenbauen
[/autoit] [autoit][/autoit] [autoit]
If $Daten="" Then
$Daten=$Dummy
EndIf
If $Daten <> "unbekannt+0+unbekannt" And $DatenGesamt<>"" Then
If $Daten="" Then $Daten=$Dummy
If $ST="" Then $DatenGesamt=$DatenGesamt&"+to:"&$Daten
If $ST<>"" Then $DatenGesamt=$DatenGesamt&"+to:"&$ST
$RouteFiliale=1 ;Hier wird markiert das es sich um eine Route handelt
ElseIf $Daten <> "unbekannt+0+unbekannt" And $DatenGesamt="" Then
If $Daten="" Then $Daten=$Dummy
If $ST="" Then $DatenGesamt=$Daten
If $ST<>"" Then $DatenGesamt=$ST
EndIf$Daten=""
[/autoit] [autoit][/autoit] [autoit]Until $i=5
[/autoit] [autoit][/autoit] [autoit]EndIf
[/autoit] [autoit][/autoit] [autoit];Auslesen des Zoomlevel aus der ComboBox
[/autoit] [autoit][/autoit] [autoit]
$ComboErg=GUICtrlRead($ComboBox);~ String an das IE Objekt übergeben unter Angabe ob Filiale oder Route
[/autoit] [autoit][/autoit] [autoit]
If $RouteFiliale=0 Then ; Mit Zoomlevel
_IENavigate($oIE, "http://maps.google.de/maps?f=q&hl=de&geocode=&q=" & $DatenGesamt & "&t=r&z=" & $ComboErg)
Else ; $RouteFiliale=1 Then ; Ohne Zoomlevel
_IENavigate($oIE, "http://maps.google.de/maps?f=q&hl=de&geocode=&q=" & $DatenGesamt & "&t=r")
EndIf;Focus auf das 2. Eingabefeld setzten, da sich Google den Focus klaut.
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Sleep(500)
GUICtrlSetState ( $Input_B, $GUI_FOCUS ); Focus auf das Filialfeld setztenGUICtrlSetState ( $Input_A ); Abfrage freigeben
[/autoit] [autoit][/autoit] [autoit]
$res = _MySQL_Store_Result($MysqlConn)
_MySQL_Free_Result($res); Verbindung beenden
[/autoit] [autoit][/autoit] [autoit]
_MySQL_Close($MysqlConn); MYSQL beenden
[/autoit] [autoit][/autoit] [autoit]
_MySQL_EndLibrary()EndFunc ;==>Ende StartNavi
[/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit];Es wirde geprüft ob schon ein Zoomlevel in der Reg steht, er wird ggf. ausgelsen und angewendet.
[/autoit] [autoit][/autoit] [autoit]
Func WriteReg($WriteReg)RegWrite("HKEY_CURRENT_USER\Software\FilialMaps", "Zoomlevel", "REG_SZ", $WriteReg) ;Schreiben des Benutzers in die Registry
[/autoit] [autoit][/autoit] [autoit]EndFunc ;==>GetReg
[/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];Der Benutzer wird aus der Registry gelesen
[/autoit] [autoit][/autoit] [autoit]
Func ReadReg()Local $var = RegRead("HKEY_CURRENT_USER\Software\FilialMaps", "Zoomlevel") ;Lesen des Benutzers aus der Registry
[/autoit] [autoit][/autoit] [autoit]
Return $var ; Rückgaabe des UsersEndFunc ;==>ReadReg
[/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Func ST($N)
[/autoit] [autoit][/autoit] [autoit]Dim $O
[/autoit] [autoit][/autoit] [autoit]
Select
Case $N="Christopher"
$O="55743,Idar-Oberstein+Deutschland"Case $N="Erik"
[/autoit] [autoit][/autoit] [autoit]
$O="31608,Marklohe+Deutschland"Case $N="Hans"
[/autoit] [autoit][/autoit] [autoit]
$O="08529,Plauen+Deutschland"Case $N="Klaus"
[/autoit] [autoit][/autoit] [autoit]
$O="49477,Ibbenbüren+Deutschland"Case $N="Ronald"
[/autoit] [autoit][/autoit] [autoit]
$O="15345,Eggersdorf+Deutschland"Case $N="Andy"
[/autoit] [autoit][/autoit] [autoit]
$O="23730,Altenkrempe+Deutschland"Case $N="Henry"
[/autoit] [autoit][/autoit] [autoit]
$O="18119,Warnemünde+Deutschland"Case $N="Michael"
[/autoit] [autoit][/autoit] [autoit]
$O="45739,Oer-Erkenschwick+Deutschland"Case $N="Bernd"
[/autoit] [autoit][/autoit] [autoit]
$O="Nattheim+Deutschland"Case $N="Oliver"
[/autoit] [autoit][/autoit] [autoit]
$O="84048,Mainburg+Deutschland"Case $N="Thomas"
[/autoit] [autoit][/autoit] [autoit]
$O="56457,Hergenroth+Deutschland"Case $N="Christian.R"
[/autoit] [autoit][/autoit] [autoit]
$O="34125,Kassel+Deutschland"Case $N="Christian"
[/autoit] [autoit][/autoit] [autoit]
$O="8046,Graz+Österreich"Case $N="Sandy"
[/autoit] [autoit][/autoit] [autoit]
$O="57350,Stiring-Wendel+Frankreich"Case $N="Jonathan"
[/autoit] [autoit][/autoit] [autoit]
$O="02300,Ognes+Frankreich"Case $N="Stefan"
[/autoit] [autoit][/autoit] [autoit]
$O="6048,Horw+Schweiz"Case $N="Carlo"
[/autoit] [autoit][/autoit] [autoit]
$O="24050,Grassobbio+Italien"Case $N="Javier"
[/autoit] [autoit][/autoit] [autoit]
$O="Valencia+Spanien"
EndSelectReturn $O
[/autoit] [autoit][/autoit] [autoit]EndFunc ;==>Ende ST
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
; Hier wird der Hotkey -Enter- abgefangen und geprüft welches Edit Feld aktiv ist, wenn es keins der AutoIt Felder ist wird nicht die Funktion StartNavi gestartet.
Func _Enter()
HotKeySet('{Enter}')
If WinActive($hGUI) Then
$sClassName = ControlGetFocus($hGUI)
ConsoleWrite('! Fokus liegt im Fenster bei ' & $sClassName & @CRLF)
Switch $sClassName
Case "Edit1", "Edit2","Edit3","Edit4","Edit5"
StartNavi()
ConsoleWrite("an dieser Stelle die gewünschten Funktionen ausführen" & @CRLF & @CRLF)
Case Else
ConsoleWrite("falsches Control also keine Funktionen ausführen" & @CRLF & @CRLF)
Send('{Enter}')
EndSwitch
Else
ConsoleWrite('! Fokus liegt NICHT im Fenster' & @CRLF & @CRLF)
Send('{Enter}') ;andere nwebdung also normales Enter
EndIf
HotKeySet('{Enter}', '_Enter')
EndFunc ;==>_Enter;-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Func Hilfe()
[/autoit] [autoit][/autoit] [autoit]MsgBox(64,"Filial Maps Hilfe", "Es können folgende Daten eingegeben werden," &@LF& "die dann in Google Maps angezeigt werden." & @LF & @LF &"- Filialnummern (Bsp.: 0305 oder A123)" & @LF & "- Vornamen der Servicetechniker (Bsp.: Klaus oder Christian.R)" & @LF &"- Städtenamen (Bsp.: Flensburg oder Kiel)"& @LF & @LF & "Bei der Eingabe von mehr als einem Ziel wird automatisch die Route" & @LF & "zwischen den einzelnen Zielen angezeigt."& @LF & @LF & "Der Zoomlevel wird gespeichert und beim Starten geladen." & @LF & "Bei einer Route wird der Zoomlevel nicht berücksichtigt.")
[/autoit] [autoit][/autoit] [autoit]EndFunc
[/autoit] [autoit][/autoit] [autoit];-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]Edit Oscar: Bitte AutoIt-Tag und, bei längeren Quelltexten, zusätzlich den Spoiler verwenden. Ich habe das hier mal geändert.
-
Hallo,
die 2. Frage habe ich gelöst, leider ist nun keiner so schöner Rahmen mehr um die GUi. Bekomme ich diesen zurück ohne das Fenster wieder veränderbar zumachen ?
Die GUI wird nun so aufgerufen .
Code$hWnd = GUICreate("Filial Maps Navigator", @DesktopWidth-20, @DesktopHeight-180, 5,90, $WS_POPUP, 1)
Thomas
-
Hallo,
ich habe in einer Anwednung 2 GUIs, kann ich diese gleichzeitig minimieren / maximieren ?
Und gleich noch eine 2 Frage, wie kann ich verhindern das man eine GUI in der größe verändern kann (also der Benutzer).Gruß Thomas
PS: Die DUI für die 2. Frage rufe ich so auf :$hWnd = GUICreate("Filial Maps Navigator", @DesktopWidth-20, @DesktopHeight-180, 5,90, BitOR($WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_POPUP,$WS_SIZEBOX), 1)
Thomas
-
Mal wieder vielen Dank an euch :-).
Diese super Hilfe ist immer Gold Wert.Gruß Thomas
-
Hallo,
kann ich eine GUI erstellen in der ich die Titelleiste ausblende (Titel der GUI, Maximieren Button etc.) ?
Gruß Thomas
-
Hi,
trotzdem Danke !
Dein Beispiel konnte ich super anwenden, ein bisschen modifiziert und schon supi !Schönes WE, nun ist Feierabend !
-
-
PS: Freue mich über weitere Ideen und Tips zu dem Thema.
Vielen Dank alpines.
-
Hallo,
danke schau ich mir mal an.
Thomas
-
Gibt es die Möglichkeit ein IE Fenster anderweitig einzubinden ?
Thomas
-
Ja, bei direktem Azufruf der URL im Browser ist alles i.O.