1. Reklam


    1. joysro
      asur
      serenity
      redsea
      blacksro
      plag
      alaaddin
      modbasvuru

CD-ROM Açma - Kapama Programı


  1. Unforgiven

    Unforgiven rank8

    Kayıt:
    13 Temmuz 2009
    Mesajlar:
    3.594
    Beğenilen Mesajlar:
    0
    Ödül Puanları:
    0
    Yeni bir form oluşturun 2 adet Button ekleyin.

    En başa şunu tanımlayın;

    Kod:
    Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
    Button1_Click olayına şu kodu yazın;

    Kod:
    mciExecute("set cdaudio door open")
    Button2_Click olayına şu kodu yazın;

    Kod:
    mciExecute("set cdaudio door closed")