SES Kartı VARmı AÇaba

RaKiPSiZFoRuM.CoM | Rakipsiz Paylaşım Platformu | Rakipsiz Forumun Rakipsiz Adresi » »Bilgisayar Ve İnternet Rehberi« » İşletim Sistemleri (Moderatör: SuBHaN_)

SES Kartı VARmı AÇaba

Ayrıntılı Konu Bilgileri
Konu BaşlığıKonu: SES Kartı VARmı AÇaba	Cevap SayısıCevap Sayısı: 0 cevap var
Okunma SayısıOkunma Sayısı 54 defa	Konuyu GörüntüleyenlerHÜSEYİN1 ve 2 Ziyaretçi konuyu incelemekte.

Sayfa: [1] Aşağı git

« önceki sonraki »

	Gönderen	Konu: SES Kartı VARmı AÇaba (Okunma Sayısı 54 defa)
HÜSEYİN1 ve 2 Ziyaretçi konuyu incelemekte.

« : Ocak 17, 2008, 11:22:26 ÖS »

Üye Profili

Yönetici

Konu Sayısı:1185
Mesaj Sayısı: 7444

Cinsiyet: Bay

Nerden: __Dj KAbiNi__

Rep Puanı: 268

Durumum:

SES Kartı VARmı AÇaba

Şimdi bir çok programda bir olay gerçekleştiğinde küçük sesler duyuluyor. Eğer sizde böyle bir şey yapmak için sisteminizde ses kartı olup olmadığını öğrenmek istiyorsanız aşağıdaki kodu kullanabilirsiniz. Denemek için aşağıdaki kodu bir Modulenin içine kopyalayın.:

Declare Function waveOutGetNumDevs Lib "winmm.dll" Alias "waveOutGetNumDevs" () As Long

Bu kodu da formunuzun Form_Load olayı altına kopyalayın:
Dim i As Integer
i = waveOutGetNumDevs()
If i > 0 Then
MsgBox "Your system supports a sound card.", vbInformation, "Sound Test"
Else
MsgBox "Your system cannot play Sound Blaster Files.", vbInformation, "Sound Test"
End If

Şimdi F5 tuşuna basarak kodu deneyebilirsiniz.


	Logged

Sayfa: [1] Yukarı git

« önceki sonraki »

Gitmek istediğiniz yer:

Benzer Konular
	Konu Başlığı	Başlatan	Yanıtlar	Görüntülenme	Son Mesaj
	Sizce bu adamda akıl varmı?????? İlginç Resimler	__MoShE__	6	98	Haziran 15, 2007, 02:48:54 ÖS Gönderen: //runaway
	Bilen Varmı Bunu?? Müzik Dünyasnıdan Gelişmeler	Deadmau5	0	27	Ekim 11, 2007, 03:25:40 ÖÖ Gönderen: Deadmau5
	GüLmek İsdeyen varmı?: Komik Resimler	MadStorm02	1	28	Aralık 03, 2007, 09:03:07 ÖÖ Gönderen: badem02
	kurba turşusu yiyen varmı :) Komik Resimler	SuBHaN_	0	27	Şubat 11, 2008, 05:32:13 ÖS Gönderen: SuBHaN_
	Ne dersiniz; o gün bu gün mü acaba? Her Telden	iNTeRKaN	0	46	Mart 12, 2008, 03:30:47 ÖS Gönderen: iNTeRKaN