المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة
مشاهدة المشاركة
الان دور زر البحث نستفيد من الكود الذي يلغي الهمزات و النقط في التاة و الياء
ضع في زر الكود التالي :
كود PHP:
ListBox.DeleteItem("ListBox2", LB_ALLITEMS)
serch = Input.GetText("Input1");
----------------ÇáÈÍË Úä ÇáåãÒÉ æ ÇáÊÇÉ ÇáãÑÈæØÉ æ ÇáÒÇæ ÇáãåãÒÉ
name1 = String.Replace(serch, "Ã", "Ç");
name1 = String.Replace(name1, "Å", "Ç");
name1 = String.Replace(name1, "Â", "Ç");
name1 = String.Replace(name1, "Ä", "æ");
long = String.Length(name1) ; Dlettre = String.Mid(name1, long , 1) ;
---------------ÇáÈÍË Úä ÇáÈÇÁ ÇáãÞÕæÑÉ Ýí ÇæÇÎÑ ÇáßáãÉ
if Dlettre == "ì" then name2 = String.Replace(name1, "ì", "í");
elseif Dlettre == "å" then name2 = String.Replace(name1, "å", "É");
else
name2 = name1;
end
---------------------------------
for i = 1 , ListBox.GetCount("ListBox1") do
serch1 = ListBox.GetItemText("ListBox1", i);
nam1 = String.Replace(serch1, "Ã", "Ç");
nam1 = String.Replace(nam1, "Å", "Ç");
nam1 = String.Replace(nam1, "Â", "Ç");
nam1 = String.Replace(nam1, "Ä", "æ");
lon = String.Length(nam1) ; Dlettr = String.Mid(nam1, lon , 1) ;
---------------ÇáÈÍË Úä ÇáÈÇÁ ÇáãÞÕæÑÉ Ýí ÇæÇÎÑ ÇáßáãÉ
if Dlettr == "ì" then nam2 = String.Replace(nam1, "ì", "í");
elseif Dlettr == "å" then nam2 = String.Replace(nam1, "å", "É");
else
nam2 = nam1;
end
patch = ListBox.GetItemData("ListBox1", i)
----------------ÇáãÞÇÑäÉ--------------------
if String.Find(nam2,name2 , 1) ~= -1 then
ListBox.AddItem("ListBox2", serch1 , patch);
end
-----------------------------------------------
end
تعليق