بسم الله الرحمن الرحيم
اظن اننا لو جربنا ان يكون المجلد الرئيسي داخل
مجلد
Audio
ربم تنجح العملية
اظن اننا لو جربنا ان يكون المجلد الرئيسي داخل
مجلد
Audio
ربم تنجح العملية

if e_Key== 13 then
ad = ListBox.GetSelected("ListBox1");
if ad ~= nil then
result = Input.GetText("Input1");
if result~="" then
con = ListBox.GetCount("ListBox1");
for i=1, con do
tx = ListBox.GetItemText("ListBox1", i);
if tx~="" then
k,s = string.find(tx, result);
if k~=nil then
ListBox.SelectItem("ListBox1", i);
is_it = Dialog.Message("يوجد نتيجة للبحث", "إنظر إلى الإختيار المحدد فى الليست بوكس هل هو المطلوب ؟", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1);
if is_it~=IDNO then
break
end
end
end
end
else
Dialog.Message("تنبيه", "لم يتم تحديد اي ملف من قائمة المفات");
end
else
Dialog.Message("تنبيه","لم يتم تحديد عن ماذا تريد البحث");
end
end
MediaPlayer.Pause("Plugin1");
_Selection = ComboBox.GetSelected("ComboBox2");
if _Selection~= -1 then
dt = ComboBox.GetItemData("ComboBox2", _Selection);
destination = Dialog.FolderBrowse("Please select a folder:", "");
if destination ~= "CANCEL" then
ts = INIFile.GetValueNames(_SourceFolder.."\\Downloads.ini", "Folders");
if ts~=nil then
for i, s in pairs(ts)do
if s==String.SplitPath(dt).Filename then
fd = INIFile.GetValue(_SourceFolder.."\\Downloads.ini", "Folders", s);
if fd~="" then
sd = Folder.DoesExist(fd);
if sd then
gs = Dialog.Message("تذكير", "هذا المجلد تم تحميلة من قبل وموجود فى نفس المسارهل تريد تحميلة مرة أخرى ؟", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON2);
if gs==6 then
DialogEx.Show("ALL", true, nil, nil);
end
break
else
DialogEx.Show("ALL", true, nil, nil);
break
end
end
elseif s~=String.SplitPath(dt).Filename and i==#ts then
DialogEx.Show("ALL", true, nil, nil);
end
end
else
DialogEx.Show("ALL", true, nil, nil);
end
else
Dialog.Message("تـــوضيــح", "تم الغـــــــــاء العمليـــة", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
else
--Dialog.Message("انتبة", "يجب التحديد".."\r\n".._Selection, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Dialog.Message("انتبة", "يجب التحديد", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
if e_key== 13 then
ad = listbox.getselected("listbox1");
if ad ~= nil then
result = input.gettext("input1");
if result~="" then
con = listbox.getcount("listbox1");
for i=1, con do
tx = listbox.getitemtext("listbox1", i);
if tx~="" then
k,s = string.find(tx, result);
if k~=nil then
listbox.selectitem("listbox1", i);
is_it = dialog.message("يوجد نتيجة للبحث", "إنظر إلى الإختيار المحدد فى الليست بوكس هل هو المطلوب ؟", mb_yesno, mb_iconquestion, mb_defbutton1);
if is_it~=idno then
break;end;else
input.settext(this, "");
dialog.timedmessage("", "كلمة البحث غير صحيحة" , 2000, mb_iconinformation);break
end;end;end;else
dialog.message("تنبيه", "لم يتم تحديد اي ملف من قائمة المفات");
end;else
dialog.message("تنبيه","لم يتم تحديد عن ماذا تريد البحث");
end;end
-- result = Input.GetText("Input1"); if result~="" then con = ListBox.GetCount("ListBox1"); for i=1, con do tx = ListBox.GetItemText("ListBox1", i); if tx~="" then k,s = string.find(tx, result); if k~=nil then ListBox.SelectItem("ListBox1", i); is_it = Dialog.Message("يوجد نتيجة للبحث", "إنظر إلى الإختيار المحدد فى الليست بوكس هل هو المطلوب ؟", MB_YESNO, MB_ICONQUESTION, MB_DEFBUTTON1); if is_it~=IDNO then break end elseif k==nil and i==con then Dialog.Message("نتيجة البحث","لم يتم العثور على نتيجة"); end end end else Dialog.Message("تنبيه","لم يتم تحديد عن ماذا تريد البحث"); end
-- function copy(Source,Destination,Copied,Total,FileCopied,FileTotal) StatusDlg.SetMeterRange(0, Total); StatusDlg.SetTitle("عملية حفظ ملفات"); StatusDlg.SetMeterPos(FileCopied); StatusDlg.SetStatusText(String.SplitPath(Source).Filename..String.SplitPath(Source).Extension.." جارى حفظ الملف"); return true end result = ListBox.GetSelected("ListBox1"); if result~=nil then result = ListBox.GetItemData("ListBox1", result[1]); t = Dialog.FolderBrowse(": من فضلك قم بتحديد مكان الحفظ للملف ", _DesktopFolder); if t~="" and t~="CANCEL" then StatusDlg.Show(MB_ICONNONE, false); File.Copy(result, t, true, true, false, true, copy); StatusDlg.Hide(); Dialog.Message("نتيجة الحفظ","تم الحفظ بنجاح"); end end
-- function copy(Source,Destination,Copied,Total,FileCopied,FileTotal) StatusDlg.SetMeterRange(0, Total); StatusDlg.SetTitle("عملية حفظ ملفات"); StatusDlg.SetMeterPos(FileCopied); StatusDlg.SetStatusText(String.SplitPath(Source).Filename..String.SplitPath(Source).Extension.." جارى حفظ الملف"); return true end result = ListBox.GetSelected("ListBox2"); if result~=nil then result = ListBox.GetItemData("ListBox2", result[1]); t = Dialog.FolderBrowse(": من فضلك قم بتحديد مكان الحفظ للمجلد ", _DesktopFolder); if t~="" and t~="CANCEL" then StatusDlg.Show(MB_ICONNONE, false); File.Copy(result.."\\*.*", t, true, true, false, true, copy); StatusDlg.Hide(); Dialog.Message("نتيجة الحفظ","تم الحفظ بنجاح"); end end
-- result = input.gettext("input1"); if result~="" then con = listbox.getcount("listbox1"); for i=1, con do tx = listbox.getitemtext("listbox1", i); if tx~="" then k,s = string.find(tx, result); if k~=nil then listbox.selectitem("listbox1", i); is_it = dialog.message("يوجد نتيجة للبحث", "إنظر إلى الإختيار المحدد فى الليست بوكس هل هو المطلوب ؟", mb_yesno, mb_iconquestion, mb_defbutton1); if is_it~=idno then break end elseif k==nil and i==con then dialog.message("نتيجة البحث","لم يتم العثور على نتيجة"); end end end else dialog.message("تنبيه","لم يتم تحديد عن ماذا تريد البحث"); end
تعليق