Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe Liste
Übersicht / Liste Neu
Datei hochladen Suche
Quellcode suchen Download
Dateidownload

Laufwerk...

Uploader:Mitgliedmax06
Datum/Zeit:28.12.2007 12:38:37

Declare Function mciExecute  Lib "winmm.dll" Alias "mciExecute"_
(ByVal lpstrCommand As ZString ptr) As Long

Sub CD_oeffnen()
   mciExecute(@"Set CDaudio door open")
End Sub

Sub CD_schliessen()
   mciExecute(@"Set CDaudio door closed")
End Sub

CD_oeffnen()

sleep