کمک برای نوشتن اسکریپت برای جاگذاری نصویر

[mehdi_mmy]

سلام

من میخوام یه برنامه اماده کنم که وقتی روی مربع های مختلف کلیک میکنم تو یه هات اسپات عکس مورد نظرم نمایش داده بشه

ولی چون تعداد تصاویر زیاده یه مقدار سخته برای هر مربع یه ReplaceImage بدم

میخوام یه اسکریپت داشته باشم که مثلا هر مربع که کلیک شد اسم اون مربع هرچی بود مطابق اون عکس هم اسم خودش رو ریپلیس کنه

مثلا روی مربع شماره 3 که کلیک کردم اسکریپت مورد نظر تصویر شماره 3 رو از حافظه در هات اسپات نمایش بده

از دوستان کسی هست راهنمایی کنه؟

یه فایل اپلود کردم یه نمونه خیلی کویچک هستش تقریبا مثل این ولی این کد نداره دستی درست کردم

http://s5.picofile.com/file/8150385384/0.exe.html

 

[MahmoodM30]

یک راهش این هست که شما یه اسکریپت بسازید و داخلش کد زیر رو بنویسید

ImageName$='<Embedded>\\'+ImageNameT$
ReplaceImage("HotSpot","ImageName$"

بعدش قسمت کد نویسی هر Rectangle هم کد زیر رو

ImageNameT$='1.jpg'
RunScript("Script")

تو هر کدوم نام عکس باید فرق کنه

اینطوری باز کد نویسی کمتره

 

[mehdi_mmy]

دوست عزیز واقعا ممنون که جواب دادی ولی یه مطلبی

نمیشه کد طولانی تر باشه ولی فقط داخل اسکریپت باشه

اخه اگر بخوام تو هر رگتنگل یه کد بنویسم همونجا هم میشه ریپلیس کنم ولی میخوام این کارو نکنم و فقط تمام کد در داخل اسکریپت باشه

اصلا شدنی هستش یا نه؟

راه دیگه ای نیست؟

مثلا نمیشه بجای اون ایمیج نیم که داخل رگتنگل نوشته میشه رو از لیبل خود رگتنگل استفاده بشه؟

 

[MahmoodM30]

دقیق متوجه نمیشم چیکار میخوایید بکنید
اگه استفاده بشه هم که فرقی نداره که بالاخره نام و رو باید بنویسید و کد رو اجرا کنید دیگه

 

[mehdi_mmy]

متوجه هستم که بازم بالاخره باید یه کاری انجام بشه

ببینید من باید برای هر رگتنگل یه اسم خاص مشخص کنم

میخوام ببینم میشه تو اسکریپت کد رو طوری بنویسیم که اسم رگتنگل ( لیبلش ) هرچی بود مثلا 3 بعد همون 3 رو خود اسکریپت بخونه و عکس شماره 3 رو باز کنه

دیگه تو قسمت کد رگتنگل فقط اسکریپت رو ران کنم نه کد دیگه ای


بازم ممنون که وقت میذاری

 

[MahmoodM30]

با این کد میتونید اسم رو بدست بیارید

ImageNameT$=CurrentObject()

و نامی رو ننویسید ولی باز باید اون اسکریپت رو اجرا کنید. یادتونم باشه که باید فرمت فایل jpg رو هم بهش اضافه کنید

ImageName$='<Embedded>\\'+ImageNameT$ + '.jpg'
ReplaceImage("HotSpot","ImageName$"

یا اسم آبجکت رو همون فرمتشم اضافه کنید