--
ListBox.DeleteItem("ListBox2", -1);
tx = Input.GetText("Input2"); 
x=false ;
if tx~="" then
   cn = ListBox.GetCount("ListBox1");
   if cn~=-1 then
      for c = 1, cn do
	      t = ListBox.GetItemText("ListBox1", c);
	      if t~="" then
	         ntx = String.Left(t, String.Length(tx));
	         if ntx==tx then
	            d = ListBox.GetItemData("ListBox1", c);
	            ListBox.AddItem("ListBox2", t, d);
	            x=true ;
	         end
	      end
	   end
	   if x~=true then
	     Dialog.Message("Notice", "عفوا لم يتم إيجاد الكلمة التى تبحث عنها", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
	   end
	   ListBox.SetUpdate("ListBox2", true);
    end
   else
     Dialog.Message("Notice", "من فضلك أكتب الكلمة المطلوب البحث عنها أولا ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); 
end

ListBox.DeleteItem("ListBox2", -1);

get_txt = Input.GetText("Input2");

search_ok = false

if get_txt == "" then

Dialog.Message("Notice", "حدد كلمة البحث", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); 

else

for i = 1 , ListBox.GetCount("ListBox1") do

if String.Find(ListBox.GetItemText("ListBox1", i), get_txt, 1, false) ~= -1 then

search_ok = true

ListBox.AddItem("ListBox2", ListBox.GetItemText("ListBox1", i), ListBox.GetItemData("ListBox1", i));

end -- if String.Find(ListBox.GetItemText("ListBox1", i), "get_txt", 1, false) ~= -1 then

end -- for i = 1 , count do

end -- if get_txt == "" then

------------------------------------------------------

if search_ok == false and get_txt ~= "" then

Dialog.Message("Notice", "لا يوجد نتيجه", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

end