السلام عليكم ورحمة الله وبركاته
الان نعيد التصميم السابق
الان امحي ما في زر البحث و ضع الكود التالي
-------- اذكر الكود من تقيدم الاستاذ ثامر في مشاركة سابقة ---------
جرب و اخبرنا :
الان نعيد التصميم السابق
الان امحي ما في زر البحث و ضع الكود التالي
-------- اذكر الكود من تقيدم الاستاذ ثامر في مشاركة سابقة ---------
PHP Code:
ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
istibdalate={["ó"] = "",["ð"] = "",["õ"] = "",["ö"] = "",["ú"] = "",["ø"] = "",["ö"] = "",["ñ"] = ""}
db = SQLite.Open("AutoPlay\\Docs\\coran.db");
s=SQLite.QueryToTable(db, "select * from coran");
ali = Input.GetText("Input1");
result4 = string.gsub (ali, ".",istibdalate)
tol=0;
-----------------------------------------------------------
for i,v in pairs(s.Data) do
m = s.Data[i]["Aya_text"];
abou_belkiss = string.gsub (m, ".",istibdalate)
g = String.Find(abou_belkiss,result4, 1, false);
if g~= -1 then tol=tol+1;
ListBox.AddItem("ListBox1", s.Data[i]["Sora_text"].."("..s.Data[i]["Aya_Num"]..")", s.Data[i]["Aya_text"]);
end
end
Label.SetText("Label1", tol);