Új hozzászólás Aktív témák
-
SGeri-vb
újonc
Sziasztok!
Szükségem lenne kis segítségre.
Szóval, adott a feladat:
1. indításkor elindul egy videó,
2. majd ha annak vége, el kell induljon egy másik.Tehát a 2. lépéssel van a probléma, mert nem pontosan tudom, hogy mit kéne változtatni a kódon:
Private Sub AxWindowsMediaPlayer1_PlayStateChange1(ByVal sender As Object, ByVal e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange
If scene = 1 Then
If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsStopped Then
AxWindowsMediaPlayer1.URL = gamedir + "\1.2.mp4"
AxWindowsMediaPlayer1.Ctlcontrols.play()
End If
End If
End Sub
Illetve van egy scene nevű if, de az máshoz kell, az nem okozhatja a problémát...
Nem látszik a kódon, de az elején indul egy videó(1.1.mp4), majd a PlayStateChange sub-bal
kéne indulnia az 1.2.mp4-nek, miután vége lett az 1.1.mp4-nek.
Akkor indul csak az 1.2, ha a stop gombot(
) nyomom meg.
Tehát amelyik pillanatban vége 1.1-nek, el kell indulnia az 1.2-nek.Mi a probléma?
Üdv,
Gergő
Új hozzászólás Aktív témák
- Házimozi belépő szinten
- Kerékpárosok, bringások ide!
- Milyen videókártyát?
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- iPhone topik
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Spórolós topik
- Beleremegett Hollywood Brad Pitt és Tom Cruise AI harcába
- Garmin Instinct – küldetés teljesítve
- 5.1, 7.1 és gamer fejhallgatók
- További aktív témák...
- Asus 15 TUF Gamer FHD IPS 144Hz G-Sync Ryzen7 7735HS 16GB 1TB SSD Nvidia RTX4060 140W Win11 Garancia
- Keresünk iPhone 13/13 Mini/13 Pro/13 Pro Max
- Apple iPhone 15 Pro 128GB,Átlagos,Dobozaval,12 hónap garanciával
- ÚJ akksi! GigaAKCIÓ! Lenovo ThinkPad P15 Gen 2 Intel i7-11850H 32GB 512GB Nvidia RTX A3000 1 év gar
- Samsung Gear VR: Note5, S6 (EDGE), S7 (EDGE)
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest
) nyomom meg.
