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. Ny se loppuu ( Kuhmo)

      Yhtiö on myyty. Notta yyteet meleko äkkiä, notta. Pelastautukoon ken voi. Notta se on tuulista pian.
      Kuhmo
      81
      2566
    2. Parikymppinen hakkasi nelikymppisen kriittiseen tilaan

      Ja ihminen jäi junan alle lautiosaaressa...paljon on taas sattunut ja tapahtunut. Ketähän nämä uhrit mahtaa olla 🤔 htt
      Kemi
      42
      2156
    3. Kaivattusi tärkein ulkoinen tuntomerkki

      Onko jokin muu kuin yleinen kuten kaunis, laiha. hyväkroppainen jne.
      Ikävä
      35
      1045
    4. Mille kirjaimelle

      toivotat hyvää yötä , kuka on mielessäsi kun menet nukkumaan?
      Ikävä
      32
      897
    5. Äimän käki

      Olen vähää vaille viisikymppinen mies, ja olen elellyt ilman parisuhdetta parisen vuotta. Nyt vihdoin ja viimein tuntuu,
      Sinkut
      154
      798
    6. Nainen, miten suhtautuisit

      Jos mies ehdottaisi tapaamista? Entä siihen, jos mies kertoisi tapaamisessa tunteistaan ja haluaisi seurustella?
      Ikävä
      58
      660
    7. Paikallinen autokorjaamo

      Kyllä alkaa vituttamaan, palvelua haluaisi niin jono ovelle ja yksi myyjä. Auto valmistunut kuntoon niin kukaan ei ilmoi
      Kuhmo
      6
      578
    8. Kenen kanssa koet

      Että sinulla on eniten kipinää
      Ikävä
      21
      525
    9. Vihdoinkin tarjolla sushia!

      Onpa mukava, että tän paikkakunnan ruokatarjonta laajenee. Ensi lauantaina pääsee herkuttelemaan kun Kukkoloilta saa su
      Haapavesi
      78
      511
    10. Sinulle mies

      Kohtaamme jälleen kun on oikea aika. Sitä ei voi mikään eikä kukaan estää <3 <3
      Ikävä
      33
      502
    Aihe