Beiträge von Racer

Racer

Einen schönen guten Abend!

Nach langen suchen habe ich das Problem gelöst. Mit

Code

;INTERNET_OPTION_SETTINGS_CHANGED
DllCall( 'wininet.dll', 'uint', 'InternetSetOption', 'ptr', 0, 'dword', 39, 'ptr', 0, 'dword', 0 )
;INTERNET_OPTION_REFRESH
DllCall( 'wininet.dll', 'uint', 'InternetSetOption', 'ptr', 0, 'dword', 37, 'ptr', 0, 'dword', 0 )

ist es möglich den aktiven Internetexplorer einen neuen Proxy der zuvor in die Registrierung geschrieben worden ist zu setzten!

Ich bin sicher das mit der Wininet.dll noch viel mehr gemacht werden kann, nur das übersteigt mein können!
Es gibt auch eine UDF für alle die es Interessiert: link

lg
Racer

Racer

Zitat von chip

Das ganze hört sich irgendwie immer dubioser an. Still und heimlich den Proxy ändern ohne dass es irgendjemand auch nur ansatzweise mitbekommt. Selbst das schließen und automatische wieder öffnen darf der Benutzer nicht sehen...

Und der Satz "ein Tool macht auch noch ein bißchen mehr als "nur" die Proxyeinstellungen zu änderen, sondern überwacht auch alles, kann GPP's in einen Zeitinterval selbstständig abrufen" hört sich für mich nicht wirklich nach etwas auch nur ansatzweise legalem an.

Wenn die Firma wirklich so groß/Sicherheitskritisch ist, dass eine solche Überwachung wirklich nötig ist, dann hat ist sie auch eine ADS. Daher auch GPO und damit ist auch das setzen eines Proxys kein Problem.

Hört sich vielleicht so an, ist aber nicht so schlimm: Der Benutzer bekommt einen Proxy und wenn er z.B.: eine Downloadgenemigung hat muss er auf einen anderen Proxy wechseln. Damit er aber nicht immer auf diesen bleibt wird es nach einer definierten Zeit zurückgestellt!
Diese Einstellung gibt aber nicht mehr und GPP's werden nicht so behandelt wie GPO's. Ergo habe ich einen Weg gesucht das diese Funktion wieder vorhanden ist!

Die Überwachung beziegt sich auf die korrekten Einstellungen des Proxys bzw. auch um Feststellung ist der Client überhaupt im Firmennetz. Wenn nicht, darf er aus Sicherheitsgründen z.B.: WPAD nicht verwenden, denn damit kann ich ganz leicht den Client übernehmen!WPAD-> präparierten Proxy -> Weiterleitung auf eine böse Webseite und schon ist Dein Notebook verschlüsselt (Ramsomware).

Mein Ziel ist es mit dem Tool einerseites die Sicherheitsvorschriften einzuhalten und andereseits den Benutzer ein einfaches Werkzeug zu geben mit dem er mit einem Klick den Proxy wechseln kann.
Daher ist ein "aufpoppen" eines neuen IE-Fenster keine schöne Lösung!

Ich werde mir den Tipp von Alpines ansehen, vielleich lößt das mein kleines Problem!

lg
Racer

Racer

Scheinbar gibt es da unterschiede ob die beim IE klicke oder durch AutoIT das ganze versuche zu steuern!

Mein Test:
IE gestartet - OK
Proxy mit meinen Tool verändert - wird eingetragen, ist aber nicht aktiv (mit TCPView überprüft welchen Proxy er ansteuert)
Neuen IE über AutoIT gestartet - Einstellungen werden übernommen ABER:

* Das neue Fenster lässt sich weder versteckt noch minimiert starten
* die PID die von AutoIT zurückgeliefert wird ist nicht dieselbe wie das neue Fenster dann hat

Das ist nicht wirklich einen Benutzer zumutbar!

Hat keiner eine andere Idee?

lg
Racer

Racer

Zitat von gmmg

Racer: also bei mir haben sich nach senden von <strg>+<n> auch die anderen IE Browserfenster geändert. (IE11)
Hast du das mal Probiert? Das senden geht auch per Autoit und muss nicht händisch gemacht werden. Danch kannst du automatisch das geöffnete Fenster wieder schließen.

Gruß gmmg

Ich werde das mal checken ob ich das so umsetzten kann ohne dass das neue Fenster sichtbar aufgeht....

ich werde berichten....

lg
Racer

Racer

Hallo Alpines!

Da ich die Software nicht privat sondern beruflich benötige und hier ganz spezielle Anforderungen gestellt sind ist es besser so etwas selber zu schreiben. Mein Tool macht auch noch ein bißchen mehr als "nur" die Proxyeinstellungen zu änderen, sondern überwacht auch alles, kann GPP's in einen Zeitinterval selbstständig abrufen,...

Abgesehen davon mach sich solche Tools wirklich gerne
Ich würde ja das auch gerne hier veröffentlichen, nur dasf ich das nicht (Software gehört der Firma)!

Aber wie schon in meinen ersten Post geschrieben ist das Tool so gut wie fertig, mir fehlt eben nur die Möglichkeit die Einstellungen dem IE direkt einzuimpfen!

lg
Racer

Racer

Danke für Deine Antwort!

Nein, das hilft mir leider nicht weiter! Durch drücken von <strg>+<n> wird nur ein weiterer Prozess gestartet der wiederum die Einstellung aus der Registrierung ausliest und auch richtig einstellt!

Ich suche eine Möglichkeit den aktuellen offen Brower einen neuen Proxy "unterzujubeln"!

Das Ganze ist für den "Otto-Normal-User" - der schafft das nicht zu drücken

lg
Racer

Racer

Hallo AutoIt'ler!

Ich hoffe das Ihr mir bei meinen Problem helfen könnt. Ich schreibe an einen kleinen Tool das die Proxyeinstellungen im Internetexplorer auf bestimmte Werte setzt.
So weit - so gut! Das Auslesen ob ein Proxy gesetzt ist, wenn ja welcher oder ob WPAD eingestellt ist habe ich schon gelöst (HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections....)

Mein Problem ist aber jetzt das ich den IE immer schliessen muss um die neue Einstellung zu übernehmen. Schöner wäre das wenn ich dem Browser direkt sagen kann verwende jetzt ProxyXY ohne ihn neu starten zu müssen! Ähnlich als würde ich auf <Internetoptionen> -> <Verbindungen> -> <Laneinstellungen> klicken und dort meine Settings vornehmen!

Ich weiß das ist nicht direkt ein AutoIT Problem, aber hier gibt es so viele gute erfahrene Programmierer - vielleicht hat wer einen Tipp oder gar eine Lösung für mich!

Ach ja, das ganze läuft nur im Userprozess ohne Adminrechte!

lg
Racer

Racer

Echt cool!

Das hat jetzt auch mein Problem gelöst!

Danke!
Racer

Racer

Uhhh...ahhhh.....schei....

Ja, Du hast recht!

Manchmal ist man wirklich blind!

mit RegEnumVal funktionierts es!

Danke!

Racer

Hallo!

Ich stehe wieder mal an. Forumsuche brachte auch kein Ergebniss und ich habe nur mehr die Fragezeichen im Gesicht

folgends: Ich möchte aus der Registrierung Unterschlüssel auslesen. Dazu habe ich mir das Beispielscript in der Hilfe angesehen. Funkt auch so weit, aber leider nicht mit meinem Schlüssel:

AutoIt

$USF = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
for $i = 1 to 10
	$subkey = RegEnumKey ($USF, $i)
	ConsoleWrite ("Error: " & @error & "   Output: " & $subkey & @CRLF)
Next

Scheinbar macht das "User Shell Folder" hier Probleme, denn wenn ich den String kürze bekomme ich Ergebenisse!
Ich habe es schon mit einfachen Anführungszeichen probiert und mehrfache Anführungszeichen - bringt alles nichts! Auch Adminrechte, X64 Kennung hilft auch nicht!

Hat wer eine Idee dazu wie man das Problem "umschiffen" kann???

lg
Racer

Racer

Beispiel:

AutoIt

#include <MsgBoxConstants.au3>




local $ret
local $back
local $a


$back = FileOpenDialog("Dateien", @ScriptDir & "\", "Text (*.txt)", $FD_FILEMUSTEXIST + $FD_MULTISELECT )


if @error = 0 Then
	Do
		$a = $a + 1
		$ret = gettok ($back, "|" , $a)


		if $ret <> "" Then
			ConsoleWrite ($ret & @crlf)
		EndIf
	until $ret = ""
EndIf












;**********************************************
; Tokentrenner ohne Array !!
; Übergabe: Der String der untesucht wird
; Übergabe: Der String der den ersten String teilt
; Übergabe: Das wievielte Teil
; Ausgabe: Den gesuchten Token oder eine Leerstring (=Fehler)
;**********************************************
func gettok ($string, $teiler, $teilnummer)


local $neu , $tmp


$tmp = stringsplit ($string, $teiler, 1)
if $tmp[0] >= $teilnummer then
	$neu = $tmp[$teilnummer]
else
	$neu = ""
endif
return $neu
endfunc
;**********************************************

Alles anzeigen

lg
Racer

PS: warum Gettok? Weil ich von RB5 komme (das leider nicht mehr weiterentwickelt wird und lieb gewonnen Sachen man einfach nicht hergibt!

Racer

Einen schönen guten Abend @All!

Ich habe den Fehler gefunden...bin zwar dabei sicher 2 Jahre gealtertet, aber das Problem ist erledigt !

Zur Erklärung:

Ich habe vor dem Erstellen eines ListView ein Label erzeugt. Diese sind nicht besonders gut zu sehen, überhaupt wenn kein Text dort steht!
Als ich die GUI umgebaut habe so das man sie ziehen kann ist hier ein kleiner Fehler passiert: Das Label hat sich über das Listview "geschoben" und überdeckte dabei den oberen Teil der Spalten - ganz fies

Fehler:

AutoIt

$info_lable = GUICtrlCreateLabel("Info", 5, 0, 1000, 30)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
GUICtrlSetFont($info_lable, 12, 800, 0, "MS Sans Serif")
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($info_lable, 0x0000ff)

Richtig:

AutoIt

$info_lable = GUICtrlCreateLabel("Info", 5, 0, 1000, 30)
GUICtrlSetResizing($info_lable, $GUI_DOCKALL)
GUICtrlSetFont($info_lable, 12, 800, 0, "MS Sans Serif")
GUICtrlSetColor ($info_lable, 0x0000ff)

In Zeile 2 steckt das Geheimnis...

lg
Racer

Racer

Da kürzen nicht wirklich eine Alternative ist habe ich mein Script gezippt und hier angehängt!

Es werden ein Haufen includes verwendet die beim AutoiT dabei sind, der Rest ist im Zip-Archiv beigelegt!

#include <MPDF_UDF.au3> .... von mir Modifiziert da es Bug's gab (im Zip beigelegt)
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <GuiListView.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <array.au3>
#include <Misc.au3>
#include <Date.au3>

#include <Harald.au3> ...im Zip beigelegt
#include <kassenbuch_func.au3> ...im Zip beigelegt

Nachtrag: Mir ist aufgefallen das Problem kommt nur wenn ich die Höhe mit der Maus ändere...alles sehr seltsam

lg
Racer

Racer

Hallo Raupi!

Danke für die superschnelle Antwort!

Ein Beispiel ist etwas schwierig den das Programm hat fast 3000 Zeilen Code ohne Includes...
soll ich das hier alles posten?

Ein anders Programm das die GUI auch dynamisch hat (inkl. Listview,...) kommt der Fehler nicht!

lg
Racer

Racer

Hallo!

Ich habe ein etwas seltsams Problem: Nachdem ich entdeckt habe das man die GUI's auch dynamisch, sprich "ziehen", machen kann, habe ich ein großes Projekt von mir damit ausgestattet.

Das funktioniert auch so weit sehr gut nur wenn ich das Fenster höher ziehe als es ursprünglich defniert war kann ich teilweise die Bildlaufleiste von einem GUICtrlCreateListView nicht mehr benutzen. Auch die Spaltenbreite läßt sich nicht mehr verändern. Der Mauszeiger ändert auch sein Symbol nicht mehr .

Mache ich das Fenster wieder kleiner ist alles OK. Andere Button's, Eingabefelder, Kaleder,... sind nicht davon betroffen.

Meine Defnition sieht so aus:

AutoIt

$kassenbuch = GUICreate($titel, 820, 650, $x_pos, $y_pos,BitOR($GUI_SS_DEFAULT_GUI,$WS_SIZEBOX,$WS_MAXIMIZEBOX,$WS_THICKFRAME))
$menu_datei = GUICtrlCreateMenu("&Datei")
$menu_laden = GUICtrlCreateMenuItem("Laden", $menu_datei)
$menu_speichern = GUICtrlCreateMenuItem("Speichern", $menu_datei)
$menu_speichernals = GUICtrlCreateMenuItem("Speichern als", $menu_datei)
$menu_ende = GUICtrlCreateMenuItem("Ende", $menu_datei)
$menu_Vorschlag_gui = GUICtrlCreateMenu("&Vorschlag")
$menu_Vorschlag_ini_load = GUICtrlCreateMenuItem("Liste laden", $menu_Vorschlag_gui)
$menu_Vorschlag_ini_save = GUICtrlCreateMenuItem("Liste speichern", $menu_Vorschlag_gui)
$menu_Vorschlag_ini_kill = GUICtrlCreateMenuItem("Liste löschen", $menu_Vorschlag_gui)
$info = GUICtrlCreateMenu("&Info")
$info_about = GUICtrlCreateMenuItem("About", $info)
$kalender = GUICtrlCreateMonthCal($heute, 5, 460, 191, 164)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$info_lable = GUICtrlCreateLabel("Info", 5, 0, 1000, 30)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
GUICtrlSetFont($info_lable, 12, 800, 0, "MS Sans Serif")
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($info_lable, 0x0000ff)
$gruppe1 = GUICtrlCreateGroup("Eingabefeld", 200, 460, 615, 117)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Einnahme = GUICtrlCreateRadio("Einnahme", 210, 480, 97, 33)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_CHECKED)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$Ausgabe = GUICtrlCreateRadio("Ausgabe", 210, 510, 100, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
$feld1 = GUICtrlCreateInput ("", 320, 510, 180, 21)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$feld2 = GUICtrlCreateInput("", 520, 510, 60, 21)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$feld3 = GUICtrlCreateInput("", 590, 510, 60, 21)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$text_lable1 = GUICtrlCreateLabel("Kunde", 320, 490, 120, 19)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$text_lable2 = GUICtrlCreateLabel("Arbeit €", 520, 490, 120, 19)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$text_lable3 = GUICtrlCreateLabel("Verkauf €", 590, 490, 120, 19)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$text_lable4 = GUICtrlCreateLabel("Kategorie", 600, 490, 120, 19)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kategorie = GUICtrlCreateCombo("", 600, 510, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL,$CBS_SORT,$CBS_DROPDOWNLIST ))
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetData ($kategorie, "|" & $kategorie_daten)
GUICtrlCreateGroup($kategorie, -99, -99, 1, 1)
$gruppe2 = GUICtrlCreateGroup("Steuerung", 200, 570, 615, 55)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$enter = GUICtrlCreateButton("Eingabe", 215, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$clear = GUICtrlCreateButton("Löschen", 300, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$sort = GUICtrlCreateButton("Sortieren", 385, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
;Nach oben Button
$nachunten = GUICtrlCreateButton("â", 470, 590, 35, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetFont(-1, 14, 800, 0, "Wingdings")
;Nach unten Button
$nachoben = GUICtrlCreateButton("á", 505, 590, 35, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetFont(-1, 14, 800, 0, "Wingdings")
$Berichte = GUICtrlCreateButton("Bericht", 555, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$logview = GUICtrlCreateButton("Log-Buch", 645, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Kassa_suchen = GUICtrlCreateButton("Suche", 730, 590, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$vorschlag1 = GUICtrlCreateList("", 320, 535, 180, 44)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$vor_text1 = GUICtrlCreateLabel("F1", 300, 537, 15, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($vor_text1, 0x0077FF)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$vor_text2 = GUICtrlCreateLabel("F2", 300, 551, 15, 20)
GUICtrlSetColor ($vor_text2, 0x0077FF)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$vor_text3 = GUICtrlCreateLabel("Vorschläge", 220, 537, 55, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$last_wert1_1 = GUICtrlCreateLabel("", 530, 537, 40, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($last_wert1_1, 0x0077FF)
$last_wert1_2 = GUICtrlCreateLabel("", 600, 537, 40, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($last_wert1_2, 0x0077FF)
$last_wert2_1 = GUICtrlCreateLabel("", 530, 551, 40, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($last_wert2_1, 0x0077FF)
$last_wert2_2 = GUICtrlCreateLabel("", 600, 551, 40, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($last_wert2_2, 0x0077FF)
GUICtrlSetColor ($vor_text3, 0x0077FF)
$vor_text4 = GUICtrlCreateLabel("", 240, 552, 50, 22)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($vor_text4, 0x0077FF)
GUICtrlSetFont($vor_text4, 10, 800, 0, "MS Sans Serif")
$gruppe3 = GUICtrlCreateGroup("Anzeige", 5, 32, 810, 430)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
$ListView1 = GUICtrlCreateListView("Datum EN|Datum DE|E/A|Text|WERT1|WERT2|Kategorie|B/kB", 10, 56, 800, 400)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
_GUICtrlListView_SetColumn($ListView1, 0, "Datum EN", 0, 0)
_GUICtrlListView_SetColumn($ListView1, 1, "Datum DE", 70, 0)
_GUICtrlListView_SetColumn($ListView1, 2, "E/A", 40, 0)
_GUICtrlListView_SetColumn($ListView1, 3, "Text", 280, 0)
_GUICtrlListView_SetColumn($ListView1, 4, "Wert1", 60, 0)
_GUICtrlListView_SetColumn($ListView1, 5, "Wert2", 60, 0)
_GUICtrlListView_SetColumn($ListView1, 6, "Kategorie", 120, 0)
_GUICtrlListView_SetColumn($ListView1, 7, "B/kB", 40, 0)
$contextmenu  = GUICtrlCreateContextMenu ($ListView1)
$bearbeiten = GUICtrlCreateMenuitem ("bearbeiten", $contextmenu)
$loeschen = GUICtrlCreateMenuitem ("löschen", $contextmenu)
$belegflag = GUICtrlCreateMenuitem ("Beleg/kein Beleg", $contextmenu)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
;Eigenes Fenster für Runtime Log (wird nicht in einer Datei aufgezeichnet)
$logview_fenster = GUICreate("logviewer", 500, 300, 10, 10, BitOR($ES_READONLY,$ES_WANTRETURN))
$logvier_edit = _GUICtrlRichEdit_Create($logview_fenster, "", 0, 0, 495, 280, BitOR($ES_MULTILINE, $WS_VSCROLL, $ES_AUTOVSCROLL))
GUISetState($GUI_HIDE, $logview_fenster)
;Suchefenster
$Kassenbuch_suche = GUICreate("Kassenbuch-Suche", 800, 650, $x_pos, $y_pos, BitOR($WS_SIZEBOX,$ES_READONLY,$ES_WANTRETURN,$GUI_SS_DEFAULT_GUI))
;$Kassenbuch_suche = GUICreate("Kassenbuch-Suche", 800, 650, $x_pos, $y_pos, BitOR($WS_SIZEBOX,$WS_THICKFRAME,$WS_SYSMENU,$WS_POPUP))
$Kassenbuch_List = GUICtrlCreateListView("Datum EN|Datum DE|E/A|Text|WERT1|WERT2|Kategorie|B/kB", 10, 10, 775, 500)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKRIGHT+$GUI_DOCKTOP+$GUI_DOCKBOTTOM)
_GUICtrlListView_SetColumn($Kassenbuch_List, 0, "Datum EN", 0, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 1, "Datum DE", 70, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 2, "E/A", 40, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 3, "Text", 250, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 4, "Wert1", 60, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 5, "Wert2", 60, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 6, "Kategorie", 120, 0)
_GUICtrlListView_SetColumn($Kassenbuch_List, 7, "B/kB", 40, 0)
$Kassenbuch_gruppe1 = GUICtrlCreateGroup("Textsuche", 10, 515, 775, 100)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Kassenbuch_lable = GUICtrlCreateLabel("Suchtext bitte hier eingeben:", 30, 533, 150, 20)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($Kassenbuch_lable, 0x0077FF)
$Kassenbuch_Eingabe = GUICtrlCreateInput ("", 30, 550, 180, 21)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_button_suche = GUICtrlCreateButton("Suche", 30, 580, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_sauber = GUICtrlCreateButton("Löschen", 130, 580, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_uebernehmen = GUICtrlCreateButton("Übernehmen", 230, 580, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_datum_reset = GUICtrlCreateButton("Datum Reset", 330, 580, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_button_exit = GUICtrlCreateButton("schliessen", 700, 580, 80, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_datum_von_text = GUICtrlCreateLabel ("Anfangsdatum", 330, 533, 75, 18)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($kassenbuch_datum_von_text, 0x0077FF)
$kassenbuch_datum_von_gui = GUICtrlCreateDate("", 330, 550, 75, 20, 0)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$kassenbuch_datum_bis_text = GUICtrlCreateLabel ("Endedatum", 420, 533, 75, 18)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetColor ($kassenbuch_datum_bis_text, 0x0077FF)
$kassenbuch_datum_bis_gui = GUICtrlCreateDate("", 420, 550, 75, 20, 0)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Kassenbuch_gruppe2 = GUICtrlCreateGroup("Filter: Datum", 320, 515, 190, 100)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Kassenbuch_ein = GUICtrlCreateRadio("Einnahme", 520, 530, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_UNCHECKED)
$Kassenbuch_aus = GUICtrlCreateRadio("Ausgabe", 520, 555, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_UNCHECKED)
$Kassenbuch_alles = GUICtrlCreateRadio("Beides", 520, 580, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_CHECKED)
$Kassenbuch_gruppe3 = GUICtrlCreateGroup("Ein/Ausgabe", 510, 515, 85, 100)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
$Kassenbuch_beleg_ok = GUICtrlCreateRadio("Beleg", 610, 530, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_UNCHECKED)
$Kassenbuch_beleg_kein  =  GUICtrlCreateRadio("kein Beleg", 610, 555, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_UNCHECKED)
$Kassenbuch_beleg_beides = GUICtrlCreateRadio("Beides", 610, 580, 70, 25)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUICtrlSetState(-1, $GUI_CHECKED)
$Kassenbuch_gruppe4 = GUICtrlCreateGroup("Filter: Beleg", 595, 515, 100, 100)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT+$GUI_DOCKWIDTH+$GUI_DOCKHEIGHT+$GUI_DOCKBOTTOM)
GUISetState($GUI_HIDE, $Kassenbuch_suche)

Alles anzeigen

Das ist nur ein Auszug...

Mache ich da etwas falsch beim definieren von dem GUICtrlSetResizing ???

Das Problem kommt unter AutoIT 3.3.14.0 als auch unter 3.3.15.0 sowohl unter Windows 7 SP1 x64 und Win10 x64

Bitte um Unterstützung

lg
Racer

Racer

Danke Jungs!

Bioshade hatte den richten Hinweiß: Ich habe auf die akutelle Version 3.6.0 upgedatet und das Problem ist behoben!

Da ich nur die portable Version von AutoIt verwende habe ich das Problem nachgestellt: Wenn vor dem Compileren (CTRL+F7) Einstellungen getroffen werden (z.B: Unter Resource Update -> Fileversion) wird das ja am Anfang ins Script geschieben:

#AutoIt3Wrapper_Res_Fileversion=1.0.3.3

Hier hat scheibar hat die Version 3.5.3 eine Schwäche so das die Umlaute "falsch" dagestellt werden.

Darauf hätte ich auch selbst kommen können

lg
Racer

Racer

Hallo!

Ich habe ein etwas ärgerliches Problem mit den Umlauten. Vielleicht hat wer einen Tipp oder gar eine Lösung für mein kleines Problem.

Ich verwende den SciTe4Autoit3 Editor (Version 3.5.4) mit AutoIt 3.3.15 das soweit recht gut funktioniert!
Zuerst ist es mir gar icht aufgefallen, aber immer wenn ich ein Script compiliere (CRTL + F7), egal ob über den Shortcut oder per Menu, werden alle Umlaute und ? im Script verändert so das der Text nicht mehr richtig lesbar ist.
Starte ich das Script mit F5 - kein Problem, compiliere ich es passt auch die EXE, nur im Editor sind dann alle Umlaute weg, auch in den Bemerkungen...
Dummerweise schreibt er wieder Umlaute rein und die Wurst wird dann immer Länger bis ich es dann nicht mehr lesen kann

Sieht ungefähr so aus

[Blockierte Grafik: data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAwQAAACeCAIAAAADjFoNAAAgAElEQVR4nO2dzW7jSpKF+UAsLuZpWOJqnsB6BBElczUQeikYRC85BUIwjHGvtOyFIaNgCb3o99BCQEMXVfYsyMyMyIykSP3YEnmMDw2bovJP6punIoNxgu12+/Hx4f3f3R4AAAD4bJZJWG5WZRRMonR9tmZXZRQv90UeBJOkaL55nYWToLo5Xn71aoALEzQpoe32y8cHAAAA9Ip1Fs6y1ZcPAxCCbpGhn+9B8BEE7wcEdUdWPz6C4CP49t7yy/HykM1fv37tAACgn6yzcBI4IZlNOguCSRCWm8uPYRFPgmDiid8sk4AOrx6thl/PF868guCwFqkn6yyCHtjB2FJ955FRpWVy/HsPT0qcmjQFunpXw6pMzhgsrDgmMlR8P7MY2u72293v9HsrMfR4P6p/xvnLMR09T++fv/aDBACA60fectZZ/BliqB5AnLtjWMSulFkmWt8Uea1RVmUk6pUiT+L80BmZajbOE6JIFvEkSteLtNwUZbvQzjI5WtBcYstn+maZBM1a5xM/604ULT++LnSMDFXjsMXQ7/TbRxB8BMFH+OO3+SB/1BeD7+9a6BTf9cU/W6uRNmLoKbt7eLMuvjyMR6PR3cOb/qW6Lsimp2xEf6CKAADDYpPOWFxkVUa+OIe85di7Owk2UI1SB28aI0nrLJwE4SwKJkFYZrHVwjoL84UgJgR5sYhnUZgvtsssXW/SvGpkEYuRlToVqY3OWMSzbEUFQTWkdZYudS90slGcR1Y4x+7IimnxpaheCnOi6qr75c9LN7JJZ0GcqwU/EMtZpObjMMKoyJ1wlxVvq+6sPrJyo99STbYaVbxUE8wX9cU84RG+KloWpWvdPlWudryqyOs/q1dpv+IiCN/D1pwhMlR8/4h/Or//fNdyZ/XDHIGtfv5ZqYv6Xdvdvq0Yes2njhiqrt8pcfN4nz3uuGx6yojuQWQIADBYFrFvv1xm9qFYLmwq1u5e5SOrFhKle0jwpjk0Ukd0qogLa7yWYjw4oTdCKrBWZZIunXM9OeyhJtUiYKMGw0Mps2y1TOLlJi3VRZMAtIjbCUr74joLqQSpuyOyVY/WvGovslIAm3TWGDVZZ+lyr9uvmzUfHO9CXCVykU1kmaVlNQw9hvpjpd8T+hGb333z2u1XZZaWUZAvyHXhm+n5Hnbg9MjQn5jFeOo/fUdpJlwUHCWGaLyHahpHJFVRIvKTPdYvQQwBAEBFQwaMnC/CN3L6dhaWoGGDBizBYRrX+xnbJt0B7GlqzsHTE7NlHtwvTb9sb1axChNfoZ2uyowPQBSU9kXPsBfpTLWmdCoPitCwiu5XlrAGErGLiSpizar5ivEzcpH1tSojOyRjhJd5V/3LMgnLhRaUvnnVL9nfQ/eb6f0etuf0yFAXMfTrPdQ3/3w/Qgw93o916nQdAaoQxJAvyRpiCAAA9vQf7tsdCXVUyPkifK8lu51Etcs2CRQe/tGN8+2ZbWz2Zq831xapOWzLbBZDbHueWT1mBY2vkPE4iUSioLQuepKUyYyU1nE+I6HfAynPWpQUuV4BenAmfTrei6wv4WYSaySJXEm6rs/1jBrzzEvWdu4388D3sBVnyBlif2qJ8/Pd5A/9eg+rB9DMxd/pt2MiQyYsRHKDtjvp+Ow1v5NFjxZDb/PxGE+lAQAGg6VOzGa2KiNbHMjyonEjrzc/elJz4NSm3sXrvurW2JGHvR3KAzDhCvuwj/SV00wd2o4j2njcyNrmizJbSdu8kNktC0prClQKbNJZxCIofAWssJwSMezMrjnlmY22nrJP4Jrr5OvBDg39H1P1LiFetSqTOI/CGQsjeeblrpXVr56C+D3sRqfIkEmUZudcv95DfZE8Hm9ypc2j+KaF+Pt7EHykv/bb3Z84YM2mvw4MmsaHtlwhkeMwflJGHj3T90+fOq8XAADcKKs694JfIcGSao+xzizqXZAcr/CTlMi5yAIwDQGbuqN8oSorum9UV0TRVg8pidmAZe2lJkVTd+nUeLKReVXFqMzOvUnLBTsOo4nGZJzuqY19UVpDmo8cTJJCD4DkL/PcYVLvQC6IoLGLBRS5yUnyHlHZwTnrTC0pPN+i+mKdQmRWu/oSrpYJi+UI8/IlSrNkc5J+5H4Pu3FMZOjLscQQAACAQ0hPpN8O9W53gbI3HQpM1892JbF8/HelVXlAG1CBGgAAwFBxErS7Ij4TDm6Om4wMAQAAAACcC0SGAAAAADBoEBkCAAAAwKBBZAgAAMAlMA+KH+agTxYAl6RfrvWv+Z1Vf+hknCfXnqe+x/K9lY0AAOAq4f5TB00MTrUOVQ/DH7+DnOB7CkADvXOt95mXGc5RgfopO6FG0dv8Xho5AAB8Oqy436FAzlncwk9p5DJG7gD0wrV+u3ub1+UVx/MnI4YEFzOfa725TuJA9UWpppEthtQALJlV2ceORqNRNq3MQ8wVrufIdZSCBABcDNu1nnttJk6JRctC3C2CJ7qF18USpVCT66cRieEi0p0x+3SL+/E7z6DVwDDpg2v9470WEM9Tckz28vRcSY2XhzFRGG5k6HlqgkzPU1LDeus7kpMjQ3bLxj3tNb8zzbqRobf5mLwKkxAAwKWwXOu5NHEPoZjrU0e38FaGHp6WSVNUrkkGWB7HdQC60APXei5BSOiI2nE0iSErWsNjM6eIIRqIIve7YqjOQ9I/5017AgAAD0yaqEMoarng8/NSV/xu4fKRViu7Lt2yJX1cNeZ1XAegEz1wrfeIIZrOzLSLIIYa0oxOEkP0JRN8ksQQMq8BAJ8PkyaV1NikM3ICVTILz05u4XJukBgu8tmLVvndRicJmsnnuA5AJ/rgWk8U0tt8rK6bENHbfCxGhvSBFD2lsjlBDPHTN0kM6QM+uK0BAC6PYM8eL81L8XLPoi/W4+4d3cJFMdQqXERPu/jvsfZpnymbUtlxHYBu9MG1nh4zTR/yu/pMSmdVj6b3Gc2DFlzr2UlZfScVXlp70aM3c1RnH7SpkJXTZoVuhByHsZMy5FADAM6O7VrPn6unqT+Ca/2utVs4b9YyV7e640nZKgjkMVGnp3Ke0SKBGhzJTVagRhwFAAA6ctuu9QBcFFSgBgAAAMCgucnIEAAAAADAuUBkCAAAAACDBpEhAAAAAAwaRIYAAAAIrMrooHXrV6Af7D9MkQdfbOxqlSe4QT5zDb/w8+qXaz3lAg72293e51pfP4d/dO3E+uF82QcNBakBABeho2t9W/jD+Qe3txP9X+vH+094Vu5c/q+rMuI1uwfEV3joWt4yzWzSWdPXrHeu9RS5tPTlXOtPbbmVyPOCMtYAgM50cq1vD9E3BwM5guVZd05q5EQ1dqGmbouvmbivdrkDM9GT6IdrPSm6SDWKEkMmbCO51r88jFVIpmqHuqt6qiC2E0OkQqO3wjW/PxOLSdpT1rMYZ9OqmLU0L3anGHMCAAyOVq71dS1EO9ZCnMgO/HOcSRO9D5EKjbpTqxgjlVBOXyqO1cL/VTVrj5N2V/fFCz9GRBq29jtTkbCw3GgDEzVZSyK0X0MyMD2AdRZOkjh3Q251s2GeEAMTsS9mJ2d8V3L3I/CtodCXZw2lj0nfUH+aVXdyX0Ve31wtZmjqj6uhtqw53uzgW42kB671293b45N23iCyw4ghqkWECApRIbqFRif5NmKImqO95ncH41i+yJA9ZWJt9pSNqOOHPS/uB9JOkAEAek1713rbCKzIWeHpxn9ni/6vBGbcIfjYN/TVwf/VuUiaohMXokqsU6URZdZZqMRKkUdhyTUZb7nLGtLBZIVpQWkCs8GbkB7NuZH7UmvClpFO0NIN9hrKfbWPzNF+7Y9S+hBXZZbWldPrqqGm33UWz1qdzdGhsprpWikukx641u+p8waLwbzm04dn41ZW01IMNTrJtxFDVrSmRWymnRiiASfapmBAy01C4PIBALDwqxbXL4xvIc36gL5XBZ9oTILESyT/14a+Ovi/uherlt2Ilyf4YfuESLDx2BEI3nLHNTQ3z4huKx2nNjpNHSlp7ouN03ZKYetjraHYl7yGMvV3bJmE5SIt+VukD7HIg8Avzqjg83M4435VJj1wrd+/PIz1Ns+CQJUasEMyrcVQQwpOOzHUVXy0FEP0JRN8ksSQ940AALATXevVS/YumHVIJxIiTIuYnkDRXdDdApv6kiMQYrjIm9K7TCzPNVeNtTZ8tZ1iLQXJ/my/hussJCeGqWmE/K7Wjcd4VBdNfVnigLZ/YA3lvsQ1bGpwk86COLc/d+nzcj5u/m1plajElJ8jcydRut4X+RkiQ9fkWv+a39mRobftUzayzORt13ojp14exjq21OSA1tm1vhWtxJB1+iaIIT0vfmgIABg6bVzr3Zf2252929GDGxeyq2kNZCIH1hP75mZ93tTUlyyGxE3R3lzpYRD/Xc1UqwQe52gWZzrrfJnY+UyN2qhpDcmd7DSKqDQzO/JJmUiJty89YO1VZ+u5tOFQUuxLXkPvdyPOo3AWuZlYkhhyAk6mVIGd/ealRXWDosx64VpvzoOy6b0KBelH6+vjqnau9ff5fKyDSYKTfBfXeuukrEmXUJFndJ510EbmJbbZNK9253QAgB7TzrXePjQJya7c5tiIP1fv8beXbecTmhnTaGWvb7b+oa+2ef6vfyd9m2+iZh08o23ecfXbZ1lRRlV3PKHYLFfbNRRTkuuOTEJxoNWMkxXu6YuvjB4AW1txYcWvBz8fPJw9bb6Eq2XCjtikvnxJ2YXJH1/EBz+d3aHsad3gLVaghms9AAB0BK71/eczn2+/nSICrb75qEANAAAA3CwkwnfxiuGf2df5aJNnfZORoZvFfkIND3kBAAAAXw4iQwAAAAAYNIgMAQAAAGDQIDIEAADgRDo4yfeVDo7rpGg1uBL661rfhFMBqH6IvU1VHtm1fruzqv4AAEAPoc+cN6TQepzk29Yp9iJWmm4LrxrQwnHshL72+onx4xtpXckQnE5PXOtPlkdVy61LFHavLk0g5mIAAHBLdIoAOQUST97dvUWlW0IGYNV+PH9fFacoqlPVGOhAD1zrqTHZSCyuSGVTfVGqDX2CGFJj8LqDZdOqcas8ox4GuY6HywAAF8Op21sX3IviPDJhDFKFz+NwaSodt3WSt9yyHC96GmpaqeqF9UjyhTOAZsd1D5ZPSL0OpuifNYB2ffnc3at27ArOYmVC2p37EXgG1saWC7SlH671UmSIyibbkUOOzZwcGbLdwUyDzCfE7Z36ZhiTEAAAODfctd4kr9CQDy1St0lnon0Ho62TvPB21j53eMjSMglm2YrcIxT6a3BcPzBO98yOmaZ168sT9BIrE9oXSVNNpu52p6iieU764VoviCHbN4PlA32SGKJ+GuR+t3e7/pAT/QIAgPNDd2VtX2UFRVgEwuPS1dJJXtjdbZMNHoiyN3vXmKzRcb15nEq+eLKgOvYly0TRSc3Xsh3pcVfVdvkYfNL6GemDa/1WFkMNWUSfJYboS+ZgThJDyLwGAHw2bFcuyvp3/YuLJ42mrZO8u7s3mJVKAsuN5TQ5rjePsxoe82tjUq9bX56VERPGfVnkltOWpJnK09LPgZ8+uNZvqfTRJ2JNz3Z9jhiiAkgWQ4/3dcQIbmsAgMtju9YTwWHOXPi+fujkqLqnlZO8uc0kL/OACtFhUpvmKEpbrzc5rjsYFaI1EJkszw3v2Ffbg0I+DGvl7d+JvavyLqVL2kkIggP0wrV+RxKQ2SNm5KRMMqJX2dZWCnZTCnMX13raFxuwboToOTYw5FADAM6O7Vq/40nNNBnFPbfi51nixUYn+f2WnvKYvtjZU+icW/HUbNOyZHrffGzED7k8kw2oFmnVl+y4bh81SgngdV8srzxiMlQNmCUqyTeDU7nJCtSIowAAQEea821PrgAEwC2DCtQAADBQ8Jw2ABU3GRm6PPbBGR7yAgAAAPoKIkMAAAAAGDSIDAEAAABg0CAyBAAAoJ90cJK/UvSD/beAKWh+VbRaw/641pOH3km5IKfaUH2b5E0GAAADw34y/LCXu0t3P9FVGZ0rZdspynw56cCdTK6TdRayOto30hf3rTvY5nk8dDk9ca3nVQ0PcpJvfGNt64v3DgAAZ6P2ulLlBA95e4kctzN56jceAy2Z3VDS+izLJRqQXRef6XV/vr7It+hwIOeMXx5ND1zrmQUYqVjocZKvXrLkiGnBNr2fPplfnKfM7JuZRKvaHOcv6l3TJ79rPQAAfAaWa/2mWG5IkaHqT9G1vq4BGC/Vv+MbneRlVLNhuTEKprVrvXdG5WKrNshiuaCj5W/cpLMgztXU3MKPeUIMMUiRxpkZalxuVCwqIo6qboUCX18O9fSTQq+Psc51wyTassOyM1MRvlm28vjH2Z++WtgiD4JJFM6CYJKketmbvkJSX/Una4kYaQ09MH2jDXHJd0OPiscC2YL7KmfaoSbp690T13p/ZEi0/bLEEPfNoKdsT5l6ot68RYgMUYmm/UDI7y8P40ajVgAA+Byksx474OFzrVeayfLQaPnPdJJQUuRRWC6c9g+71ntnJG63biBnmRCtU7ep84qMSchuvyojWnham4eQnVWtks9JXupLhC6gvZhC6GWTllk6q5ViWG5YKGWZhLPm2Biprlk3vqlaUwXKm8tvNvVlDV5eQ1+z1OpEmDX1HhGsWpr6sluTv949ca0/SQzZZhrEDUPyIJNMYa2qRNRBduwMFWIIAHBN2DZbXtf6VRmFM8tMXjYmc7Ec40Olq3hfza718uDjciNv4c6eSg7RzMkgEUx6x3VSqVQYjO6ydSzK4yQv9NW4Mqsyipe23Zh0BLmIreANm+YB4UXnqxqvl67+s/kosKkva5ryGnpgH5+eNV1b5srieOg29GWtoe/r3RPX+hPFkCfa1F4MebOIXh7G0/sMYggAcL143VKFO4WDm1ZpRrbLaVzbkHVyrT80eL6Ru0qCTE2KcmlR6DF8tXxS4yrdyuMkL/TVNNNFPIni3BmwuwiOWLGNdZu1KZlv3bhqsP6zMQ2osS8+zQOmuQ2TqpstcnpsmhXyzYf7stbQ9/XuiWv9acdkb/Oxx6++WQzpEzHnmTUzWnVMRvSQ4FoPAACXx3atr3D+6exxrVfnXOx5dcHd3dd1RPNLtNVrB9d6CTbaA2KIzSVWWSmxcDTG9/U6M4ZO0PzucZKX+vJQ5EmcR+FMiJ0IYkgId0UhDWgdFl58jrWSqBe8OR2+sS9L84lr6MFMqj6zY0O1ntg3Ny9ibZfr78s5vBO/3t1yhq7Utd46parlxWEneZIBzW6WrOzH0rEaucjGMM5f2DP8dVNavUmu9QAAcFkE13p6StXkWk/TdatXndTdg4m3Ohl2lhUmUbeTa72Nc0RV3Sw6ydcdheVGjSRyzmLEnGiSsFxlWFujEpzkvX35ZhGWm6JMirXYprXybpqwXsMoXZrcdu93gK5MqYdXi5tVGblymSD0ZR88qYE5a3joi9G0sGRS5nrD5+VbQ//X+xYrUMO1HgAAOtLsWg8uUr0G3AqoQA0AAGCwkDjBlRdUBJfkJiNDAAAAAADnApEhAAAAAAwaRIYAAADYFHmUrq1y1adTVaZpZ/K1TIJJNYbbcSo9mqrwEn3O7iwsk7DctHOCW8SToLr5k6zNrgxEhgAAAABwIfQD8FdNf1zrAQAAHAV92JiYZHniN+oxZrXD2VWk2fWQFf6J6CP07Yak99Gzh6k05El4cr1+5P4zsqrJ8+pu/EY9Ik6K64g1u90iUu4aetH1BXhcihY+aI4tyWvYlnUWHv3eM9ET13rIIwAAOA7PycgmzZPYrXwoOduTCkamWGKRi9plEedJu6LV+1WZkKLMi8JxqzgncmnElvW1z8EyiXPJicy111hnoTH9UOuzzkLpiI2v4aEVyBNWCXoWxMtNWi4aCoW3WMPW0z/j+WB3euBaLznJv+Z3o9H0PhuNRtOnqtBi9ljdOc7nSk6h+jMAYGBY8RUeZmCOTlG8FCogC8V41lk4i+JysyqzgtQ1DqVYQp2K1Ka6tEqjIW5lvOuq0PBalxms5nLAmct1QVetSZuxs7uTCo3cau3w8/mV4XwUToIgz4QozixbSUYTjrzYpLMozLPVOkvJB1TkUtfOGjZ+MZKCib+qMNUiLTe2D0kV3ssTu8Cj1ZEd07JbCCZROCOqrqri6FnYS8eNeuJaLzrJq+rP4/mrNtZ4npq6z+qlS64vAABcE27ysihNuHmnvnMmKIkiT4r6pMxsY3K0ybLBaoQ7Z/GDpKo7IunSMosnUbrm7uWN69DCEtXZ3akduomQkeBNc2ikjuhstOe8o/Msv9JIEFjLJF7WYoJ5l0oq0HIfa0I72OsvQzXadRaXG2aTYnxIbJUjrqFzcRHTYtAzEkecWKNlUbEiv2wefU9c60UxNH3aGyMwI4aIDVmDRSsAAAwCwWpUbzyOtnCUk7GbOBjvMXvb4Y1Nyw7rVE7JoJTabXqiUC4eF/TqJUFM+LSg6DtxOHTBBQc74arnaFcJF+zVVGrO4XrZvjUU0P0y/bGqXVPIN0T0tW1cw0ZrMPq9Um4kulk7F+2sz9k59MS1voMYGrfzqwcAgEHgpMX4vKKkm6utrpWRBdvbWmXjsrhILYOS2LxkMrXbbJNeF/SqR0nJeUxYve03z8sK/7ATLo+Hly0vqpm2Ss2R1tA7MGouZvWYpWszcfZB296r4hpaFz2Kmc5INds2UelM9MS1XnCS90aGTKoQ0q4BAENCcq23d1aesWu96vlT79n+DYzHPJh8qZJpzKs8HKXiKMvFarff7hbF0o5JtPQU87qgV2MQ5ELjRq7GQKNczRGvenH0wV/VGj16s9WPZwB69ZzYDOlLWEPVBRdtPG5kLeaqzAraC/ngnMm2WcM9OXEjB22sWVnj0jdegj641m93jpN8/ed4/vo2H49G98/bp2w0Gs9fn6fjbDoWDtoAAKDfOK71PHigvdmdB+zJRhWQNJfICdX4Hn1XCbOz6ngoosEhyyZdRymY/zwd9poYs/uMzUXEm62zGNnwXCwiUF1ka9hwUqaWK1vVlRXdN6oreg2XiWPVHsU5jeLI2qtpDa2HzvRM62CVHRwqymzFIkB02J7aCrNasQWH1rBervpKlK7VAMyZXau1PQs3WYH6BNd6fkwGAABD4STX+mqXusCGNIwC012xM8TPRocC07VOSmLP8V+bLPgbYlAVqM1D+HioHgAAvh5+SAQuzEmCeLv71GfdP5mbjAwBAAAAAJyLQUWGAAAAAABsEBkCAABw09Tlm8/sb9XBSX6TzoKguvnT7DvAWUFkCAAAgECHZFsAbpz+uNa/PIyRFg0AAMexKqNDtRCvFI/jeoUy0lKqjlU4JE/jOyUTG53khaVrlVNsTCfEKSCq9HX0xLUeAADAidzww9K247qekStllDXYjtaQXMSilJGd5EUWcZ60sLhvMC0RixaCT6IHrvWm4iIiQwAA0IjlWm+K4IXEj5PXvttv7UqJtI4fqYyn7/c5yYvu7h2e1tZu51YcyHVcV/c78mJVRuEsSdebtDR27qsykor6eJzkJYrccWdbJmGZVcW1U+MEsojzhVy0yemIBLG0SNXVuqtlv8lI3nXSE9f67U4bbgAAAPDBXeuJMUWRRyFzbHVtyMjWS2RETLwayAbvOsmL7u5dnMnVu2z/DddxfUcqHTOVY7QIOZOSCz+KTvLNA7O8zGp79mViycRQuNlxWKOLyRwzNmmZad97JHWdi5641m93EEMAANANth9b3uZuRMTs1rp2HwvVOPEeW2EI7u5HOJPbHuyy4zofMBtA0Cbe43eSdzD9yj5l1M5imWnFaZltcYXHnVKYpFvEF/ZvHyY9ca3f7iCGAACgE7bzaMxlirPjart1tc37jUIbnORpqnJ3Z/JFzBOQGxzXHQPXavwNWTvWIJsN18xMBbOwZRLkiVaKJH1bj3CTllbgjUWVUp9Wa3dsB7rSE9f67Q5iCAAAmrFc68nxkFtNR1IzRZ6k7Hl7foREQiCuk7wnatLJmVwPWEVrGh3XrXMo59jLliN07j4n+Up7kTHzuJFfAtY95ua8jGsaj0G9uln0jQdnpA+u9S8P4xH9gRc9AAA4OK71JHl5lhX1Nm8f0NinWrwFFpgRLd+18pAdyNs7k/MjuXxxwHGdpEPpXsI8CX1To3P0OslbD52pIc2ylZ1j7qKaIiOPl85yyVbw1UW+AhewcR0yN1mB+gTXegAAGCYnm3TeCspu/fxlAlBgur+gAjUAAABwECdBG/SIm4wMAQAAAACcC0SGAAAAADBoEBkCAABw08C1HpwKIkMAAAAE4FoPhkN/XOsBAAAcDVzr4Vo/ZOBaDwAAYL+Faz1c6wdML1zrd89TJZBQhBoAAPzAtR6u9UCgH671b49P1cW3+ZgblgEAADDAtR6u9UCgH671b3NjyAExBAAArYBrfYte4Fo/CPrgWv/yMNanY7aVPQAAABm41nuBa/3Q6INrvVFIr/kdIkMAACAD13o6ZrjWA0MfXOu3r/mdOiOb3uMpMwAAEIBrPVzrgY+brEAN13oAAOgIXOtPBgWm+wsqUAMAAAAHgWt9n7nJyBAAAAAAwLlAZAgAAAAAgwaRIQAAAF9JVZXR59t1LKosdRvPr2USTKJ0LVdfBEMAkSEAAAAADFoL9su1/jW/I/WHzsKVPbn2Nh/LtQNeHsYwrwUA3B7k8X53C1DPq4sPnNvX6aPy7Z3kySPrh+JSbjUmNir77ec3vuXP4R+cmlvtCfjonWu9bF5GeZ4aH49b5G1+71M8DS8BAMD1UuRJ7EoH23ljv2XVkkxlwiIXtVRLJ/mq2STOD0uHBnnhSJ9Wpa67QgZwOJBzfjXWX/rhWq+9ycbzJyOGBBezp2xEf4TrJA5UX2wVGXL7erxXRmlVTUgj3Z6nqq/pfTZ/rd9LHEX0n8Zzjcz6bX6fz+9FIzaIIQBAM7ZrPcrcQ5EAAAjGSURBVKmayKIsylqVVREkJhXOxVkSk/LWjuN6XXIwXu5VJIbZvoblxtUZgvJYZ+EsisvNqsyMTb3kg7YVneR9VKqLFXdexLMsrZxDSuO0WuRJUcWBbO3llJCeSREsWjhRqbRVGRHvjgPyhekbXSmbRIz0FJijiFkfMjDud+aGmsh3g709zhNrCkVOClreZjmrPrjWP95rJfE8Jbrh5em5UgbUvEyKDD1PmVJhCsN7JMcR+yJGaaYL0uDztFZa1pCMpnl80tJKa7K3+VjN0ZaGEEMAgGb8CcWymQbZ44lJhd6SV9qdgxYkFB3XqdRgskN1YV2c2bv7lmqRCbPIEA6MZCd5mfoebpFR5JU4UObzelQzd7R7ydxesLunniRV2rj6ULRZW9TW0EMYw56bmglCkLVvmd5brbGwHKnYudTSkBReWmeh0cE3mXjUA9d6riSIPqjTaEYs7iKIIePm4d7cWgxJfYliiHanhlqJGKVyXqXg1oiIoXvSlEdFAQBAC6jDgxENREDQHb26mfmJkle11ZfHcb3aa9dZmC+oB5nZnq292d3L6/hHm3iP7CQvQ+Mrgp6j8mKRzpSzLPWi30n+qdIV7rwR6H619dihLB8msPTNNAjEgluuPuMDCJqc3fidEy1/tbcuFcoZiRTe5NlcD1zrPWKICoWnrFkMNaQZtRJDnr5kMWR4m4/rG14e8sfX/O4+n9/nL0953SMTdhnEEADgrPCYR0lkjddPVO3o6nwqpkJBUA+EZVI9Px/mSezaewnHNPZeXu2yrZKCRSd5GS7d6h4X8SSJcy7mdix2QjSB/ZL/SiaPpL2SYAtef0wqguWMSvrsUn/YiXftdbElQtZ8QLJCuin65VovHyG9zcdiZOhtPq7eaESJSysx5OlLD+zR2MfSvsjvT/n8IZs+7V8esjujkMbk+A+RIQDAiViu9XQzi+jBVmw2V6U8aNTE/E70igmleBzXl0mcJ+Es4iEoqlS4+rH2cufYy5YjO9KO10l+EU/slCnhwM6DfHpov+Rc0ZaxfEZ6/B2UhJnLJp3VQSAjYpg3Lb15EWurV7rCXJxZOoz/qQUuEUlkOqJCui164VpvUpJH04f8zsk+nt5nNA9aKyqjkNhJGVEw5KfxiX1PXyov++4hn9bneuZOZwAq29roG5pqPR6Nskf99vtn/erdwxtdAX6mBgAANa5rPfOcNycskju6YKJut0CTUeSn32fZapnFS514RCI36giJpCUFJAwTkRztZtv2Jif5VRmJgydp3d4KjeQhf+I/75wJSotAxZ8dhVJTy1aqKe8D8/yUzXRknb5RzerExtgnriQaP7yLjIazL5IRmiNLNal8odewMe3pSrnJCtRXVvsHAACunwu71gvJvEdSba4t6gN1ZdBFBUEzqEANAADgOMTntK8VO0EbAMNNRoa+CuvgrP657RKOAAAAwNBBZAgAAAAAgwaRIQAAAAAMGkSGAABg6NBHtwAYIP1wra8fLKeVo2vsSjzngft7ULyu8gAAcOt8tQs6f+ZfuXzIT7YD0IUeudazMtNdOWO5QlQ+BAD0k+twWrArXDPzkENGpwCI9MO1vn6JiyFan5BcN/UVs+k9cZUfeTSWhbrZEl7am+zu4RliCABwrViu9bR+oL5nEU+iOI8si4wOLujGsoPYma2zkHhciDUDWz36brtMsKrNh4xOAZDpg2t9jRwZsp3IjF+YLvq823cO51h9PWVachHnDQAAuDYk13rHxIrUqqalGju5oC/SMqu8z/Q9xkXLGHoQ5/OWhueNdvFffZAHbpUeuNYr2okhbZHBozsniSFiyLr3eLICAMC14hSP9lhNdXFBX2eh7ZAq2VrxjJ82ST+23OFK7joO8sDt0QPXekVLMURfMqoFYggAMFCcaIpsxtnNBV1w5yC5PupVv9mqF1vuWD6st+kSCr6cPrjW17QSQ1SpyGLo8V56Ks3COSbTg3l5GOOYDABwlViu9TWOGBJUC//9sAu6cFxFlJN5lWsmEpHyT8FrF7+I7VgUAG3pg2u9Tl5mx2dWWnSdHkTd3eVGGt3pPX2xw7t8PoZHBwDg6nBc6+1DLmreHi/1GZYST8e5oFc9EpNz4tO+t1zfGxOouT989XZ2ygYlBI7nJitQw7UeAAA6cmHXegBuGVSgBgAAAMCgucnI0OVRNYr4T/MJGgAAAABuEUSGAAAAADBoEBkCAAAAwKBBZAgAAAAAgwaRIQAAAAAMGkSGAAAAADBoEBkCAAAAwKBBZAgAAAAAgwaRIQAAAAAMGkSGAAAAADBoEBkCAAAAwKBBZAgAAAAAgwaRIQAAAAAMGkSGAAAAADBoEBkCAAAAwKBBZAgAAAAAgwaRIQAAAAAMGkSGAAAACKzKKCw3Xz6MYbNJZ1G6/vJh9J+OkaGf70HwEQTvxVkHsfrxEQQfwbf3Vbv7Xx6y+av68ykbjUbTJ8/Nr/nd/bP6820+Ho3G+csllvLXP8Lgb0HwtyD432K33+7+nX77W/DtH74ZrX7k4Y9/0yvF9+rtfwt//DP97n3jJ/DX3//7L/379+AjSP76lb0HwfsP/Z/FxZ8g+AiCjyD5/SP5/euojn4mpMEj2Pz+lvx1/NuF8XzUkwo+guDPz7P29St7/774qg/0Pz+ijyD6/WvxJwg+9DD+9T/vf/+/rxoSuBbWWTgJblDxbNJZEMyyi/53ssiDYBIEOft/7qqMgslJXdfNToTGW7FMgkkQTJLz7sKfxzIJJkG87Piuy39Rj4kMFd/PLIa2u/129zv93koMPd6P6h8la14exl4xZPM8vYgY+mdca6D99uf/Kg30z9gvhiyoNiq+N6mojvy7s67ie+R/fkQf37L/7BZ/jD7Y/P4W1QLoV/YeREeKobYs/nyWjPiPEXZkjp34mXAVdR38TD6C5K/d5vc3qmj3f/39v37/66vHBr6cZdJ5Z7oKFvERSuI8vWzS/GgxtEnLusEiPz7kU+Q3K4Z2+1WZHDPxC39R/x/X5D6Xae9QTAAAAABJRU5ErkJggg==]

Und das jetztesmal per Hand auszubessern ist auch nicht lustig...

Hilfe!!!

lg
Racer

Racer

Etwas verwirrend die Geschichte, ist aber so!

Alles klar - danke für die Erklärung!

lg
Racer

Racer

Hallo!

Möglicherweise habe ich nur ein Verständnisproblem, aber mit der Definition von Variablen bin ich (für mich) auf eine Ungereimtheit gestossen.

AutoIt

;AdlibRegister test
#include <Constants.au3>
AdlibRegister("output",1000)
local $a = 0
do
	$a = $a + 1
	sleep (100)
until $a = 100
func output ()
	SplashTextOn("",$a,"400","150","-1","-1",$DLG_NOTITLE + $DLG_TEXTVCENTER,"","","")
EndFunc

Alles anzeigen

In dem kleinen Beispiel habe ich mich mit der AdlibRegister-Funktion beschäftigt. Hier wird die Varable $a als local defniert. Diese wird aber auch in der Funktion ausgegeben!
Soll das so sein das lokale Variablen in einer Funktion verfügbar sind?

Definiere ich innerhalb der Funkion die Variable als lokal ist sie leer = so wie es sein soll!

In einem Bespiel würde ja die Variable einer Globalen definition entsprechen, obwohl sie explizit als local angegeben ist!

lg
Racer

Racer

Super, danke!

Ist genau das was ich suche!

lg
Racer

Beiträge von Racer

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Internet Explorer Proxy Einstellungen

Listbox automatisch ans Ende / Anfang scrollen

RegEnumKey und Leerschritte im Schlüssel

RegEnumKey und Leerschritte im Schlüssel

Problem mit GUICtrlRead?

GUI funktioniert (teilweise) nach dem ziehen nicht mehr

GUI funktioniert (teilweise) nach dem ziehen nicht mehr

GUI funktioniert (teilweise) nach dem ziehen nicht mehr

GUI funktioniert (teilweise) nach dem ziehen nicht mehr

SciTe und Umlaute

SciTe und Umlaute

Gültigkeit von Variablen

Gültigkeit von Variablen

Fenster ziehen