Mediaplayer

SikaPossujaKärpänen

Miten tuossa Mediaplayer komponentissa, jos käyttää Displayna panel komponenttia saa videon venytettyä koko paneelin kokoiseksi?

4

635

    Vastaukset 4

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • MadMax

      MediaPlayer1.DisplayRect := Panel1.ClientRect;

      • MadMax

        se pitää laittaa oikeaan kohtaan

        mediaPlayer1.Open;
        mediaplayer1.DisplayRect:=panel1.ClientRect;
        mediaPlayer1.Play;


    • adsl2
    • Mika0800

      toinen vaihtoehto:

      Importoi ActiveX -komponenttina Microsoftin Windows Media Player. HUOM: Et voi hyväksyä Delphin ehdottamaa TMediaPlayer -nimeä, koska se menee päällekkäin Delphin oman MCI -pohjaisen komponentin kanssa (ainakaan Delphi5:ssä ei voi).

      Sensijaan nimeä tuotavana oleva ActiveX -komponentti vaikkapa TMsMediaPlayer, niin pitäisi toimia ok.

      Jos ongelmana on toistuvat AccessViolation -ilmoitukset, tee näin:

      1. ÄLÄ pudota TMsMediaPlayeriä formille, vaan luo se koodissa, siis näin:

      TForm1.FormCreate(...);
      begin
      //
      MyPlayer := TMsMediaPlayer.Create(Self);
      MyPlayer.parent := Panel1;

      end;


      ja sitten:

      lisää formille WM_Destroy -viestikäsittelijä.

      Siinä tee näin:

      TForm1.WMDestroy(...);
      begin
      //
      FreeAndNil(MyPlayer);

      inherited;
      end;

      Tämän pitäisi lopettaa AccessViolation -ilmoitukset.

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Mikä kaivatussasi

      on parasta?
      Ikävä
      79
      1110
    2. Mitä haluaisit sanoa hänelle?

      Jos joskus kohtaatte?
      Ikävä
      111
      1110
    3. haluaisin paljastaa

      Kuka tämä :/ on
      Ikävä
      77
      581
    4. Olen jo oppinut tuntemaan

      sinun kirjoitustyylisi
      Ikävä
      47
      493
    5. Hyvää yötä kaipaamalleni

      Vanhwmmalle naiselle, olet rakas❤️❤️
      Ikävä
      17
      471
    6. Taiteiden yö

      Kuhmon taiteiden yössä tapahtui. Tsat satss saaatts... Ja Sammon takoja... Tsat satss saaatts...
      Kuhmo
      8
      456
    7. Nainen, onko se nalle hehkuttelija poistunut keskuudestamme?

      Ei ole näkynyt, joten onkohan. R.I.P :/
      Ikävä
      112
      441
    8. Mikä kaivatussasi

      on pahinta?
      Tunteet
      43
      438
    9. Mikä herkku

      Kaivattusi On? 😁
      Ikävä
      41
      412
    10. Et vaan tajua

      Että rakastan sua
      Ikävä
      15
      406
    Aihe