أيقاف عرض ملف الفلاش عن طريق الفيجول

المثال المرفق

erre.rar

يا اخي الكريم الصوت لايتوقف يتوقف فقط العرض

ارجو اجابة

ارجو ان ترد من فضلك

السلام عليكم

الكود التالي انا لم أجربه و لكني أتمنى ان ينجح معكم( انا في مقهى الانترنت الان و لا يوجد vb بالجهاز )

rem stop the loop
sf.loop=false
rem find the number of frames in the flash movie
dim x as integer
x=sf.totalframes
rem go to the final frame
sf.gotoframe =x

السلام عليكم

الكود التالي انا لم أجربه و لكني أتمنى ان ينجح معكم( انا في مقهى الانترنت الان و لا يوجد vb بالجهاز )

rem stop the loop
sf.loop=false
rem find the number of frames in the flash movie
dim x as integer
x=sf.totalframes
rem go to the final frame
sf.gotoframe (x)

والله يا اخي الكريم يظهر لي خطا

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

أنا استخدم هذا الأمر.....

ShockwaveFlash1.Movie =0

والله يا اخي انتا شغلة

عندما ضغط على الزر اوقف عرض الفلاش وكذلك الموسيقا شكراً لك

طيب نطلع من مشكلة ندخل بمشكلة اخرى والعمل....؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

اذا كبسنا على الزر الاول يوقف عرض الفلاش مع الصوت تمام

اذا كبسنا على الزر الثاني ويوجد به السطر التالي

(ShockwaveFlash1.GotoFrame (0

ShockwaveFlash1.Play

من اجل تشغيله مقطع الفلاش من جديد لا يعمل

طيب ما العمل

انا اعرف اني كثرت عليكم الاسئلة ولكن هيك بدو المشروع وكلما اطلع من شغلة افوت بشغلة والوقت قصير

لو فرضاً،،،،،،،،، عندي ملف فلاش اسمه (main) في مجلد البرنامج وفي الفورم زرين:

1- تشغيل...... يكون فيه الكود هذا

Flash.Movie = App.Path & "\main.swf"

2- زر إيقاف:

Flash.Movie =0

وإذا ا حتجت لزر ( التالي) و( السابق) اضعهم في ملف الفلاش نفسه........

أنا استخدم هذه الطريقة وتنفع معي ، ولا أعلم إن كان هناك طريقة أصح.......

مشى الحال والله يوفقك

طيب اريد ان انفذ امر ما من فورم اخر

يعني انا في الفورم الاول نقرت على الزر ذهب الى الفورم الثاني

وانا في الفورم الثاني اريد ان انفذ امر في الفورم الاول

اعتقد وصلت الفكرة

الحمدلله ..........

اعتقد بكاتب اسم الفورم قبل الكود...........

مثلاً أنت في فورم 2........... وكتبت هذا الأمر form1.text1.text="main" فإنه سيكتب كلمة (main) في مربع النص في الفورم الأولى

عندي فورمين

الفورم الاول يحوي زر

الفورم الثاني يحوي ادة فلاش

عند النقر على الزر يعمل مقطع الفلاش

اعتقد مفهومة

ضع ............... في الزر

form1.hide

form2.show

form2.ShockwaveFlash1.move=app.path & "\main.swf"