مشكل با لود كردن فايل ويدئويي

[alizadeh.6725]

من مي خوام يك صهحه درست كنم كه توش 5 فايل ويدئويي باشه بعد با كليد كردن رو هركدوم فيلم شروع به بخش كنم مشكل من اينجاست كه نمي دونم چطوري اين فيلم ها مي شه لود كرد
و تو قسمت شي ويدئويي چه ادرسي را بايد بهش دا د خواهش مي كنم كمكم كنين

 

[aff - SEvEN]

من مي خوام يك صهحه درست كنم كه توش 5 فايل ويدئويي باشه بعد با كليد كردن رو هركدوم فيلم شروع به بخش كنم مشكل من اينجاست كه نمي دونم چطوري اين فيلم ها مي شه لود كرد
و تو قسمت شي ويدئويي چه ادرسي را بايد بهش دا د خواهش مي كنم كمكم كنين

سلام ...

آخي اي که خيلي راحته ...

اي هم يه مثال باسه لود کردنه فايلاي ويدئويي ... 5 تا يا حتي 20 تا ...

بايستي تو اسکريپته هر Buton بجاي :

VideoLoad("Video","<SrcDir>\")

اي رو مثلا بدين :

VideoLoad("Video","C:\Documents and Settings\Shadi\Desktop\Movie.wmv")

مثالش تو پيوست هستش ...

 

[alizadeh.6725]

متشكرم فهميدم

 

[alizadeh.6725]

**Where To place the videowindow: Upper left
**corner of x and y position + video width and height
**This fits nice for 800X600 screen:
vx=82
vy=40
vw=628
vh=454
**Compose path to the videofile, i.e subdirectory
** \movie from your <SrcDir> (EXE location)
**Put YOUR path/filename in below !
path$='<SrcDir>\shadi.wmv'
**Close eventually opened files:
MCICommand("close all")
**Open the file:
Open$='open "' + path$ + '" alias VIDEO style child parent <This>'
MCICommand("Open$")
**And put the video in the specified location
put$='put VIDEO window at '
putjob$=put$ + CHAR(vx) + ' ' + CHAR(vy) + ' ' + CHAR(vw) + ' ' + CHAR(vh)
MCICommand("putjob$")
**Set the time-format To milliseconds:
MCICommand("set VIDEO time format ms")
**Check the length of the video
MCICommand("status VIDEO length")
length=MCIResult
**Start playback
MCICommand("Play VIDEO")

 

[alizadeh.6725]

aff - SEvEN نگاه كن
شما يه كدايي دادي كه همون كدا بالا ه كه نوشتم حالا من مي خوام بهش كد سيكبار + فول اسكرين اضافه كنم چه كنم

 

[silvercover]

جناب alizadeh.6725 استفاده از دستورات MCI در MMB رو با توجه به امکانات جدیدش توصیه نمیکنم. چون لقمه رو دور سر خودتون می چرخونین. توابع ویدوئی MMB به اندازه کافی جامع هستن که نیاز شما رو بر اورده کنن. برای ساخت سیک بار هم به ساده ترین شکل ممکن میتونین به اینجا سر بزنین :


سیک بار به سادگی- کلیک کنید

 

[aff - SEvEN]

aff - SEvEN نگاه كن
شما يه كدايي دادي كه همون كدا بالا ه كه نوشتم حالا من مي خوام بهش كد سيكبار + فول اسكرين اضافه كنم چه كنم

اوهوند ... حرفاي آقا مدير درست ولي مي تائيدشون نمي کنم از نظره تکنيکي

خب اي هم از فول اسکرين + اسکرولره ويدئو باسه شما

کمي بيشتر بايد روي پروژه هاتون تمرکز کنيد آقاي عزيز ...

شادي

 

[silvercover]

اوهوند ... حرفاي آقا مدير درست ولي مي تائيدشون نمي کنم از نظره تکنيکي

چرا؟

 

[alizadeh.6725]

نگاه كنين
من تو اون كداي بالا مي خوام اضافه كنم مي دوني چرا چون يه پروژه درست كردم حدود 30 فايل ويدئويي داره همش با اون كدا بلا حالا اگه بخوام دست بزنم بايد كل پروژه را دوباره درست كنم. حالا چه كنم