PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : آموزش ساخت ماشین حساب در زبان برنامه نویسی دلفی



Borna66
4th May 2012, 21:25
پس از اموزش تعریف و کار با متغیرها در مقاله قبلی حالا نوبت به استفاده از انها در یک پروژه عملی است!
قبل از هرپروژه ما باید روند کار انرا در ذهنمان مدل سازی کنیم که چه ویژگی ها و امکاناتی در صفحه برنامه خود نیاز داریم برای مثال در این برنامه ما نیاز به ۳ edit داریم ۲ تا برای ورود ۲ عدد و ۱ عدد برای نشان دادن جواب و طبعا سری کلید های رایج اعمال ریاضی که در همه ماشین حساب ها موجود میباشد
پس ابتدا ظاهر برنامه را تشکیل میدهیم و امکانات و کلید های مورد نیاز را از پنل استاندارد به فرم خود اضافه میکنیم . موارد مورد نیاز عبارت است از:
۱:کلیدها ( (button که شامل + = – * / mod میباشد
۲: ۳ عدد edit که در بالا به کار ان اشاره شد
۳:یک دکمه close
طبق مقاله شماره ۱ به قسمت object inspector هر کلید رفته و در قسمت Caption ان نام انرا به عملیات ریاضی تغییر دهید و قسمت برای edit ها قسمت Caption را کاملا پاک کنید
عکس۱:
http://sat.br.tc/images/statusicon/wol_error.gif
http://www.gooyait.com/uploads/akse11.jpg (http://www.gooyait.com/1389/02/28/construction-education-calculator-in-delphi.html/akse1-2)
پس از اماده سازی ظاهری برنامه نیاز به کد داریم و در قسمت کد ابتدا به سراغ متغیر ها میرویم
در اینگونه پروژها بهتر است متغیرهارا سراسری تعریف کنیم چون در همه قسمت های برنامه ۲ عدد کاربر مورد نیاز است و که مقدار ثابتی دارد و همه عملیات روی ان ۲ عدد صورت میگیرد
پس در قسمت var برنامه اصلی ۳ متغیر در نظر میگیرم ۲ متغیر برای اعداد کاربر و ۱ متغیر برای نتایج
Var A,b,c:integer;
پس از تعریف متغیرها به سراغ button هایمان میرویم تا در هرکدام از انها عملیات مربوط را کد نویسی کنیم

کد:

برای button + : A:=strtoint(edit1.text); B:=strtoint(edit2.text); C:=a+b; Edit3.text:=inttostr(c);
کد بالا ابتدا ۲ عدد را از کاربر گرفته و با استفاده از ۲ تابع strtoinT و inttostr انها را تبدیل و در
متغیر ها میریزد(دلیل استفاده از توابع نام برده در مقاله قبلی گفته شده است)
پس از مقداردهی متغیرها نوبت به عملیات روی انها میرسد که خط سوم این کار را انجام میدهد و پس از عملیات نوبت به نمایش ان میرسد که در خط ۴ این عمل دیده میشود
البته راه های گوناگونی برای نمایش نتیجه وجود دارد برای مثال کد

کد:

Showmessage(inttostr(c));
که به صورت یک پیغام همراه با تایید عدد را نمایش میدهد
کد مربوط به عملگر منها:
کد دقیقا مانند بالا میباشد به چند تفاوت کوچک:
۱:این کد در button مربوط به منها نوشته میشود
۲:شما به جای عملگر + از عملگر – استفاده میکنید
چون متغیر شما سراسری تعریف شده است این امکان مشترک بودن کدها وجود دارد در غیر اینصورت نیاز به تعریف متغیر در هر ButTon وجود داشت و بسته به نام انها کد تغییر میکرد
کد های مربوط به ضرب و تقسیم و mod نیز مانند موارد بالا شکل میگیرد
ولی اگر شما نیاز به تقسیم با اعشار داشته باشید ((div کد شما نیاز به تغییراتی خواهد داشت چون در درجه اول حاصل عددی اعشاری خواهد بود و متغیر سراسری شما از نوع عدد صحیح میباشد پس در درجه اول متغیری در button تقسیم اعشاری از نوع عدد اعشاری (real) تعریف میکنیم به صورت زیر:

کد:

Var a,b,c :real;
توجه کنید چون متغیر محلی است تشابه اسمی مشکلی ایجاد نمیکند .سپس کدهای بالا میتوانند عینا تکرار شوند با این تفاوت که کد عملگر شما به این صورت میشود:
C:=a div b ;
برای button خروج نیز از کد close; استفاده میکنیم
عکس۲:


http://www.gooyait.com/uploads/akse21.jpg (http://www.gooyait.com/1389/02/28/construction-education-calculator-in-delphi.html/akse2-2)
در نهایت اگر خطوط بالا را کامل و بدون عیب در فرم خود تایپ گرده باشید ماشین حساب ساده ای با عملگرهای رایج خواهید داشت .
عکس۳:


http://www.gooyait.com/uploads/akse31.jpg (http://www.gooyait.com/1389/02/28/construction-education-calculator-in-delphi.html/akse3-2)
ذکر چند نکته برای راحتی کاربر:
برای اینکه استفاده کننده از ماشین حساب دچار سردرگمی نشود بهتر است از امکان lable نیز استفاده کنیم تا کاربر بتواند محل قرار دادن اعداد و دیدن نتیجه را مشاهده کند به این صورت که شما نیاز به ۳ lable و اوردن ان از پنل استاندارد دارید و قرار دادن ان مانند شکل زیر در کنار edit ها و تغییر نام ان به صورت دلخواه
عکس ۴:


http://www.gooyait.com/uploads/akse4-2.jpg (http://www.gooyait.com/1389/02/28/construction-education-calculator-in-delphi.html/akse4-2)

احیا
20th February 2013, 12:50
ممنونم