[HTML]if Browse == nil then
Browse = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "Txt Files (*.txt)|*.txt|", "", "txt", false, false);
text = TextFile.ReadToTable(Browse[1]);
end
Questions = {}
for i = 1,#text do
Table.Insert(Questions, i, i);
end
function Rando(My_Table)
local c = #My_Table
while c >= 2 do
local s = math.random(c)
My_Table[c], My_Table[s] = My_Table[s], My_Table[c]
c = c - 1
end
return My_Table
end
Rando (Questions)
for k, v in ipairs (Questions) do
Dialog.Message("Notice", text[v], MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end [/HTML]
هذا الكود يحل المعضلة
تحياتى للأستاذ صاحب الفضل الذى رفض ذكر إسمه
كل عام و أنتم جميعا بخير
[html]if browse == nil then
browse = dialog.filebrowse(true, "locate file", _desktopfolder, "txt files (*.txt)|*.txt|", "", "txt", false, false);
text = textfile.readtotable(browse[1]);
end
questions = {}
for i = 1,#text do
table.insert(questions, i, i);
end
function rando(my_table)
local c = #my_table
while c >= 2 do
local s = math.random(c)
my_table[c], my_table[s] = my_table[s], my_table[c]
c = c - 1
end
return my_table
end
rando (questions)
for k, v in ipairs (questions) do
dialog.message("notice", text[v], mb_ok, mb_iconinformation, mb_defbutton1);
end [/html]
هذا الكود يحل المعضلة
تحياتى للأستاذ صاحب الفضل الذى رفض ذكر إسمه
كل عام و أنتم جميعا بخير
شوف يا غالى
نحن نحتاج شرح واضح
أين اضع هذا الكود
أين اخزن الاسئلة؟ فى الكود لا ملف نصى داخل التجميعة؟
لانى الى الان لم اتلقى منك رداا موضحا ومباشرا
يا ريت تقدم اما شرحا مصورا بالصور او شرح فلاشى او فيديو وحتى لو بدون صوت مش مشكلة
المهم نفهم كيف نستخدم هذا الكود فى عمل سؤال " اكتب الاجابة" بحيث فى كل ضغطة على زر اسمه " التالى" يتولد سؤال اخر
الإجابة وصلتك بس انت شكلك ملكش علاقة بالبرمجة من الأساس
اتكلم عن نفسك و بس
الكل استفاد
مش عيب انك مبتدئ
العيب انك تصر على عدم التعلم و عايز اللى يديك رغيف يفتح لك بقك و يوكلهولك
عموما اى كود المفروض تجربه فى زورار و لما ميشتغلش تبقى تدينا محاضرة جميلة زى دى
صح
بس اللى بياخد كود بيشكر و يتعامل على طول
انا برضه توبه اجاوب
بدل ما تشكرنى عمال تقطمنى
اللهم انى صائم
ربنا يهدينا جميعا
اللهم انى صائم!!!!!
اللى بيأخد كود!!!!
هى زكاة الفطر ولا ايه؟
انت حسستنا ان كنا داخلين نشحت مش نتعلم!
هو الكود بكم اليومين دول؟
شوف يا حبيبى سعره كم ورقم حسابك واحنا هنبعتهولك على حسابك او على البريد العادى
عشنا وشوفنا
سبق وان عرضت فى قسم الفلاش هذا الملف
http://www.gulfup.com/?k6DAQp
ولما دخلت قسم الاوتو بلاى
بدخل لاكتشاف معلومة جديدة فى البرنامج
بشوف كدة هل فيه نفس الامكانيات و كنت متوقع رد
كعادة الرد على الاستفساراتت التى تعودناها من الاخوة هنا
وللاسف ردينا عليك اكثر من مرة عشان الفكرة تصلك" فكرة طريقة الرد على الاستفسار"
وبرضه انت مصر على نمط معين "معقد" واللى يهلك من الضحك انك عملت باس وورد للملف التكست
وبتشترط وجود صاحب الموضوع؟
يا اخى الاستفسار يطرحه العضو ليستفيد منه الجميع وليس فرد بعينه
ولو تلاحظ لقد تلقيت بعض الروود "اللى ابدت اندهاشها من اسلوبك"
وكاننا بلسان حالنا بنقولك ده مش اسلوبنا فى الرد ابدا
ياااااما كتبنا استفسارات ورد عليها اخوة فضلاء بمنتهى البساطة ودون ان يحملونا افضالا واحتسبوا اجرهم لوجه الله
اما انت انسان غريب فى ردودك
اللى بيأخد كود واللى بيلحق كود
كرهتنا فى الاوتو بلاى يا محمود
تم ايجاد الحل
الاستاذ ثامر بدون كثرة كلام و وفلسفة
انجز المشروع واتضحت الاكواد
فلقد وجت هذا الملف ضمن احد مشاركات الاستاذ ثامر
نشكره من كل قلوبنا مشروع لتوليد الاسئلة بشكل عشوائى
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
أشكرك اخي خــــــــادم المسلمين على طرح هذا الاستفسار ؟
الذي استفدت منه كثير .......ولم اكن اعرف كيف استفسر عنة
هذا الملف الذي وضعه استاذنا الفاضل ابو بلقس كانه رد علي طلبي الذي لم اطلبه
--------------------------------------------------------------------
وشكراً للاخ مـــــحمود خــــــــليل
علي معلومة المفيدة واسلوبه الطريف والجديد
======================================== والشكر الاكبر الي استاذنا الفاضل
تعليق