Das MS-Address Book ist zur Sicherung hinzu gekommen und Anpassungen wurden vorgenommen.
Oscars tolle Funktion hat gleich drei Ehrenplätze bekommen - Noch einmal Danke an Oscar!
Download siehe Post 1.
Das MS-Address Book ist zur Sicherung hinzu gekommen und Anpassungen wurden vorgenommen.
Oscars tolle Funktion hat gleich drei Ehrenplätze bekommen - Noch einmal Danke an Oscar!
Download siehe Post 1.
Oscar ,
eine schöne Lösung, leider werden die Hacken bei mir nicht richtig zugeordnet ?
Ein Erststart OHNE Ini funktioniert (Error-Abfrage OK) und auch die Ini wird richtig geschrieben !
Die Abrage der Ini mit meinem Testscript geht dann wieder ?
Habe ich noch etwas übersehen ?
Startbutton, Tooltip und Menü/Datei - Bezeichnung wechselt jeweils von "Sichern nach Restore". Der Zielpfad wird gespeichert.
Sicherheitsabfragen wurden eingefügt. Download siehe Post 1.
Viel Spaß mit OES !
Ich hab noch was vergessen, Du auch !
[autoit]
#include <WindowsConstants.au3>
#Region $vars_default
Global $vars_default_title = "Spacebar"
#EndRegion
#Region $vars
Global $vars_title = IniRead( "spacebar.ini", "vars", "vars_title", 0 )
#EndRegion
#Region check_vars
If $vars_title = 0 Then
IniWrite( "spacebar.ini", "vars", "vars_title", $vars_default_title )
$vars_title = $vars_default_title
EndIf
#EndRegion
Global $gui = GUICreate($vars_title, @DesktopWidth, @DesktopHeight, 300, 300, BitOR($WS_POPUP + $WS_BORDER, $WS_EX_TOOLWINDOW))
[/autoit][autoit][/autoit][autoit]GUISetState()
[/autoit][autoit][/autoit][autoit]While 1
Sleep(100)
WEnd
Viel Erfolg !
Hi,
ein falsches Include !
So ist es besser:
#include <WindowsConstants.au3>
#Region $vars_default
Global $vars_default_title = "Spacebar"
#EndRegion
#Region $vars
Global $vars_title = IniRead( "spacebar.ini", "vars", "vars_title", 0 )
#EndRegion
#Region check_vars
If $vars_title = 0 Then
IniWrite( "spacebar.ini", "vars", "vars_title", $vars_default_title )
$vars_title = $vars_default_title
EndIf
#EndRegion
$gui = GUICreate($vars_title, 390, 800, @DesktopWidth, @DesktopHeight, $WS_POPUP + $WS_BORDER, $WS_EX_TOOLWINDOW)
[/autoit] [autoit][/autoit] [autoit]While 1
Sleep(100)
WEnd
Oscar ,
danke für den Hinweis, muss ich wohl übersehen haben. Sorry !
Zu 2. eine gute Idee, kommt in die nächste Version.
Das Adressbuch kann nun auch gesichert und rück gesichert werden.
Anpassungen wurden vorgenommen.
Viel Spaß mit OES !
@(A)Lina
Danke für Dein Lob. Ich gebe es gerne weiter an unsere "Lehrer" speziell auch an Oscar, die immer wieder aufzeigen, wie es GUT oder BESSER gemacht wird !
Hallo und Herzlich Willkommen !
Eine Rücksicherung ist eine gute Idee, die ich auf meine ToDoList setzen werde.
In Post 5 habe ich das Beispiel mal erweitert bis 10 !
Viel Erfolg !
@Seven
"Der Threadstarter will aber 10 Checkboxen prüfen"
siehe Progandy Post #2
Hallo,
hier ein Beispiel mit einer weiteren Möglichkeit in Zeile 25:
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
Opt("MustDeclareVars", 1)
GUICreate("Checkbox-Abfrage", 300, 200)
GUISetOnEvent($GUI_EVENT_CLOSE, '_quit')
Global $Checkbox1 = GUICtrlCreateCheckbox("Ckb 1", 100, 125, 142)
GUICtrlSetOnEvent($Checkbox1, "_EnableUpdate")
; [...]
[/autoit] [autoit][/autoit] [autoit]; [...]
[/autoit] [autoit][/autoit] [autoit]Global $Checkbox10 = GUICtrlCreateCheckbox("Ckb 10", 100, 100, 142)
Global $InputVerbindungOnboard = GUICtrlCreateInput("", 10, 152, 280, 21)
GUICtrlSetOnEvent($Checkbox10, "_EnableUpdate")
GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While 1
Sleep(1000)
WEnd
Func _quit()
Exit
EndFunc ;==>_quit
Func _EnableUpdate()
If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) Then _test1()
; [...]
[/autoit] [autoit][/autoit] [autoit];[...]
[/autoit] [autoit][/autoit] [autoit]If BitAND(GUICtrlRead($Checkbox10), $GUI_CHECKED) Then _test10()
EndFunc ;==>_EnableUpdate
Func _test1()
MsgBox(0, 'Test', 'Test1 funktioniert ! ')
EndFunc
Func _test10()
MsgBox(0, 'Test', 'Test10 funktioniert ! ')
EndFunc
; ENDE
[/autoit]
Viel Erfolg !
Eine Statusleiste ist hinzu gekommen.
Die Schalter Start, Beenden, Info und About können nun auch über die neue Menüleiste erreicht werden.
Viel Spaß !
SiS baut auf ein vorinstalliertes 7zip auf. Sollte kein installiertes 7zip gefunden werden, versagt SiS nicht mehr den Dienst. SiS nutzt jetzt eine mitgebrachte 195kb Version von 7zip. Bei einer späteren Nachinstallation von 7zip wird diese (aktuellere) bevorzugt genutzt.
Download siehe Post 1
Viel Spaß mit SiS !
drücke doch auf senden und dann kann man speichern...
Oscar ,
Gute Besserung - Gib der Krankenkasse Fersengeld !
Schau Dir mal "GUISwitch()" an,vielleicht ist das ja etwas für Dich.
#include <GUIConstantsEx.au3>
Opt('MustDeclareVars', 1)
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]Func Example()
Local $parent1, $parent2, $tabitem, $msg
$parent1 = GUICreate("Parent1")
GUICtrlCreateTab(10, 10)
$tabitem = GUICtrlCreateTabItem("tab1")
GUICtrlCreateTabItem("tab2")
GUICtrlCreateTabItem("")
$parent2 = GUICreate("Parent2", -1, -1, 100, 100)
[/autoit] [autoit][/autoit] [autoit]GUISwitch($parent2)
GUISetState()
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
GUISwitch($parent1, $tabitem)
GUICtrlCreateButton("OK", 50, 50, 50)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW, $parent1)
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
EndFunc ;==>Example
Viel Erfolg !
Hi,
siehe Post 3 habe ich angepasst für mehrere Inputboxen !
Hi,
ja der Sinn von Radioboxen ist, dass einer immer gedrückt ist. Schau Dir auch "$BS_AUTORADIOBUTTON" mal an. Siehe hier:
Hallo,
ich hab Dir mal ein Beispiel gebaut:
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]Dim $tate = $GUI_ENABLE, $ini
[/autoit] [autoit][/autoit] [autoit]GUICreate("Enable-Switch", 300, 200)
GUISetOnEvent($GUI_EVENT_CLOSE, '_quit')
$Checkbox4 = GUICtrlCreateCheckbox("update Window-List every", 100, 125, 142)
$InputVerbindungOnboard = GUICtrlCreateInput("", 10, 152, 280, 21)
GUICtrlSetState($Checkbox4, IniRead($ini, "Settings", "update Window List", "4"))
GUICtrlSetOnEvent($Checkbox4, "_EnableUpdate")
GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While 1
Sleep(1000)
WEnd
Func _quit()
Exit
EndFunc ;==>_quit
Func _EnableUpdate()
$tate = BitXOR($tate, $GUI_ENABLE, $GUI_DISABLE)
GUICtrlSetState($InputVerbindungOnboard, $tate)
GUICtrlSetState($Input1, $tate)
; [...]
; [...]
GUICtrlSetState($Input9, $tate)
EndFunc ;==>_EnableUpdate
; ENDE
Viel Erfolg !
Hi,
schau Dir auch "$BS_AUTORADIOBUTTON" mal an:
$aTimeRb = GUICtrlCreateRadio($aTime, 100, 180, 85, 28, BitOR($BS_AUTORADIOBUTTON, $BS_MULTILINE))
Viel Erfolg!