»» پرسش و پاسخ: ترفندهاي مالتي مديا بيلدر

[bimo]

بهترين راهش اينه كه فايلاتو به فلش تبديل كني كه هم جاي كمتري بگيره هم راحت تر اجرا بشن
ولي در هر صورت مي توني اين كارو بكني:
از منوي (Object=>Create=>Video) يه ويديو وارد مي كني بعد تو قسمت اسكريپت صفخه اول و در Page Start مي نويسي:
VideoLoad("Video","<Embedded>\MyVideo.avi")
VideoPlay("Video")

[bimo]

اين نكته ها رو هم بايد در نظر داشته باشيد:
1. اگر فايل شما .DAT است (يعني ويديو سي دي) نمي توانيد آنرا در مالتي مديا بيلدر اجرا نماييد.
2.به جاي <Embedded>\MyVideo.avi مسيري كه فايل ويديويي در آن مي باشد را بايد وارد نماييد و اگر فاي را در خود مالتي مديا ذخيره نموده ايد فقط به جاي MyVideo.avi نام فايل خود را بنويسيد.
3.همانطور كه قبلاً هم گفتم دستورات خوب نافتاده اند اگر كپي كنيد درست مي شوند.


اگر سوال ديگري داريد بپرسيد.

[tondar2069]

با سلام خدمت همه.
یه سوال داشتم و اونم اینه که چطور میشه در مولتی مدیا یک کلید طراحی کرد که بتوان توسط اون در یک متن از قبل طراحی شده جستجو کرد.
با تشکر

[kamal114]

ممنون
اگر تعداد ویدئو ها زیاد باشد مثلا 15 تا چطور باید عمل کنم

[bimo]

1.

با سلام خدمت همه.
یه سوال داشتم و اونم اینه که چطور میشه در مولتی مدیا یک کلید طراحی کرد که بتوان توسط اون در یک متن از قبل طراحی شده جستجو کرد.
با تشکر

اگه ميشه بگين كه نوشته تو برنامه اي كه ساختين وجود داره يا نوشته در يك فايل جداست؟
چون براي هر كدومش راه خاص خودشو داره.

2.

اگر تعداد ویدئو ها زیاد باشد مثلا 15 تا چطور باید عمل کنم

دو راه داره يا بذاري يكي يكي اجرا بشن يا اونارو به يه فايل ديگه مثل GIF تبديل مي كني كه بشه همزمان اجراشون كرد.

[tondar2069]

با سلام خدمت bimo جان
برنامه ساخته شده همه در یک فایل می باشد و دارای نوشته های زیادی می باشد.
البته اگه هر دو رو هم توضیح دادین که خیلی بهتر اگر هم نخواستین فقط همون رو توضیح بدین
با تشکر

[tondar2069]

پس چی شد

یعنی کسی جواب این سوال رو بلد نیست
آقای bimo اگر بلدی لطفا توضیح بدین
با تشکر

[bimo]

اولين كاري كه بايد انجام بدين اينه كه تمام اون نوشته رو به صورت Uppercase يا Lowercase در مي آوريد به اين صورت:
مثلاَ نوشته شما اين مي باشد: This wonderful sky is blue.
شما از اين دستور استفاده مي كنيد: (براي Lowercase كردن)
S$='This wonderful sky is blue.'
SLow$=LOW(S$)
سپس آن كلمه اي را كه مي خواهيد را نيز به همين روش Lowercase مي كنيد:
SubStr$=EditBox$
SubStrLow$=LOW(SubStr$)
و بعد از اين كار از اين ها استفاده مي كنيد:
PosStr=POS(SubStrLow$,SLow$)
If (PosStr=0) Then
Message("There is no word ","SubStr$")
Else
PosStr$=CHAR(PosStr)
MsgStr$= 'Word ' + SubStr$ + ' was found at position'
Message("MsgStr$","PosStr")
End

[bimo]

1. البته بخشيد يه خورده قرو قاطي افتاده اگه كپي كنيد درست ميشه.
2. براي Uppercase كردن به جاي LOW از UPP استفاده كنيد.
3. آموزش سرچ در فايل هاي ديگر را هم بعداَ مي گذارم.
4. اگه سوال ديگري داشتين بپرسين.

[sopack]

این چه ربطی به ترفندهای مالتی مدیا بیلدر داشت؟!!!