WMPlayer.OCX vergrößern

    Hallo mal wieder!
    Ich wollte mal fragen, ob und wenn ja wie man von einen WMPlayer die Größe ändern kann.

    [autoit]

    $Obj1 = GUICtrlCreateObj($Player, 0, 0, @desktopwidth, @desktopheight)

    [/autoit]


    funktioniert nicht, die Größe vom Video ist gleich groß wie sonst auch.

    Weiß jemand was?

    MfG. tobi_girst

    MfG. tobi_girst

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »tobi_girst« (Morgen, 25:63)

    Code
    WinMove( "Titel deines Players", "", 0, 0, @desktopwidth, @desktopheith)

    bin mir nicht sicher aber eig. sollte das geh'n.

    Grüße

    Canyon

    Entweder bin ich zu blöd oder es funktioniert nicht. Ich denke aber, dass es das zweite ist...


    MfG. tobi_girst

    MfG. tobi_girst

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »tobi_girst« (Morgen, 25:63)

    Den Quellcode, den ich verwende, hab ich im Forum gefunden:

    Spoiler anzeigen
    [autoit]

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

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 629, 442, 186, 125)
    $Player = ObjCreate("WMPlayer.OCX")
    $Obj1_ctrl = GUICtrlCreateObj($Player, 10, 10, 400, 200)
    WinMove( "WMPlayer.OCX", "", 0, 0, @desktopwidth, @desktopheight)

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

    With $Player
    .fullScreen = True
    .windowlessVideo = True
    .stretchToFit = True
    .enableContextMenu = True
    .enabled = True
    .uiMode = "full"; none / mini full
    .settings.autostart = True
    .settings.mute = False
    .settings.volume = 100; 0 - 100
    .settings.Balance = 0; -100 to 100
    EndWith

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

    $oMedia = $Player.newMedia('http://wstreaming.zdf.de/encoder/livestream6_h.asx')
    $Player.currentPlaylist.appendItem($oMedia)
    $Player.controls.play()
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

    EndSwitch
    WEnd

    [/autoit]


    Die beiden "Befehle" sind drinnen(Line 11+13)

    MfG. tobi_girst

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »tobi_girst« (Morgen, 25:63)