Beiträge von RR04

  • Shutdown for Benjamin - SfB

    Hallo Padmak !

    Danke für Dein Interesse und Hinweis. :thumbup:
    Ja, hier hat sich wirklich ein Fehler eingeschlichen. ;(

    Das Problem ergibt sich aus meiner korrekten Berechnung der HDD-Belegung mit zwei Stellen nach dem Komma und der ebenfalls korrekten Zuordnung, aber in ganzen Zahlen. Eine falsche Abstimmung beider ! ;(

    [autoit]


    Switch $hddPro ;i einer best. Prozentzahl ein Icon zuweisen
    Case 0 To 5
    $iconfile = @ScriptDir & "\SfBsys\16.ico"
    Case 6 To 11
    $iconfile = @ScriptDir & "\SfBsys\15.ico"
    ; [...]
    ; [...]
    EndSwitch

    [/autoit]


    So entstehen Lücken, die nicht zugeordnet werden können.
    Die Lösung liegt hier in der richtigen Abstimmung von Berechnung und Zuordnung.

    [autoit]


    Switch $hddPro ;i einer best. Prozentzahl ein Icon zuweisen
    Case 0 To 5.99
    $iconfile = @ScriptDir & "\SfBsys\16.ico"
    Case 6 To 11.99
    $iconfile = @ScriptDir & "\SfBsys\15.ico"
    ; [...]
    ; [...]
    EndSwitch

    [/autoit]

  • GUI Fenster soll nach AVI video ende zum nächsten GUI Fenster wechseln aber wie :/

    Aus der Hilfe zu GUICtrlCreateAvi:

    "Um das Video zu starten, sobald das Steuerelement erzeugt wurde, verwendet man den Stil $ACS_AUTOPLAY.
    Man kann die Animation starten und stoppen, indem man den Status mit GUICtrlSetState auf 1 oder 0 setzt. Siehe Beispiel."

    Ich stelle es mir als Stapelverarbeitung etwa so vor:

    1. StartGUI erstellen

    2. Video zeigen ($ACS_AUTOPLAY)

    3. StartGUI löschen (GuiDelete)

    4. HauptGUI starten

    :)

  • Kleiner Taschenrechner

    Hi,

    wie rechnet ein normaler Nutzer zB. 1,3 + 1,5, dann gibt es andere Ergebnisse (Punkt u. Komma) ?
    War10ck hat es anders gelöst !

    Progandy meinte es etwa so:

    [autoit]


    While 1
    sleep (100)
    WEnd

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

    Func Addieren()
    GUICtrlSetData($Label4, GUICtrlRead($Input1) + GUICtrlRead($Input2)) ;Die oben aufgerufenen Funktionen
    EndFunc

    [/autoit]

    Viel Erfolg ! :)

  • Tooltip eine bestimmte zeit sichbar

    Hi,
    vielleicht so:

    [autoit]


    ToolTip("ToolTip", 600, 320, "Mein ToolTip, schau Dir mal die Hilfe an !", 1, 1) ;i erstellt einen Tooltip
    Sleep(5000) ;i Leerlaufzeit, in der der Tool-Tip angezeigt werden kann
    ToolTip("") ;i Ein Tooltip bleibt sichtbar bis das Skript schließt oder ToolTip("") aufgerufen wird.

    [/autoit]


    Viel Erfolg ! :)

  • SAFE erstellen

    Nein, musst Du nicht !

    Das Ganze ist nur eine erste Idee von mir, also überlege Dir, ob es das ist was Du suchst ?

    Vielleicht gibt es ja noch bessere Ideen ?

    Gedacht habe ich mir das so:

    - Einen Ordner mit "DirCreate" erstellen und die ganze Zeit befüllen/nutzen.
    - Am Ende packen/verschlüsseln mit 7Zip oder anderem Tool zB TrueCrypt

  • SAFE erstellen

    Was spricht dagegen den Ordner mit "DirCreate" zu erstellen ?

    Ich dachte an die AES 256 Verschlüsselung von 7Zip, aber vielleicht gibt es Tools die nur verschlüsseln ?

  • Sithwecker doch es läuft nicht mit den Checkboxen

    mit FileInstall:

    Spoiler anzeigen
    [autoit]


    #include <GUIConstants.au3>

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

    Opt("GUIOnEventMode", 1) ;i GUIOnEventMode ist eingeschaltet

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

    FileInstall("DarthVaderROTSV1.jpg", @ScriptDir & "\DarthVaderROTSV1.jpg") ;i mit FileInstall
    $sithpic = @ScriptDir & "\DarthVaderROTSV1.jpg" ;! Pic im gleichen Verzeichnis wie das Script

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

    GUICreate("Sithwecker by sithlord95", 258, 312, 190, 125)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_ende") ;i Gui mit X ausschalten
    GUISetBkColor(0x000000)
    $Input1 = GUICtrlCreateInput(@HOUR & ":" & @MIN & ":" & @SEC, 0, 24, 209, 21)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $Label1 = GUICtrlCreateLabel("Trage die Weckzeit ein", 0, 0, 212, 17)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 120, 80, 17, 17)
    GUICtrlSetOnEvent(-1, "_check1")
    $Label4 = GUICtrlCreateLabel("Mit Messagebox?", 0, 56, 212, 17)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $Label2 = GUICtrlCreateLabel("Mit Beeptönen?", 0, 104, 212, 17)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 120, 128, 17, 17)
    GUICtrlSetOnEvent(-1, "_check2")
    $Button1 = GUICtrlCreateButton("Starten", 48, 152, 161, 33, 0)
    GUICtrlSetOnEvent(-1, "_start")
    $Pic1 = GUICtrlCreatePic($sithpic, 0, 192, 257, 116) ;! Pic unförmig ??

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

    GUISetState(@SW_SHOW)

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

    While 1
    Sleep(100)
    WEnd

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

    Func _start()
    ;$Input1 = 1
    EndFunc ;==>_start

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

    Func _ende()
    Exit
    EndFunc ;==>_ende

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

    Func _check1()
    ;$Checkbox1 = 1
    EndFunc ;==>_check1

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

    Func _check2()
    ;$Checkbox2 = 1
    EndFunc ;==>_check2
    ; Ende

    [/autoit]


    Viel Erfolg ! :)

  • GIF Datei als Bild in GUI animiert anzeigen?

    Zitat von sl4y3r

    Hi
    ja habe so nen konverter sieht danach aber so pothässlich aus dass ichs lieber bei gif lass ^^
    hab die datei jetz e schon von jpg dann mit swf animiert und dann zu gif umgewandelt xD sind schon ein bisschen hergenommen aus...

    Grüß Dich Alina,

    auf XP wird der Fisch angezeigt, doch nicht animiert ?

    Aber die Gif-Datei selbst könnte fehlerhaft sein, denn bei der Anzeige in Windows (ohne AutoIt) pumpt die Animation !

  • Autorun

    Hi Deepred,

    geht das nicht auch mit einem Link ? Bin mir jetzt nicht sicher.

    [autoit]


    FileCreateShortcut(@ScriptFullPath, @StartupDir & "\Name.lnk" & "Name")

    [/autoit]

    Edit:
    @Deepred, danke für die Antwort in Post # 10 ;)

  • GIF Datei als Bild in GUI animiert anzeigen?

    Hi,

    [autoit]


    #include <AVIConstants.au3>
    #include <GUIConstantsEx.au3>

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

    GUICreate ("Meine GUI Animation",300,200)
    $ani1 = GUICtrlCreateAvi("Sleep.avi", -1, 30, 30, 53, 56, $ACS_AUTOPLAY)

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

    GUISetState( )

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

    While 1
    $msg = GUIGetMsg()

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

    Select
    case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    EndSelect
    Wend

    [/autoit]


    Aber Du hast Recht, da ist was mit dem Gif (unsauber).
    Schau selbst ! :)

  • koda gui designer bild einfügen

    Ja, wie schon gesagt: Gute Idee !

    Ich habs noch einmal bereinigt:

    Spoiler anzeigen
    [autoit]


    #include <ScreenCapture.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    Opt('GUIOnEventMode', 1) ;i 1 Schaltet den OnEvent-Mode ein

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

    Dim $image = @MyDocumentsDir & "\GDIPlus_Image1.jpg"
    ;! das Pic und wo man es findet bzw. gespeichert wird !
    _ScreenCapture_Capture($image) ; ! ScreenCapture von Pic !

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

    $GUI = GUICreate("Form1", 1408, 812, 0, -4)
    GUISetOnEvent($GUI_EVENT_CLOSE, '_4')
    ;!!! ### schau Dir mal Guioneventmode einmal genauer an !
    $Pic = GUICtrlCreatePic($image, 0, 40, 1425, 785, _
    BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
    ; ! $image aufrufen !
    $Button1 = GUICtrlCreateButton("Anleitung", 8, 0, 145, 33, 0)
    $Button2 = GUICtrlCreateButton("Tastenbelegung", 168, 0, 145, 33, 0)
    $Button3 = GUICtrlCreateButton("ScreenShot", 328, 0, 145, 33, 0)
    $Date = GUICtrlCreateDate("2009/04/12 16:19:10", 1184, 8, 217, 25)
    $Button4 = GUICtrlCreateButton("Beenden", 488, 0, 145, 33, 0)
    GUICtrlSetOnEvent(-1, "_4")

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

    GUISetState(@SW_SHOW)

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

    While 1
    Sleep(1000) ; ! eingefügt !
    WEnd

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

    Func _4()
    Exit ; ! eingefügt !
    EndFunc ;==>_4

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

    ; Ende

    [/autoit]


    Edit: Dim eingefügt.
    Viel Spaß ! ;)