مشكلة في اللغة مع (Input)

[أبو زكريا]

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

أسعد الله أوقاتكم

بخصوص برنامج (autoplay)
لدي مشكلة في ظهور النص في صندوق النص (input) وغيره وذلك إذا وضعت فيه نصاً عن طريق الكود حيث يظهر النص مشوهاً .

بالرغم من تحديد اللغة في خصائص العنصار إلى اللغة العربية .

ما هو الحل يا ترى ؟

أريد جواباً عاجلاً

وشكراً لكل من مر هاهنا

[ثامر أبو بلقيس]

وعليكم السلام ورحمة الله وبركاته

اذ قصدت ظهور الكتابة بالعربية مشوهة في محرر الأكواد للعناصر

نقوم بالاتي : في محرر الأكواد في الأسفل تجد الاختيار :
advanced

بعد الضغط عليه نتبع :
هذه editor settings ثم change ثم script ثم arabic
و أخيرا ok

اذ لم يكن كذلك وضح أكثر :abc_138:

[أبو زكريا]

شكراً لك أخي ثامر
ليس هذا قصدي

وقد نسيت أن أخبركم أن المشكلة تظهر عندما استدعي نصاً من عنصر (RichText) وأضعه عن طريق الكود في عنصر مثل (Input) يظهر مشوه مع العلم أن جميع إعدادات العناصر ومنها () على اللغة العربية حتى محرر الأكواد

وهذه الصور
http://store1.up-00.com/2015-11/1446890001251.jpg (http://www.up-00.com/)[/URL]

http://store2.up-00.com/2015-11/1446889621721.png (http://www.up-00.com/)[URL="http://www.up-00.com/"]

[ثامر أبو بلقيس]

مشكلتك في هذا السطر :
RichText.GetText("RichText1", false);

خليه false

[ثامر أبو بلقيس]

اذ كان غير ذلك وضح :abc_138:

[ثامر أبو بلقيس]

لاحظت الان الصورة عفوا عما سبق من حلول
هناا عد إلى موضوع استخلاص الاسطر العربية من عنصر RichText

[أبو زكريا]

مشكلتك في هذا السطر :
RichText.GetText("RichText1", false);

خليه false

أخي الغالي عدلت كما قلت ونفس النتيجة
سواء هذا :
Input.SetText("Input1", RichText.GetLine("RichText1", 1))

أو هذا :
Input.SetText("Input1", RichText.GetText("RichText1", false))

[ثامر أبو بلقيس]

السلام عليكم ورحمة الله وبركاته

لاحظ معي لديك RichText فيها أسطر مكتوبة باللغة العربية

تريد أن تستخلص سطرا معينا إلى اينبوت

في الزر المسؤول على تنفيذ العملية أكتب :
my_table = {};
result = String.Replace(RichText.GetText("RichText1", false), " ", "ثامر2014", true);
for token in string.gmatch(result, "[^%s]+") do
e = #token/#token
Table.Insert(my_table, e, token);
e=e+1
belkiss =1+#(my_table)
end
------------- الرقم 1 هو دال مباشرة على السطر الاول غيره برقم السطر الذي تريد ----
FF=my_table[belkiss-1]
X = String.Replace(FF, "ثامر2014", " ", true);
---------------------------------------------------------------------------------
Input.SetText("Input1", X);


لا تغير أي شيء ما عدا في السطر
FF=my_table[belkiss-1]

لاحظ رقم واحد المكتوب بعد مفردة belkiss ذلك الرقم هو رقم السطر الذي تريده أن يظهر في الانبوت
اذ كنت تريد مثلا السطر الثالث قم بتغيير 1 في هذا السطر الى 3

وهكذا .... موفق :abc_138:

[أبو زكريا]

سأجرب وأخبرك إن شاء الله

ولك فائق الشكر على تجاوبك السريع معي

[ثامر أبو بلقيس]

اقرأ هذا الموضوع
http://www.abc4web.net/vb/showpost.php?p=270510&postcount=1

بالتوفيق :abc_138:

[أبو زكريا]

نعم أخي الغالي جزاك الله خيراً

انحلت المشكلة

ولكن عذراً
أريد أن أفهم الكود
إذا أمكن أن تشرح الكود

[ثامر أبو بلقيس]

مشكلتي لا أجيد الشرح واذ توفرت فرصة الوقت فلن أبخل إن شاء الله :abc_138:

[عبد الهادي بهاب]

my_table = {};
result = String.Replace(RichText.GetText("RichText1", false), " ", "ثامر2014", true);
for token in string.gmatch(result, "[^%s]+") do
e = #token/#token
Table.Insert(my_table, e, token);
e=e+1
belkiss =1+#(my_table)
end
------------- الرقم 1 هو دال مباشرة على السطر الاول غيره برقم السطر الذي تريد ----
FF=my_table[belkiss-1]
X = String.Replace(FF, "ثامر2014", " ", true);
---------------------------------------------------------------------------------
Input.SetText("Input1", X);

ا .... موفق :abc_138:

كما فهمت بشكل مختصر .......... سنحول محتوى نص richtext الى مصفوفة my_table بحيث كل سطر سيمثل عنصرا سميناه token بفراغاته التي عوضناها بنص ثامر2014 .... ثم نستدعي العنصر الاول من المصفوفة [belkiss-1 بعد تعويض ثامر 2014 الى فراغ من جديد

[عبد الهادي بهاب]

فيه حل اخر لو سمحتم ..... وهو بدخال وسيط ملف txt نسجل فيه محتوى richtext ثم نحوله الى مصفوفة و نستدعي السطر الاول فقط

في زر استدعاء نص السطر الاول نزرع هذا اكود

t = RichText.GetText("RichText1", false);
TextFile.WriteFromString("C:\\MyFile.txt", t, false);
r = TextFile.ReadToTable("C:\\MyFile.txt");
for i,n in pairs(r) do
Input.SetText("Input1", r[1]);
end

[الأمل القادم]

t = RichText.GetText("RichText1", false);
TextFile.WriteFromString("C:\\MyFile.txt", t, false);
r = TextFile.ReadToTable("C:\\MyFile.txt");
Input.SetText("Input1", r[1]);