كيفية إنشاء "bloc note"

[ميار الصحراوية]

السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام

[nadirzeghni]

السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام

//////////////////////////////////////////////////////////////////////////////////////

;(Procedure NewTxt(nomftring
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