جلسه چهارم (مثال برای متغیر:جمع دو عدد)
جلسه چهارم (مثال برای متغیر:جمع دو عدد)
اگه هنوز برنامه ای که توی مثال قبل نوشتین، نبستین به ترتیب زیر، یک فرم جدید برای مثال این جلسه ایجاد کنین:
از منوی file گزینه New و بعد Application
دو تا Edit، یک Label و یک Button روی فرم قرار بدین.
button رو انتخاب کنین و از قسمت Object Inspector مقدار مقابل caption رو برابر Sum بنویسین
http://www.www.www.iran-eng.ir/imagehosting/9621474701167cdbf.jpg
حالا روی button دابل کلیک کنین تا وارد editor بشین.
بعد از procedure و قبل از begin کد زی رو تایپ کنین:
این کد 3 متغیر با نامهای a و b و sum که از نوع عدد صحیح هستن، تعریف میکنه.
متغیر ها می تونن انواع مختلفی داشته باشن، مثلا:
عدد صحیح integer
رشته ای از کاراکترها string
عدد حقیقی float
کاراکتر char
...
حالا کدهای زیر رو بعد از begin تایپ کنین:
کد:
a:=strtoint(edit1.Text);
b:=strtoint(edit2.Text);
sum:=a+b;
label1.Caption:=inttostr(sum);
سطر اول و دوم، مقادیری که کاربر وارد edit ها میکنه رو به متغیرهای a و b نسبت میده.
سطر سوم، دو عدد a و b رو که توی سطرهای قبل مقدارشون مشخص شده، با هم جمع میکنه.
و سطر آخر، حاصل جمع رو توی label میذاره تا نمایش داده بشه.
تموم شد !!
حالا با کلید F9 برنامه رو اجرا کنین. مثل شکل زیر، دو عدد وارد کنین و روی کلید sum کلیک کنین
http://www.www.www.iran-eng.ir/imagehosting/962147470116919c8.jpg
جلسه بعد در مورد این برنامه و نحوه کارش و کدهایی که نوشتیم، بیشتر صحبت می کنیم