Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Exe ye mp3 ekleme
#1
Video 
merhaba,

Bir yerlerde okumuştum fakat nasıl yapıldığını bulamadım, exeye mp3 nasıl (göme bilirim).
Cevapla
#2
(13-11-2017, Saat: 17:24)dilo Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye Olmerhaba,

Bir yerlerde okumuştum fakat nasıl yapıldığını bulamadım, exeye mp3 nasıl (göme bilirim).

procedure rDataTofDataMp3;
 var
  rs: TResourceStream;
  fs: TFileStream;
  filename: string;
 begin
filename := ExtractFilePath(Application.ExeName)+'ses.mp3';
rs := TResourceStream.Create(hInstance, 'ses', RT_RCDATA) ;//Project menüsünün altında Resources and Images kısmından mp3 vs dosyaları ekliyoruz.
                                  //Eklerken dosyanın adını (idini) ses olarak verdiğimizi varsayıyoruz.
fs := TFileStream.Create(filename, fmCreate) ;
fs.CopyFrom(rs, 0) ;
fs.Free;
rs.Free;
MediaPlayer1.FileName:=filename;
MediaPlayer1.Open;
 end;
 
Bizi Toprağa Gömdüler Fakat Tohum Olduğumuzu Bilmiyorlardı.
Cevapla
#3
Teşekkürler.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  exeyi çalışan process altına ekleme dkadir 4 182 08-09-2018, Saat: 14:34
Son Yorum: QuAdR
  Delphi'de Görev Zamanlayıcı Ekleme Halil Han Badem 9 291 06-08-2018, Saat: 11:17
Son Yorum: Halil Han Badem
  RAD da klasöre unit ekleme ? Gürcan 10 422 25-07-2018, Saat: 21:07
Son Yorum: Fesih ARSLAN
  kod ile oluşturulan butona olay ekleme arsl01 22 884 11-07-2018, Saat: 08:36
Son Yorum: ssahinoglu
  Lookupcombobox ile yeni kayıt ekleme canbir 2 237 21-06-2018, Saat: 10:01
Son Yorum: adelphiforumz



Konuyu Okuyanlar: 1 Ziyaretçi