delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيفية نقل ملف من قرص إلى قرص
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
أود نقل ملف من قرص إلى قرص آخر وذلك بالضغط على زر معين لكن الكود الذي جربته لم ينجح معي لا ادري مالسبب علما انه لم تظهر اي رسالة خطأ
الكود
كود :
procedure TForm1.Button1Click(Sender: TObject); begin CopyFile('D:\piste_5.mp3','c:\a1',false) end; end.
وعليكم السلام
اخي ابحث في المنتدى لأن مثل هده الأسئلة تكون مطروحة سابقا

نسخ
كود :
CopyFile(PChar('C:\1.txt'), PChar('D:\1.txt'), False);
قص
كود :
MoveFile(PChar('C:\1.txt'), PChar('D:\1.txt'));
شكرا أخ ghost-dz على الرد

قمت بالبحث لكن لم ينفع معي ذلك
السلام عليكم ورحمة الله

النقل ما هو إلا نسخ ثم حذف
راجع موضوع نسخ الملفات (بطرق مختلفة) من العدد الرابع من مجلة منتدى دلفي للعرب
http://www.delphi4arab.net/forum/showthr...p?tid=4202