raina123
سه شنبه 07 آبان 1392, 13:34 عصر
سلام
من یه برنامه دارم که می خوام توش فایل بزارم ولی هر چی می زارم چه موزیک و چه فونت . فایل رو در آدرس قرار میده ولی اگه بخوام موزیک رو پخش کنم یا فونت رو باز کنم ارور میده . البته فایل های wav رو درست دیکد می کنه ولی اگه همون هم حجمش زیاد باشه کیفیتش خراب میشه
من از این کد برای دیکد کردن استفاده می کنم .
Dim SoundBuffer As String
Buffer = StrConv(LoadResData(101, "CUSTOM"), vbUnicode)
Open "d:\ddd.wav" For Output As #1
Print #1, Buffer
Close #1
ممنون میشم بگید مشکل از کجا هستش . اگر هم خواستید سورس رو قرار بدم
من یه برنامه دارم که می خوام توش فایل بزارم ولی هر چی می زارم چه موزیک و چه فونت . فایل رو در آدرس قرار میده ولی اگه بخوام موزیک رو پخش کنم یا فونت رو باز کنم ارور میده . البته فایل های wav رو درست دیکد می کنه ولی اگه همون هم حجمش زیاد باشه کیفیتش خراب میشه
من از این کد برای دیکد کردن استفاده می کنم .
Dim SoundBuffer As String
Buffer = StrConv(LoadResData(101, "CUSTOM"), vbUnicode)
Open "d:\ddd.wav" For Output As #1
Print #1, Buffer
Close #1
ممنون میشم بگید مشکل از کجا هستش . اگر هم خواستید سورس رو قرار بدم