اين الخلل في المشروع

[محمد بن أحمد أبو حذيفة]

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته



http://www.4shared.com/rar/1z0hrAnY/My_Project.html


بعد فتح المشروع تجد زرين

اضافة مجلد واضافة ملف

لكن يظهر خلل

فهل من حل لهذا الخلل

بارك الله فيكم

[عبود عبود]

السلام عليكم ورحمة الله وبركاته

بالنسبة لكود نسخ ملف " إضافة ملف " :

--
path = Shell.GetFolder(SHF_DESKTOP);
sFile = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "All Files (*.*)|*.*|", "", "dat", true, false);
if sFile~="CANCEL" then
for i, j in pairs( (sFile)) do
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(j, path, true, true, false, true, nil);
StatusDlg.Hide();
end
end

:abc_087: وطبعا أدخلت لك فية إمكانية نسخ أكثر من ملف فى نفس الوقت " خاصية المالتى " عن طريق الضغط على زر كونترول من لوحة المفاتيح لتحديد أكثر من عنصر .

وبالنسبة لنسخ مجلد بأكمله " إضافة مجلد " الكود هو :

--
path = Shell.GetFolder(SHF_DESKTOP);
sFile = Dialog.FolderBrowse("Please select a folder:", _DesktopFolder);
if sFile~="CANCEL" then
N_name = String.SplitPath(sFile).Filename;
Folder.Create(path.."\\"..N_name);
StatusDlg.Show(MB_ICONNONE, false);
File.Copy(sFile.."\\*.*", path.."\\"..N_name, true, true, false, true, nil);
StatusDlg.Hide();
end

وجميع عمليات النسخ السابق ذكرها فى الأكواد السابقة سوف تظهر ديالوج الإختيار للملفات المراد نسخها أو المجلدات ثم ستتم عملية النسخ إلى مسار سطح المكتب على الكومبيوتر :abc_087: " يمكنك التغيير حسب ما تريد إما إلى داخل المشروع أو خارجة "

طبعا عن طريق تغيير المسار للمتغير " path " فقط لا غير :abc_088:

إذا وجدت لك مشكلة فى التغيير " Tell Me " :abc_138:

بالتوفيق للجميع :abc_023:

[محمد بن أحمد أبو حذيفة]

بسم الله الرحمن الرحيم
بارك الله فيك رحمه الله والديك

لكن الكود لا يعطي امكانية اختيار مكان الحفظ
انا اريد ان احفظ مثلا مثل في مجلد العقيدة
اولا اقوم بنسخه ثم يعطيك الخيار لمكان الحفظ بحيث تختار انت المكان

كذلك هل ممكن اضافة زر ينسخ الملف المحدد او المجلد من القائمة الشجرية trre الى الجهاز او مكان معين

[عبود عبود]

فى المرفقات تجد ملف مفتوح به زر لنسخ ملف أو مجموعة ملفات من الجهاز إلى البرنامج

أيضا تجــــد زر لنسخ مجلد من البرنامج إلى الجهاز .

و يمكن تحديد المسارات بديالوج إختيارى أيضا .

[محمد بن أحمد أبو حذيفة]

بارك الله فيك

[خادم المسلمين]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[المتعملق]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ياسرهتهت]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[النصل القاطع]

هناك بعض الوظائف الخفية و الدفينة فى الأوتوبلاى و التى لا يلحظها الكثيرين

1- إظهار مربع حفظ بإسم
file=Dialog.FileBrowse(false, "Save As", "c:\\", "All Files (*.*)|*.*|", "", "", false, true);


2- التعامل مع نتيجة المربع و خيارات المستخدم
File.Copy("c:\\example.exe", file[1], false, false, false, false, nil);

[عبدوعزيز]

مشكووووووووووووووور