دلفي تعليم
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

انشاء ملف نصي وكتابة سطرين فيه

2 مشترك

اذهب الى الأسفل

انشاء ملف نصي وكتابة سطرين فيه  Empty انشاء ملف نصي وكتابة سطرين فيه

مُساهمة  mah11 23/7/2013, 7:42 pm

بسم الله الرحمن الرحيم
انشاء ملف نصي وكتابة سطرين فيه

تم تصريح بمتغييرين المتغيير الاول هومن نوع الملف أي ملف نصي والمتغيير الثاني هو من نوع سلسلة حرفية أو رقمية
تعليمة انشاء وفتح الملف assign المتغير الاول نوع الملف أو الاسم الداخلي للملف والثاني اسم الملف الحقيقي
تعليمة تهيئة الملف أو مسح محتواه rewrite أي اعادة كتابته من جديد لها متغيير واحد هو نوع الملف
تعليمة القراءة أي قراءة كلمة أو جملة أو اعداد  readln وتكون عن طريق لوحة المفاتيح وتسند القيمة المقروءة الى متغيير
read تعني قراءة  ln تعني سطر
للكتابة في الملف تستعمل التعليمة write المتغيير الاول الاسم الداخلي للملف والثاني الكلمة أو الجملة التي ستكتب في الملف
تعليمة اغلاق close تعني غلق الملف المفتوح



الكود:

program write_file_txt;  // pascal
var ft: text; s: string;  // pascal
begin
 assign(ft, 'text1.txt');  // pascal
 rewrite(ft);  // pascal
 readln(s); writeln(ft, s);  // pascal
 writeln(ft, 'Welcome to turbo pascal 7.0 ',s);  // pascal
 close(ft);  // pascal
end.


mah11
Admin

عدد المساهمات : 364
تاريخ التسجيل : 21/06/2013

https://delph.forumalgerie.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

انشاء ملف نصي وكتابة سطرين فيه  Empty رد: انشاء ملف نصي وكتابة سطرين فيه

مُساهمة  ali 5/6/2015, 8:36 pm

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

ali
مبرمج مجتهد

عدد المساهمات : 913
تاريخ التسجيل : 29/07/2013

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى