Miten tuossa Mediaplayer komponentissa, jos käyttää Displayna panel komponenttia saa videon venytettyä koko paneelin kokoiseksi?
Mediaplayer
SikaPossujaKärpänen
4
412
Vastaukset
- MadMax
MediaPlayer1.DisplayRect := Panel1.ClientRect;
- MadMax
se pitää laittaa oikeaan kohtaan
mediaPlayer1.Open;
mediaplayer1.DisplayRect:=panel1.ClientRect;
mediaPlayer1.Play;
- adsl2
Jos olet video soitinta tms. tekemässä suosittelen DSPackia.
http://www.progdigy.com/ - 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
Ihanasti alkoi aamu: SDP:n kaula kokoomukseen jo 6,9 %-yks
Lindtmanin I hallitus on tukevasti jytkyttämässä laittamaan Suomi kuntoon Orvon täystuhohallituksen jäljiltä, jonka kann3882632Teidän persujen pitäisi välillä miettiä kuinka Suomen talous saataisiin kuntoon
Ja lopettaa tuo tyhjänpäiväinen maahanmuuttajista höpöttäminen. Teillä on sentään rahaministerin salkku tällä kierroksel1052096Olen niin kesken
Omien asioiden suhteen etkä voi odottaa loputtomiin. Mun on muutenkin niin vaikea suhun luottaa vaikka joku ihme syvyys162000- 1061605
Tietääkö joku ylläpidosta?
Miten näillä palstoilla tomii tuo ylläpito, onko sitä yli päätään olemassa vai ovatko huhut totta että on palstan kirjoi2321501Auttaja paikalla. Kerro huolesi. (Osa 2)
Voin auttaa sinua näkemään tilanteesi uudesta näkökulmasta. Voin antaa lohtua, toivoa ja rohkeutta. Olen elänyt maan pä1861200Martina ei mennyt naimisiin
IS 17.9: Martinan häät peruuntui, tajusi, ettei ollut oikea aika. Rahat meni hevosiin. On edelleen parisuhteessa Yhdysva1491121Kaninkolojen vaikutus?
Vinkki sinkkumiehille: jos haluatte kunnollisen täysijärkisen naisen, niin kaivautukaa ulos kaninkoloistanne ja parantak1811084Nainen olet ensimmäinen tarpeeksi vahva
joka kestää tämän kokonaisuuden, minut. Persoonani, tunteeni, kipuni, pelkoni. Olen aina pidätellyt itseäni ja antanut v601033TTK:sta tippunut Sara Siipola rehellisenä Jurza-open kanssa: "Että jaa, siinäkö..."
Tippuiko oikea TTK-pari ensimmäisenä? Joka tapauksessa iso kiitos tansseistanne Sara ja Jurza Tanssii Tähtien Kanssa -p201030