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

السلام عليكم ورحمة الله وبركاته

مشكلتي ان في برنامجي هناك 3 تعليمات للقرائة Read
ولكن البرنامج يطبق 2 فقط فهو ينفذ الاولى ثم يذهل للثالثة

التعليمات المستعملة :

كود :
Writeln('Les information de l'enfant ',i);
    Write('Le Nom = ');
    Read(X.nom);
    Write('La Date = ');
    Read(X.DateN);
    Write('Le age = ');
    Read(X.Age);
    Write(f,x);

مع العلم ان X من نوع تسجيلة (Record)
nom,DateN :String
age:byte

وعليكم السلام ورحمة الله

استخدم ReadLn بدلا من Read

كود :
Writeln('Les information de l''enfant ',i);
Write('Le Nom = ');
ReadLn(nom);
Write('La Date = ');
ReadLn(DateN);
Write('Le age = ');
ReadLn(Age);

تماما , جزاك الله خيرا اخي

King SofT

محمد عبد العزيز

King SofT