+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية إنشاء "bloc note" (/showthread.php?tid=7373)
كيفية إنشاء "bloc note" - ميار الصحراوية - 30-12-2015
السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام
RE: كيفية إنشاء "bloc note" - nadirzeghni - 04-01-2016
(30-12-2015, 08:46 PM)ميار الصحراوية كتب : السلام عليكم أعضاء المنتدى أنا عضوة جديدة معكم أرجوا أن تساعدوني في كيفية إنشاء "bloc note" بالديلفي أكيد ..//////////////////////////////////////////////////////////////////////////////////////
من ناحية "les codes sources" وكيفية اشتغال البرنامج ع الصحيح..
من لديه أدنى فكرة فليفدني بها وجزاكم الرحمان خيراا
سلام
;(Procedure NewTxt(nomf
tring
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
tringVar
; 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