+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ (/showthread.php?tid=2768)
كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ - AnoirsoftDeveloper - 06-02-2011
السلام عليكم
كيف أنسخ مجلد إلى مجلد آخر باستعمال ProgressBar
كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ - kachwahed - 06-02-2011
وعليكم السلام ورحمة الله وبركاته
نسخ الملفات بكل الطرق في العدد الرابع.
بالتوفيق.
كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ - لؤي - 06-02-2011
هناك 6 طرق مذكورة في المجلة 4
أبسط طريقة:
كود :
procedure TForm1.Button1Click(Sender: TObject);
var
fileSource, fileDest: string;
begin
fileSource := 'C:\SourceFile.txt';
fileDest := 'D:\DestFile.txt';
CopyFile(PChar(fileSource), PChar(fileDest), False);
end;
end.كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ - gladiator16 - 08-02-2011
هو يقصد ProgressBar
كيفية نسخ مجلد إلى مجلد باستعمال ProgressBar ؟ - gladiator16 - 09-02-2011
تفضل اخي الكود كامل وكما تريده تماما
واذا كانت عندك نسخة 7 اي نسخة القديمة سيضهر لك خطا غيره هكذا
Application.MainFormOnTaskbar := True;//
احذف هذا السطر فقط