الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

تشغيل ملف الفلاش ضمن الفيجوال بيزك مع الكود

مغلق
بدأه موفق جمال زكريا في 20 نوفمبر 2002 · 10 رد · 2,973 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

أخوتي سأشرح كيفية تشغيل ملفات الفلاش ضمن ملف الفيجوال بيزك :

1- أضف الأداة ShockwaveFlash

وإذا لم تكن موجودة أنزلها من الإنترنت ..

إدخل إلى موقع www.google.com وابحث عن ShockwaveFlash1 zip exe

وحمل الأدة ...

والأداة موجودة في نظم التشغيل الحديثة ملينيوم والxp

2- أكتب الكود التالي عند تحميل الفورم في الفجوال :

With Form1

.BorderStyle = 0

.Left = 0

.Top = 0

.Width = 12000

.Height = 9000

End With

With ShockwaveFlash1

.Movie = "c:a.swf" ' مسار الملف

.Play

.Left = 0

.Top = 0

.Width = 12000

.Height = 9000

.Menu = False 'لإظهار القائمة أم لا

.Loop = True 'هذه لخيار الإعداة

End With

***********

***********

أخوكم موفق

أنا جاهز لأي استفسار حول هذه المواضيع ومواضع الملتميديا في الفيجوال بيزك والفلاش .

**********

**********(f) (f) (f)

#2

[gl]IT's really wonderful!! thank you very much [/gl]

#3

الطريقة في كيفية التحكم واستخدام ازرار الفلاش في الفيجول بيسك

السلام عليكم :D

[gl]انتظروا هدا الدرس قريبا[/gl]

تحياتي SDC

#4

السلام عليكم ..

مشكور اخوي على هالمعلومة ..

انا عندي استفسار ..

اذا كنت ابغى تشغيل ملف فيديو في الفيجول بيسك كيف الطريقة ؟

وكذلك اذا كنت ابغى اضيف صورة عن طريق الفيجول بيسك الى قاعدة البيانات وبعدين استرجعها من قاعدة البيانات واعرضها ..كيف الطريقه؟

وكل الشكر لك اخوي..

تحياتي :)..

#5

أخي العزيز :

يوجد طرق ثيرة لتشغيل الفيديو وأسهلها باستخدام الأدوات :

ويوجد أداة ميديا بلير

إضفها لمشروعك في الفيجوال عن طريق ضغطك للمفاتيح ctrl+t

ثم اختر الأداة microsoft Media Player

ثم أكتب الكود التالي داخل زر :

Private Sub Command1_Click()

MediaPlayer1.FileName = "مسار ملف الفديو أو ملف الصوت"

MediaPlayer1.Play

End Sub

ملاحظة الأداة تشغل أكثر من نوع ميديا مثلا

( wav,mp3,avi,mpge,dat,mid,mov )

ولكن لاتشغل ملفات الريل بلير

وإذا أردت تشغيل ملف الريل فيجب استخدام أداة الريل بلير ........

#6

الله يجزاك ألف خير أخوي

تسلم وتحياتي لك

#7

يا شباب عندي سوال الحين كيف اخلي الفلاش داخل المشروع ويكون المسار داخل المشروع

#8

أخي لتشغيل الفلاش من ضمن المسار : أكتب

dim path,file

path=app.path & "" 

file=path & "c.swf"

حتى يصبح الكود بالشكل النهائي هكذا :

With Form1

.BorderStyle = 0

.Left = 0

.Top = 0

.Width = 12000

.Height = 9000

End With

dim path,file

path=app.path & " 

file=path & "c.swf"

With ShockwaveFlash1

.Movie = file ' مسار الملف

.Play

.Left = 0

.Top = 0

.Width = 12000

.Height = 9000

.Menu = False 'لإظهار القائمة أم لا

.Loop = True 'هذه لخيار الإعداة

End With

#9

مشكور لكن هذا مش قصدي

انا اريد ألغي المسار بحيث لما احول البرنامج الى ملف تطبيق وغير مكن الفلاش يشتغل البرنامج مثل لما اضع الاصوات داخل المشروع ويكن مسار الصوت في المشروع داخل ارجور انك فهمت قصدي:(

#10

جزاك الله خيرا ، علما أني لم أفكر بهذا

إلا أني اشكر لك جهودك

فاستمر إلى الأمام ،فمثلك من نريد ولا نزكي على الله أحدا

#11

السلام عليكم:

أشكرك يا خي موفق على هذا الكود ولكن انا أنهبلت

أعذرني انا مبتدئ بس سؤال؟

الكود السابق هل أضيفه كامل في form_load ما فهمت للأسف

انا أضفت الكود في الفورم لود أوكيه ووضعت ملف الفلاش في السي كي لا

أغير الكود أوكيه وغيرت أسمه إلى a أوكيه

ولكن للأسف مو راضي يشتغل شيء أرجووووووووك فهمني

وآسف على الإزعاج

تحياتي مقرررررررررررررررررررررش911

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…