...wurde 7zip integriert und Anpassungen vorgenommen. Somit ist OES jetzt ein eigenständiges Programm.
@(A)Lina, eine gute Idee ich setze sie mal auf "MyTodoList" von SiS (siehe Link).
siehe Post 1 oder vielleicht hier.
Viel Spaß!
...wurde 7zip integriert und Anpassungen vorgenommen. Somit ist OES jetzt ein eigenständiges Programm.
@(A)Lina, eine gute Idee ich setze sie mal auf "MyTodoList" von SiS (siehe Link).
siehe Post 1 oder vielleicht hier.
Viel Spaß!
...unterstützt SiS jetzt auch das 7z-Format von 7Zip. SiS ist nun im Mehrformat-Lager angekommen. Natürlich kann man das Zip- oder 7z-Format wieder frei auswählen.
Viel Spaß!
Guten Morgen (A)Lina,
die Arbeit an OES macht mir großen Spaß und lernen kann ich auch gleich noch was dabei. Ich will heute Nachmittag eine weitere Version releasen.
Also bis dann...
Hallo FireFlyer,
danke für Dein Interesse und Vorschläge.
Den Pfad schaue ich mir mal genauer an. Mit @sw_hide kann man auch keine Meldungen mehr sehen falls erforderlich und so habe ich den Mittelweg gewählt - Dachte ich?
Das Packformat Zip ist sicher das Häufigere, im Notfall kann man jeden Packer verwenden.
Die Wahl des Formates kommt auf "MyTodoList", wie auch dass Verstecken( @sw_hide) !
Hier habe ich dem User mal die freie Wahl gelassen.
Outlook Express Saver...
Mit dem Programm OESv2127, jetzt mit Benutzeroberfläche (GUI) und im "GUIOnEventMode", kann der Nutzer Speicherort sowie Speicherformat (Copy, Zip, 7zip) selbst frei wählen. Viele Kommentare wurden eingefügt.
PS: Auf "Alt-Shift-r" musst Du geh´n, will man hier den SourceCode seh´n !
Viel Spaß mit OES !
Anpassungen und Weiterentwicklungen in Version SiSv3011 !
siehe Post 1
danke für Dein Interesse und Ratschläge, fast wie abgesprochen habe ich bereits mit FileSelectFolder gearbeitet. Also 1. Auftrag erledigt
Beim includen (FileInstall) war ich mir nicht sicher, bei dem doch so kl. Programm. Aber wird gemacht, soll der User wählen können!
Thunderbird ist ein idealer Kandidat für mein "SiS", sowie auch der FireFox es sich bei "SiS" gut gehen lässt.
Eine Rücksicherung sollte nicht fehlen, werde sie in Angriff nehmen.
@All
Schnell noch ein Hinweis auf die neue Version OESv2026 oben. Sie ist soweit ganz gut gelungen, die drei bewusst separat angelegten Funktionen rufen jede für sich FileExist auf. Es ist kein Mangel aber unnötig, denn einmal reicht ja auch. Somit erstelle ich eine weitere Funktion, die dieses nur einmal macht.
siehe Post 1
Hi (A)Lina,
also dann "Einmal mit Kommentaren", wie bestellt !
ja genau oder im Spoiler anklicken. Aber hier war ja ein if zuviel, passiert mir auch manchmal.Ist eben so ein Flüchtigkeitsfehler!
Hallo (A)Lina,
ja. Ich möchte dem Nutzer die Wahl seines Formats selbst überlassen. So mit Zielort und Packformat (Copy, Zip, 7zip) frei wählbar!
Hallo,
hier mal ein Beispiel:
If BitAND(GUICtrlRead($ckbFF), $GUI_UNCHECKED) And BitAND(GUICtrlRead($ckbIE), $GUI_UNCHECKED) And BitAND(GUICtrlRead($ckbEDateien), $GUI_UNCHECKED) And BitAND(GUICtrlRead($ckbOEx), $GUI_UNCHECKED) Then
MsgBox(48, "Error", "Sie haben keine Daten zur Sicherung ausgewählt ! ")
Exit
EndIf
Viel Erfolg!
Hi,
und herzlich Willkommen. Vielleicht hilft Dir ein Beispiel aus der "Hilfe" ?
#include <GUIConstants.au3>
GUICreate("My GUI combo") ; will create a dialog box that when displayed is centered
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateCombo ("item1", 10,10) ; create first item
GUICtrlSetData(-1,"item2|item3","item3") ; add other item snd set a new default
GUISetState ()
[/autoit] [autoit][/autoit] [autoit]; Run the GUI until the dialog is closed
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
Wend
Weiterhin viel Erfolg !
Hi (A)Lina,
danke für Dein Lob. Ich freue mich, dass Dir meine kleine Zusammenstellung gefallen hat. Das für Dich, unpassende Format bedauere ich und setze es auf "MyTodoList" !
Anpassungen und Weiterentwicklungen sind dazu gekommen !
siehe Post 1
Viel Spaß!
Mein Script habe ich noch etwas weiterentwickelt und mit Version "SiSv3007" den "GUIOnEventMode" eingeführt !
siehe Post 1
Viel Spaß !
...es scheint hier zu eine Art Puffer- oder Speicherüberlauf zu kommen ?
Durch setzen von AdlibEnable - Neuaufruf der Funktion kann dieser nicht mehr entstehen.
Auch die CPU-Last bei ca. 5% finde ich vertretbar !
; Graphic-Uhr by Oscar
; mit Anpassungen von Bernd670
; mit Anpassungen von Ritzelrocker04
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <StaticConstants.au3>
Opt('MustDeclareVars', 1)
Opt('GUIOnEventMode', 1)
Global $gui_digit[6], $dColor = 0xff2222, $eColor = 0x000000, $bgColor = 0xc0c0c0
Global $s = -1, $m = -1, $h = -1, $hh, $hm, $hs, $ls, $rs
Global $number, $digit ;by RR04
[/autoit] [autoit][/autoit] [autoit]GUICreate('test', 800, 480, -1, -1, $WS_POPUP, BitOr($WS_EX_TOOLWINDOW, $WS_EX_LAYERED))
GUISetOnEvent($GUI_EVENT_PRIMARYDOWN, '_MoveWindow')
GUISetOnEvent($GUI_EVENT_CLOSE,'_End')
GUISetBKColor($bgColor) ; Hintergrundfarbe setzen
$gui_digit[0] = GUICtrlCreateGraphic(20, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[1] = GUICtrlCreateGraphic(60, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
_Colon(103, 20)
$gui_digit[2] = GUICtrlCreateGraphic(120, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[3] = GUICtrlCreateGraphic(160, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
_Colon(203, 20)
$gui_digit[4] = GUICtrlCreateGraphic(220, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[5] = GUICtrlCreateGraphic(260, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
GUICtrlCreatePic(@ScriptDir & '\nicht loeschen.gif', 0, 0, 1, 1) ; wird für die Transparenz benötigt (nicht löschen)
GUISetState()
AdlibEnable("_DigitShow", 400) ;by RR04
[/autoit] [autoit][/autoit] [autoit]While 1
$hh = @HOUR
If $hh <> $h Then
GUISetState(@SW_LOCK)
If $hh = "00" Then
GUICtrlDelete($gui_digit[0])
GUICtrlDelete($gui_digit[1])
$gui_digit[0] = GUICtrlCreateGraphic(20, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[1] = GUICtrlCreateGraphic(60, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
EndIf
$ls = StringLeft($hh, 1)
$rs = StringRight($hh, 1)
_DigitShow($gui_digit[0], $ls)
_DigitShow($gui_digit[1], $rs)
$h = $hh
GUISetState(@SW_UNLOCK)
EndIf
$hm = @MIN
If $hm <> $m Then
GUISetState(@SW_LOCK)
If $hm = "00" Then
GUICtrlDelete($gui_digit[2])
GUICtrlDelete($gui_digit[3])
$gui_digit[2] = GUICtrlCreateGraphic(120, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[3] = GUICtrlCreateGraphic(160, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
EndIf
$ls = StringLeft($hm, 1)
$rs = StringRight($hm, 1)
_DigitShow($gui_digit[2], $ls)
_DigitShow($gui_digit[3], $rs)
$m = $hm
$h = -1
GUISetState(@SW_UNLOCK)
EndIf
$hs = @SEC
If $hs <> $s Then
GUISetState(@SW_LOCK)
If $hs = "00" Then
GUICtrlDelete($gui_digit[4])
GUICtrlDelete($gui_digit[5])
$gui_digit[4] = GUICtrlCreateGraphic(220, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
$gui_digit[5] = GUICtrlCreateGraphic(260, 20, 32, 56)
GUICtrlSetBkColor(-1, $bgColor)
EndIf
$ls = StringLeft($hs, 1)
$rs = StringRight($hs, 1)
_DigitShow($gui_digit[4], $ls)
_DigitShow($gui_digit[5], $rs)
$s = $hs
GUISetState(@SW_UNLOCK)
EndIf
Sleep(10)
WEnd
Func _Colon($PosX, $PosY)
GUICtrlCreateGraphic($PosX, $PosY, 10, 56)
GUICtrlSetGraphic(-1, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic(-1, $GUI_GR_ELLIPSE, 0, 12, 10, 10)
GUICtrlSetGraphic(-1, $GUI_GR_ELLIPSE, 0, 36, 10, 10)
EndFunc
Func _DigitShow($digit, $number)
Switch $number ; g
Case 2, 3, 4, 5, 6, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 28)
Case 0, 1, 7
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 2, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 9, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 23, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 30, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 23, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 9, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 2, 28)
EndSwitch
Switch $number ; a
Case 0, 2, 3, 5, 6, 7, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 0)
Case 1, 4
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 1, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 9,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 23,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 31, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 1, 0)
EndSwitch
Switch $number ; b
Case 0, 1, 2, 3, 4, 7, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 32, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 28)
Case 5, 6
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 32, 1)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 9)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 23)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 27)
EndSwitch
Switch $number ; c
Case 0, 1, 3, 4, 5, 6, 7, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 32, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 56)
Case 2
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 32, 29)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 33)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 55)
EndSwitch
Switch $number ; d
Case 0, 2, 3, 5, 6, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 56)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 24, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 32, 56)
Case 1, 4, 7
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 1, 56)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 9, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 23, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 31, 56)
EndSwitch
Switch $number ; e
Case 0, 2, 6, 8
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 28)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 32)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 48)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 56)
Case 1, 3, 4, 5, 7, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 29)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 33)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 47)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 55)
EndSwitch
Switch $number ; f
Case 0, 4, 5, 6, 8, 9
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $eColor, $dColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8,
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 24)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 28)
Case 1, 2, 3, 7
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 1)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 9)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 23)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 27)
EndSwitch
Switch $Number
Case 1
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 0)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 56)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 56)
Case 4
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 33)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 33)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 56)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 56)
Case 7
GUICtrlSetGraphic($digit, $GUI_GR_COLOR, $bgColor, $bgColor)
GUICtrlSetGraphic($digit, $GUI_GR_MOVE, 0, 9)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 9)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 8, 56)
GUICtrlSetGraphic($digit, $GUI_GR_LINE, 0, 56)
EndSwitch
GUICtrlSetGraphic($digit, $GUI_GR_REFRESH)
EndFunc
Func _MoveWindow()
Local $DifX, $DifY, $MouseData = GUIGetCursorInfo(@GUI_WinHandle)
Local $WinPos = WinGetPos(@GUI_WinHandle)
Local $MPos = MouseGetPos()
$DifX = $MPos[0] - $WinPos[0]
$DifY = $MPos[1] - $WinPos[1]
Do
Sleep(15)
$MPos = MouseGetPos()
$MouseData = GUIGetCursorInfo(@GUI_WinHandle)
Until ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Or (Not $MouseData[2])
While $MouseData[2]
$MPos = MouseGetPos()
$WinPos = WinGetPos(@GUI_WinHandle)
If ($WinPos[0] <> ($MPos[0] - $DifX)) Or ($WinPos[1] <> ($MPos[1] - $DifY)) Then
WinMove(@GUI_WinHandle, '', $MPos[0] - $DifX, $MPos[1] - $DifY)
EndIf
Sleep(15)
$MouseData = GUIGetCursorInfo(@GUI_WinHandle)
WEnd
EndFunc
Func _End()
Exit
EndFunc
Weiterhin viel Erfolg!
Hi (A)Lina,
Die aktuelle Version 4.0 hier:
Weitere Einstellungen sind vozunehmen, siehe hier(Progandy Post 109):
finde ich.
Seit meinen Arbeiten an SimplyColorProgress, The Stick und SiS ist auch mir eine Unregelmäßigkeit bei Verwendung von "GuiCtrlCreateGraphic" aufgefallen. Je größer die Fläche je größer das Flackern. In The Stick habe ich nur die Position gesetzt, also nur beim ersten einlesen. Dieses Flackern gibt es sogar in "multicolor", eben nur nicht so stark.
Meine Versuche mit Deiner Uhr zeigten große Sprünge der CPU-Last bis zu 25%. Änderungen dämmen das Problem nur mehr oder weniger ein.
kommen Anpassungen und Weiterentwicklungen hinzu !
siehe Post 1
Viel Spaß !
Hallo (A)Lina,
ich habe Dir mal ein Script zur Sache verfasst.
Einfach zu handhaben sehr klein, schnell und mit vielen Randbemerkungen versehen.
Es sollte unter Allen AutoIT-Versionen funktionieren.
Nochmals Danke für Dein Interesse und Vertrauen !