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

نسخة كاملة : كيفية إنشاء "bloc note"
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام
(30-12-2015, 08:46 PM)ميار الصحراوية كتب : [ -> ]السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام
//////////////////////////////////////////////////////////////////////////////////////
;(Procedure NewTxt(nomfConfusedtring
Var
; F : Textfile

Begin
 AssignFile(F, nomf); //Assigns the Filename
 ReWrite(F); //Create a new file named ek.txt
;(' ', Writeln(F
 Closefile(F); //Closes file F
;End