Beiträge von autoBert

  • Treiberzertifizierung automatisieren?

    Hallo Mtzlr,

    um alle Dateien eines Bestimmen Typs zu ermitteln benötigst du

    [autoit]

    _FileListToArray

    [/autoit]

    . In einer

    [autoit]

    For ... Next

    [/autoit]

    Schleife kannst du dann ein Element (des erhaltenenen Arrays ) nach dem anderen abarbeiten. Um Dateien zu verschieben kannst du

    [autoit]

    FileMove

    [/autoit]

    verwenden, zum kopieren

    [autoit]

    FileCopy

    [/autoit]

    mfg autoBert

  • Binary von Bildern erstellen, aus Textdatei auslesen und in GUI packen

    Hallo Julien,

    ich habe mal aus den Binärdaten von BugFix eine Datei erstellt, indem ich das Ergebnis in der Zwischenablage in eine Datei eingefügt habe und dort manuell alles unötige entfernt habe.

    Diese Textdatei kann man in seinem Skript s einlesen:

    [autoit]

    $sData = StringReplace("0x" & FileRead(@ScriptDir & "\Beetle.bin"),@crlf,"")

    [/autoit]

    de Variable $sData kann man danach mit _CreateTmpFile so weiterbenutzen wie von BugFix's Methode gewohnt. Hier ein Skript wo ich es zu Demozwecken einsetze:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include "GUICreateTransparent.au3"

    [/autoit] [autoit][/autoit] [autoit]

    Global Const $SC_DRAGMOVE = 0xF012

    [/autoit] [autoit][/autoit] [autoit]

    $sData = StringReplace("0x"&FileRead(@ScriptDir & "\Beetle.txt"),@crlf,"")
    _CreateTmpFile("Beetle.png", $sData)

    [/autoit] [autoit][/autoit] [autoit]

    ; Transparentes GUI erzeugen
    $hGUI = _GUICreate_Transparent(@TempDir & "\Beetle.png")

    [/autoit] [autoit][/autoit] [autoit]

    ; Child-GUI mit Controls erzeugen
    $hChild = GUICreate("MDIChild", 400, 400, 150, 150, $WS_POPUP, $WS_EX_MDICHILD + $WS_EX_LAYERED, $hGUI)
    GUISetBkColor(0x123456)
    GUICtrlCreateButton("Button 1", 20, 20)
    GUICtrlCreateButton("Button 2", 20, 50)
    GUICtrlCreateButton("Button 3", 20, 80)
    GUICtrlCreateInput("Input 1", 20, 110, -1, 20)
    ; Hintergrundfarbe des Child-GUI transparent setzen
    _WinAPI_SetLayeredWindowAttributes($hChild, 0x123456, 0xff)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW, $hGUI)
    GUISetState(@SW_SHOW, $hChild)

    [/autoit] [autoit][/autoit] [autoit]

    ; Wenn man das GUI bewegen will
    GUIRegisterMsg($WM_LBUTTONDOWN, "_WM_LBUTTONDOWN")

    [/autoit] [autoit][/autoit] [autoit]

    Do
    Until GUIGetMsg() = $GUI_EVENT_CLOSE
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    Func _WM_LBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)
    _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)
    EndFunc ;==>_WM_LBUTTONDOWN

    [/autoit] [autoit][/autoit] [autoit]

    ; erstellt im TEMPDIR die Datei $sFileName mit Daten von $sBin
    Func _CreateTmpFile($sFileName, $sBin)
    Local $sFile = @TempDir & "\" & $sFileName
    Local $hFileOut = FileOpen($sFile, 18)
    FileWrite($hFileOut, Binary($sBin))
    FileClose($hFileOut)
    Return $sFile
    EndFunc ;==>_CreateTmpFile

    [/autoit]

    dazu wird GuiCreateTransparent von Großvater und natürlich eine Bin: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. benötigt,

    mfg autoBert

  • Kryptographie-Überlegungen

    BinDannMalWeg,

    das Problem worauf Chip, tklausl & Co. herumreiten ist AutoIt soezifisch (lässt sich leiden vielzu leicht dekompilieren, ist aber illegal). Daher ist deine Methde noch unsicherer als Oscar's Methde. Ohne die hässlichen Dekomiler würde ja schon das Schema genügen das Oscar in seiner Login-Box verwendet hat.
    Die anderen Fragen sind aber: wer hat schon physikalischen Zugang zu (d/s)einem Rechner? Lohnt sich der ganze Aufwand überhaupt?
    Ein möglicher Lösungsweg wäre die Verschlüsselung mit Hilfe einer php-Datei auf einen Webserver zu verlagern bzw. den Schlüssel dort verwahren und selbst dabei gibt es Probleme. Ist schon schade dass sich gegen Diebe nichts zu 100 % schützen lässt, man sollte es ihnen aber auch nicht zu einfach machen,

    mfg autoBert

  • Registry/Regedit

    Hallo Julien,

    solange du nur deine eigenen Schlüssel anlegst und keine anderen bearbeites (manipilierst) kann dem PC/System nichts geschehen. Schlimmstenfalls funktiniert dein Programm (gar) nicht (korrekt). Trotzdem rate ich dazu die Registry nicht zu nutzen sondern auf die altertümliche Weise mit INI-Files zu arbeiten um Programmeinstellungen zu speichern bzw. abzurufen. Diese werden vom Anwender wenn er (d)ein Programm nicht mehr benötigt zusammen mit dem Progarmm (sofern im gleichen Ordner bzw. einem Unterordner) einfach gelöscht und es entstehen keine Karteileichen in der Registry. Diese machen imho das System unnötig langsamer. Falls du die Registry benutzt solltest du deshalb auch an ein UnInstall-Skript denken, dass die Registryeinträge wieder entfernt, leider vergessen dies selbst die Programmierer von MS des öfteren,

    mfg autoBert

  • Progressbar Uhrzeit bezogen

    Dann solltest du mal F5 oder besser STRG-F5 drücken, denn den Beitrag vor dir: https://autoit.de/index.php?page…6876#post246876 stelte ich um 17:12 ein. Du hast dann um 17:28 deine Lösung eingestellt. So etwas kann passieren, warum du dich aber jetzt mit

    Zitat von Protex

    Als ich meinen Beitrag geschrieben habe in der Berufsschule war noch kein Eintrag vor mir ich habe also den Beitrag kurz nach deinem Wohl geschrieben

    herausreden willst verstehe ich nicht. Diese Unsitte solltest du dir abgewöhnen, wenn man Unrecht hat sollte man schweigen oder besser es zugeben,

    mfg autoBert

  • Progressbar Uhrzeit bezogen

    Hallo protex,

    deine Lösung hat 2 Fehler:

    • egal zu welcher Uhrzeit man startet fängt der Fortschritt bei null und ermiitelt nicht den Fortschritt seit Beginn (6.00 Uhr)der Bereitschaft an, also auch nach einem Stromausfall oder Rechnerabsturz
    • dies ausser acht gelassen und vorausgesetzt das Programm wird um 6:00 gestartet ereicht es erst 22:40 die 100 %. Dies sollte aber um 22:00 (Ende der Bereitschaft) der Fall sein.

    mfg autoBert

  • Progressbar Uhrzeit bezogen

    Hallo doni_darco1,

    das kannst du über AdlibRegister lösen:

    Spoiler anzeigen
    [autoit]

    #include <Excel.au3>
    #include <Array.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>
    #include <WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global $iStart = 6 * 60 ;6 Uhr
    Global $iGesamt = 16 * 60 ;gesamte Bereitschaftszeit

    [/autoit] [autoit][/autoit] [autoit]

    $Form2 = GUICreate("Hotline Bereitschaft für am " & 1, 587, 50, 251, 326)
    $idLblPer = GUICtrlCreateLabel("",550,10,30,17)
    $progressbar1 = GUICtrlCreateProgress(5, 33, 577, 17)
    GUICtrlSetColor(-1, 32250); not working with Windows XP Style
    GUISetState(@SW_SHOW, $Form2)
    _ShowProgress() ;damit beim Progarmmstart sfortr ein Fortschritt errechnet wird
    AdlibRegister("_ShowProgress", 60000) ;alle 60 Sekunden aufrufen

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()

    [/autoit] [autoit][/autoit] [autoit]

    Switch $nMsg

    [/autoit] [autoit][/autoit] [autoit]

    Case $GUI_EVENT_CLOSE
    Exit
    ;$minlaufer = "9,6"
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func _ShowProgress()
    Local $iBereits = @HOUR * 60 + @MIN - $iStart
    $iPercent = $iBereits / $iGesamt * 100
    ConsoleWrite(@HOUR & ":" & @MIN & @TAB & $iPercent & @CRLF) ;zur Kontrolle
    GUICtrlSetData($progressbar1, $iPercent)
    GUICtrlSetData($idLblPer,GUICtrlRead($progressbar1) & " %") ;zur Demo, dass die Progressbar nur ganze Werte annimmt
    EndFunc ;==>_ShowProgress

    [/autoit]
    Zitat von Protex

    also am besten machste das ganze alle 10 Minuten und erweiterst also deine Progressbar um 1% alle 10 Minuten


    @Protex 960 <> 1000, da kämen ja erst nach 40 "Überminuten" die 100% zustande,

    mfg autoBert

  • Progressbar Uhrzeit bezogen

    Zitat von Protex

    Moin, 24 Stunden Mal 60 Minuten die Stunde (24*60 = 1440 ) dass ganze durch 100% die eine Progress bar darstellen kann (100/1440 = 0,069) d.h. jede Minute musst du deine Progressbar um den Wert 0,069 Weitersetzten Guictrlsetdata($Progressbar,$WertAlt+0,069)Gruß Marvin


    Rechnung ist zwar richtig, eine Progressbar kann aber nur ganze Integerwerte annehmen, d.h. sie wir nur alle ~ 14,5 min sichtbar aktualisiert,

    Das nur Int möglich siehst du hier:

    [autoit]

    Local $hGuiMain = GUICreate("My GUI Progressbar", 220, 100, 100, 200)
    Local $progressbar1 = GUICtrlCreateProgress(10, 10, 200, 20)
    GUISetState(@SW_SHOW, $hGuiMain)

    [/autoit][autoit][/autoit][autoit]

    GUICtrlSetData($progressbar1, 13.33)
    MsgBox(0,"Wert der Prgressbar:",GUICtrlRead($progressbar1))

    [/autoit]

    bwohl 13,33 zugewiesen nimmt sie nur den Wert 13 an,

    mfg autoBert