السلام عليكم
اخى الغالى
بعد التحية والسلام
هذا التطبيق على سوفت وير لجهاز رسيفر ستارسات 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;
للعرض ضف مكون TmediaPlayer وغير الخاصية Display الى Panel1 ثم أكتب بنهاية الكود الشابق شيئ مثل
شكرا اخى الغالى على المعاونة
هل ممكن اظهار ملف mpg فى Image1 بدلا من MediaPlayer1
على الطبيق على هذا البرنامج او التعديل على هذا الكود من هناالكود
تحياتى لك اخى الغالى