Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Cd player

[es] :: Visual Basic 6 :: Cd player

[ Pregleda: 3651 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Ivan Tanasic
BGD-SRBIJA

Član broj: 220
Poruke: 965
*.111.EUnet.yu

Jabber: Autoexes@jabber.sk
ICQ: 129145438


Profil

icon Cd player24.04.2001. u 21:54 - pre 279 meseci
Kako napraviti cd player u win, nemojte mi samo one fore MCI jer je to zivo s***** , vec vi meni lepo kazite windows API funkcije za upravljanje diskom.
Ivan Tanasic - Autoexes

>cd pub
>more beer
 
Odgovor na temu

jc denton

Član broj: 2358
Poruke: 1705
*.ptt.yu



Profil

icon Re: Cd player17.02.2002. u 04:57 - pre 269 meseci
prvo : MCI kontrola nije uopste zajebancija jer ona koristi bas te API fn koje trazis.

drugo : Ako hoces API funkcije malo vise ces morati da se pomucis da sve isprovaljujes kako treba. Evo nekih u atachmentu pa probaj kako to radi.

trece : da ne bi ginuo mnogo sa API fn predji ti prijatelju na DirectShow i uzivaj - sve je lepo objasnjeno u MSDN-u i nije tesko za koriscenje osim ako nisi koristio objekte nikad u zivotu, ako zapne pitaj ...
fire, walk with me
Prikačeni fajlovi
 
Odgovor na temu

Krsta
Krstić Dejan
Programer & Web Developer
Kruševac

Član broj: 2461
Poruke: 307
*.ptt.yu

Sajt: www.atec.rs


+15 Profil

icon Re: Cd player26.02.2002. u 22:55 - pre 269 meseci
Probaj sa Media Player Active X koji imas standardno
u Win-u, ili instaliraj MP6.4 (za sada se pokazao skoro dobro). Sa Mp3 i ostalim fajlovima radi mada nisam probao sa CDA fajlovima, a
i nije mnogo komplikovano.
 
Odgovor na temu

zeljo

Član broj: 2965
Poruke: 143
195.252.78.*



Profil

icon Re: Cd player21.06.2002. u 02:05 - pre 265 meseci
Evo ti komplet kod :

Private Sub cmdPlay_Click()
MMControl1.Notify = False
MMControl1.Wait = True
MMControl1.Shareable = False
'specify CD Audio type (from CD-ROM drive)
MMControl1.DeviceType = "CDAudio"
MMControl1.Command = "Open"
Image1.Visible = True
End Sub

Private Sub cmdQuit_Click()
'stop CD audio if quit button clicked
MMControl1.Command = "Stop"
End
End Sub

Private Sub Form_Unload(Cancel As Integer)
'always close device when finished
MMControl1.Command = "Close"
End Sub

Private Sub MMControl1_PlayClick(Cancel As Integer)
'hide instruction bitmap before playing CD
Image1.Visible = False
End Sub


A ako si zainteresovan posalji E-Mail pod naznakom ES-Forumi Pomoc poslacu ti komplet sve sa Formom

E-Mial:[email protected]
 
Odgovor na temu

[es] :: Visual Basic 6 :: Cd player

[ Pregleda: 3651 | Odgovora: 3 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.