لقد استعملت هذا الكود
كود :
CopyFile(PChar('1.doc'), PChar('c:1.doc'), False);
وناجح معى ولكن المشكله اريد عند الكتابه فى حقل الرقم وحقل السنه يتم تغيير ال rename لل word الى الكتابه التى كتبتها فى حقلى الرقم والسنه
ماهو الحل
السلام عليكم و رحمة الله تعالى و بركاته
أخي فرضا أن لك حقل annee للسنة و حقل num للرقم يمكنك تغيير اسم الملف بهذه الطريقة
CopyFile(PChar('1.doc'), PChar('c:'+annee.text+num.text+'.doc'), False);
هند التنفيذ تكون النتيجة مثلا 20150001.doc
جرب هذا الكود و يمكنك التحكم في التسمية كما تريد
بالتوفيق
لقد جربتها ولم تفلح فبعد اجراء تعديلات بسيطه على الكود تعطى النتيجه annee.text+num.text+' فى ال rename ولكن اريد النتيجه بما كتبته فى حقل annee و num
السلام عليكم و رحمة الله تعالى و بركاته
معذرة أخي أنا قصدت ب annee ال edit و بما انك تستخدم قواعد البيانات استخدم هذا الكود
table1.fieldbyname('annee').asstring+table1.fieldbyname('num').asstring
و إن شاء الله ستشتغل
بالتوفيق
ما رأيك فى هذا الكود CopyFile(PChar('1.doc'), PChar(Edit1.Text), False);
محمد .م.م كتب :ما رأيك فى هذا الكود CopyFile(PChar('1.doc'), PChar(Edit1.Text), False);
صحيح لكن بشرط تضع في الأوديت اسم الملف الذي تريد النسخ إليه مثل 13082015.doc
بالتوفيق
لقد جربت الكود ال1ى اعطيته لى ولم ينجح وعلى كل حال استخدمت الكود CopyFile(PChar('1.doc'), PChar(Edit1.Text+Edit2.text), False); ولكن عندما كتبت فى الآوديت الآول رقم 1 وكتبت فى الآوديت الثانى رقم 2 اعطانى نتيجه 21 وهذا مالم اريده اريد أن تكون النتيجه ا لسنة 2
مالحل
محمد .م.م كتب :لقد جربت الكود ال1ى اعطيته لى ولم ينجح وعلى كل حال استخدمت الكود CopyFile(PChar('1.doc'), PChar(Edit1.Text+Edit2.text), False); ولكن عندما كتبت فى الآوديت الآول رقم 1 وكتبت فى الآوديت الثانى رقم 2 اعطانى نتيجه 21 وهذا مالم اريده اريد أن تكون النتيجه ا لسنة 2
مالحل
أخي اكتبها بهذه الصيغة PChar(Edit1.Text+'لسنة'+Edit2.text)
بالتوفيق
الحمد لله
عفوا يا أخي
بالتوفيق