Gui Fragen

1. offizieller Beitrag

    Hallo liebe community habe da mal 2 kleine fragen.

    also ich möchte für mein programm einen SplashScreen mit Fade in machen. Für das Fadein habe ich folgendes gefunden:

    [autoit]


    $hwnd = GUICreate("Animate Window", 300, 200)
    DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00080000);fade-in

    [/autoit]

    und für den SplashScreen folgendes:

    [autoit]


    ; location of a picture in the windows folder.
    $destination = @Systemdir & "\oobe\images\mslogo.jpg"
    ; splash the image on the screen.
    SplashImageOn("Splash Screen", $destination,250,50)

    [/autoit]

    wie mache ich das jetzt aber mit dem fade??? könnt ihr mir da mal einen tipp geben bei mir klappt das nicht ganz


    meine zweite frage ist folgende. ich möchte eine gui (zum besser kennenlernen von autoit und der gui funktion) eine Weiter funtkion machen sprich (Schritt 1 - Weiter , Schritt 2 -Weiter ....) weis aber nicht wie ich das löse muss ich da dann das alte gui fenster hidden machen und dann ein neues aufrufen? mir fehlt da noch einwenig der gedankengange

    vielen lieben dank für eure bemühungen :)
    ps.: ist bei euch auch so ein regenwetter? :(

    2 Mal editiert, zuletzt von ParTy (15. Juli 2008 um 10:24)

    also zur ersten frage:
    Ein Splash screen wird zuerst erstellt und dann kannst du sachen ändern wie transparenz, deshalb würde man ihn minimal kurz aufblitzen sehen.
    Ich würde eine Popup-GUI nehmen.
    Die wird nicht gleich angezeigt.
    Was das Fade-In angeht, da kannste winsettrans nehmen ich hab sowieso noch ne UDF dafür.

    Fade
    [autoit]


    Func fade($dir, $title)
    ;fade-in
    If $dir = "in" Then
    For $trans = 0 To 255
    WinSetTrans($title,"",$trans)
    $trans+=1
    WinSetTrans($title,"",$trans)
    $trans+=1
    WinSetTrans($title,"",$trans)
    $trans+=1
    WinSetTrans($title,"",$trans)
    Sleep(1)
    Next
    EndIf
    ;fade-out
    If $dir = "out" Then
    For $trans = 255 To 0 Step -1
    WinSetTrans($title,"",$trans)
    $trans-=1
    WinSetTrans($title,"",$trans)
    $trans-=1
    WinSetTrans($title,"",$trans)
    $trans-=1
    WinSetTrans($title,"",$trans)
    Sleep(1)
    Next
    EndIf
    EndFunc

    [/autoit]


    Zu den Parametern der erste is fade-in oder out
    da musst du "in" oder "out" eingeben(mit anführungszeichen).
    der zweite: Titel des Fensters(der GUI).
    Hoffe die Informationen reichen(falls nich melde dich).

    Bei der 2. kann ich dir nich helfen.

    Zur 3.: Seit gestern hats nich mehr geregnet :D

    vielen dank für deine hilfe und dein UDF funktioniert spitze nur was ist ein Popup-GUI bzw wie lautet die funktion dafür ? finde im internet nichts darüber

    Zu Frage 2, wenn ich das richtig verstanden habe soll es so eine Art Assistent sein, oder? Falls ja das könnte man z.B. mit Tabs machen, hier ein kleine Beispiel (ja ja nicht schön aber selten ;) :(

    Spoiler anzeigen
    [autoit]


    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $frmAssistent = GUICreate("Test Assistent", 427, 302, 193, 125, 0)
    $Tab1 = GUICtrlCreateTab(0, -22, 425, 321)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
    $Button1 = GUICtrlCreateButton("Weiter", 306, 241, 89, 25, 0)
    $Label1 = GUICtrlCreateLabel("Schritt 1", 10, 9, 72, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    $Label5 = GUICtrlCreateLabel("Beispieltext1", 55, 65, 60, 17)
    $Radio1 = GUICtrlCreateRadio("asdfsadfas", 146, 97, 137, 17)
    $Radio2 = GUICtrlCreateRadio("Radasdfsadfio1", 146, 121, 137, 17)
    $Radio3 = GUICtrlCreateRadio("adfasdfsadf", 146, 145, 137, 17)
    $TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
    $Button2 = GUICtrlCreateButton("Weiter", 306, 241, 89, 25, 0)
    $Label2 = GUICtrlCreateLabel("Schritt 2", 10, 9, 72, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    $Radio4 = GUICtrlCreateRadio("Radadsfsadfasio1", 146, 97, 137, 17)
    $Radio5 = GUICtrlCreateRadio("asass", 146, 121, 137, 17)
    $Radio6 = GUICtrlCreateRadio("adfsadfasd", 146, 145, 137, 17)
    $Label6 = GUICtrlCreateLabel("Beispieltext2", 55, 65, 60, 17)
    $TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
    $Button3 = GUICtrlCreateButton("Weiter", 306, 241, 89, 25, 0)
    $Label3 = GUICtrlCreateLabel("Schritt 3", 10, 9, 72, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    $Radio7 = GUICtrlCreateRadio("asdfsadfasdfa", 146, 97, 137, 17)
    $Radio8 = GUICtrlCreateRadio("asdfsadfas", 146, 121, 137, 17)
    $Radio9 = GUICtrlCreateRadio("wwwewewe", 146, 145, 137, 17)
    $Label7 = GUICtrlCreateLabel("Beispieltext3", 55, 65, 60, 17)
    $TabSheet4 = GUICtrlCreateTabItem("TabSheet4")
    $Button4 = GUICtrlCreateButton("Fertigstellen", 306, 241, 89, 25, 0)
    $Label4 = GUICtrlCreateLabel("Schritt 4", 10, 9, 72, 24)
    GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
    $Radio10 = GUICtrlCreateRadio("asdfasdfasdf", 146, 97, 137, 17)
    $Radio11 = GUICtrlCreateRadio("asdfasdf", 146, 121, 137, 17)
    $Radio12 = GUICtrlCreateRadio("dccdddddddddddd", 146, 145, 137, 17)
    $Label8 = GUICtrlCreateLabel("Beispieltext4", 55, 65, 60, 17)
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $Button1
    GUICtrlSetState($TabSheet2,$GUI_SHOW)
    Case $Button2
    GUICtrlSetState($TabSheet3,$GUI_SHOW)
    Case $Button3
    GUICtrlSetState($TabSheet4,$GUI_SHOW)
    Case $Button4
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)