السلام عليكم
كيف جعل البرنامج يقراء ملف mpg من ملف bin
واظهار الصورة فى البرنامج
![[صورة: attachment.php?attachmentid=3273&d=1330154734]](http://www.delphi4arab.net/forum/attachment.php?attachmentid=3273&d=1330154734)
الخلفية فى ملف bin
000001B3
تحياتى لكم
وعليكم السلام ورحمة الله
تحتاج لمعلومتين
1- موضع ملف mpg في ملف الbin
2- حجم ملف الmpg
بعد ذلك يصبح الأمر مجرد نسخ bytes من ملف الى أخر
السلام عليكم
اخى الغالى
بعد التحية والسلام
هذا التطبيق على سوفت وير لجهاز رسيفر ستارسات c1
التطبيق اظهار الخلفية الاقلاع او خلفية الراديو فى السوفت
ملف mpg فى الخلفية تبداء
فى برنامج hex
من الافست
00008080
الى نهاية الخلفية فى الافست
0000bb50
حجم الخلفية
15056bytes
مرفق ملف الخلفية
تحياتى لك
لاستخراج ملف الفيديو
كود :
Var
B:longint;
F:File;
Buff:Array[10..64000] of byte;
begin
AssignFile(F,'mido-sat.bin');
ReSet(F,1);
Seek(F,$00008080);
BlockRead(F,Buff,15056,B);
CloseFile(F);
if B<>0 then Begin
AssignFile(F,'file.mpg');
ReWrite(F,1);
BlockWrite(F,Buff,B,B);
CloseFile(F);
End;
End;
كود :
MediaPlayer1.FileName:='File.mpg';
MediaPlayer1.Open;
MediaPlayer1.Play;
السلام عليكم اخى الغالى
شكرا اخى الغالى على المعاونة
هل ممكن اظهار ملف mpg فى Image1 بدلا من MediaPlayer1
على الطبيق على هذا البرنامج او التعديل على هذا الكود
من هناالكود
تحياتى لك اخى الغالى
ملف MPG هو ملف فيديو يعني يحتوي صور و صوت
لهذا الانسب هو MediaPlayer
بالنسبة للتعديل عدل بنفسك واطرح ما يواحهك من مشاكل/اخطاء هنا
السلام عليكم
ملف MPG داخل السوفت وير هى عبارة عن صورة بامتداد bmp
وتم تحويل الصورة الى mpg
لا يوجد صوت ولا فيديو متحرك فى هذا الملف
صورة ثابتة فقط
تحياتى لك