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

شرح كيفية استعمال الحلقات في دلفي

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

شرح كيفية استعمال الحلقات في دلفي Empty شرح كيفية استعمال الحلقات في دلفي

مُساهمة من طرف salme السبت يناير 21, 2017 9:04 pm


بسم الله الرحمن الرحيم
والصلاة السلام على سيدنا محمد وعلى آله وصحبه أجمعين

شرح كيفية استعمال الحلقات في دلفي


الكود:

procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
 Memo1.Lines.Clear;
 for i := 0 to 10 do
 Memo1.Lines.Add('هذه القيمة = '+IntToStr(i));
end;


الكود:

procedure TForm1.Button2Click(Sender: TObject);
var i: Integer;
begin
 Memo1.Lines.Clear;
 i := 0;
 While i <= 10 do
 begin
 Memo1.Lines.Add('هذه القيمة = '+IntToStr(i));
 i := i + 1;
 end;
end;


الكود:

procedure TForm1.Button3Click(Sender: TObject);
var i: Integer;
begin
 Memo1.Lines.Clear;
 i := 0;
 repeat
 Memo1.Lines.Add('هذه القيمة = '+IntToStr(i));
 i := i + 1;
 until i >= 10;
end;



المصدر دلفي تعليم
delph.forumalgerie.net

salme
Admin

المساهمات : 38
تاريخ التسجيل : 20/01/2017

https://elf1.rigala.net

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

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

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

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