Wave Dosyası Nasıl Çalınır, Nasıl Exe İçine Gömülür ?

Delphi Wave Dosyası Nasıl Çalınır, Nasıl Exe İçine Gömülür ? Programlama Dilleri hakkında bilgi paylaş; Wave Dosyası Nasıl Çalınır, Nasıl Exe İçine Gömülür ? Bir cok program kucuk wave ...
Cevapla
 
Seçenekler
  #1  
Arama 24-12-2007
Celebrian - ait Kullanıcı Resmi (Avatar)

Üyelik Tarihi: 19/11/07
Mesajlar: 3.877
 
     WS-Ticareti: (0)
Teşekkürleri: 0
27 Msg. 34 Tşkr.
Rep Gücü: 40 Celebrian rep gücü yükselmeye başladı

Wave Dosyası Nasıl Çalınır, Nasıl Exe İçine Gömülür ?

Wave Dosyası Nasıl Çalınır, Nasıl Exe İçine Gömülür ? Bir cok program kucuk wave dosyalarini dagitmaktansa dogrudan programin icinden calmaktadir. Bu islemi Delphi'den yapmak icin:

1. Project|Resources komutu verin.
2. Gelen pencerede sag tiklayip New|User Data komutu verin.
3. Resource Type olarak "WAVE" girin.
4. Istediginiz wav uzantili dosyayi secin.
5. Delphi varsayilan olarak WAVE_1 ismini verecektir. Bunu herhangi bir sayiyla degistirin. (Uzerinde sag tiklaip ReName komutu vererek) Örnegin: 1

Asagida benim kullandigim procedure'lari veriyorum:


Kod:
function PlayWavFromResource(ResID: Integer): Boolean;
begin
Result := PlaySound(PChar('#' + IntToStr(ResID)), HInstance, SND_RESOURCE or SND_ASYNC);
end;

function PlayWavFile(const FileName: string): Boolean;
begin
Result := PlaySound(PChar(FileName), 0, SND_ASYNC);
end;

procedure StopWav;
var buffer: array[0..2] of char;
begin
buffer[0] := #0;
PlaySound(Buffer, 0, SND_PURGE);
end;


PlayWavFromResource procedure'i programin icerisinde gomulu olan wave dosyasini calacaktir. Parametre olark gonderdiginiz deger yukarda ismini degistirdiginiz (WAVE_1 -> 1) degerdir.

Ornegin:


Kod:
procedure TForm1.Button1Click(Sender: TObject);
begin
StopWav;
PlayWavFromResource(1);
end;

Notlar:
- Resource Type olarak sadece WAVE girmeniz gereklidir.
- Cok buyuk Wave dosyalarini exe'nin icine gommek yerine ayri dosya olarak dagitin. Disardaki bir wave dosyasini calmak icin PlayWavFile isimli procedure'i kullanabilirsiniz.
- StopWav isimli procedure o anda sistemde calinan bir ses dosyasi varsa calmayi durduracaktir.
- PlayWavFromResource ve PlayWavFile isimli procedure'lar calma islemini arka planda yapacaktir. Yani programiniz ses dosyasi calarken calismaya devam edebilir.


Not : Alıntıdır.
Alıntı ile Cevapla
Cevapla


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler


Benzer Konular
Konu Konu Açanlar Forum Cevaplar Güncel Mesajlar
Sitemi Google'ın arama sonuçlarına nasıl eklerim?daha fazla sonuçta nasıl çıkarım kadınca SEO Arama Motoru Optimizasyonu 5 4 Hafta önce 03:48
Bilgisayara Virüs Bulaştığı Nasıl Anlaşılır ve Nasıl Temizlenir? MaNeX Webmaster Sözlügü 0 24-02-2008 10:32
Yahoo Messenger Nedir? Nasıl Alınır? Nasıl Kullanılır? kadınca Webmaster Sözlügü 0 24-02-2008 07:52
Bilgisayara Virüs Bulaştığı Nasıl Anlaşılır ve Nasıl Temizlenir? kadınca İşletim Sistemleri 0 18-12-2007 07:42
Bu nasıl ayrılık bu nasıl veda (!) Gözlerin Kal Diyor Dudakların Git! Ra_eM Şiirler 0 07-11-2007 07:42

Link vermek için alttaki kodu sitenize ekleyebilirsiniz.
Veya Ctrl+C ile Kopyalayınız
Örnek görünüm: Webmaster Sitesi