دوست عزيز
چون سوالات شما به طور خاص در ارتباط با نرم افزار مالتي مديا بيلدر هست توصيه ميكنم سوالاتتون رو تو تالار مربوط به اين نرم افزار مطرح كنيد.
http://forum.majidonline.com/forumdisplay.php?f=83
اما در مورد سوالتون عرض ميكنم چون فعلا دسترسي به mmb ندارم متاسفانه نميتونم مثال آماده كنم. اما ميتونم راهنمايي كنم.
شما براي اينكه بتونيد متني رو تو شي متني مثل Text يا EditBox يا Pragraph نمايش بديد بايد از دستورات DisplayValue يا LoadText استفاده كنيد.
اما براي اينكه نوشته شما تو EditBox ذخيره بشه و دفعه بعد در زمان اجرا مجددا تو كادر EditBox نمايش داده بشه بايد فرايند زير رو طي كنيد:
شما ميتونيد مقدار درج شده در كادر EditBox رو كه به طور پيشفرض تو يك متغير رشته اي ذخيره ميشه به وسيله توابع رشته اي تو يك فايل متني يا ديتابيسي كه كنار برنامه شما قرارداره ذخيره كنيد.
اگه حجم كارتون كمه پيشنهاد ميكنم با همون فايل متني كار كنيد. دردسرش از كار با پلاگين ديتابيس كمتره.
براي اينكه متن موجود تو EditBox رو به فايل متني ارسال كنيد از اين كد استفاده كنيد.
کد:
path$='X:\myfile.txt'
retval=StrToFile(path$,EditBox$,TRUE,TRUE)
بعد از اينكه متن شما تو فايل ذخيره شد. دفعه بعد شما بايد اول تو Page Start متني كه تو فايلتون ذخيره شده بود رو فراخواني كنيد و بعد با دستور LoadText تو شي EditBox نمايش بديد. از اين كد ميتونيد استفاده كنيد:
کد:
path$='X:\myfile.txt'
[COLOR="Green"]** x = your text line number in file and 1 = number of line[/COLOR]
str$=StrFromFile(path$,x,1)
LoadText("EditBox","str$")