PDA

View Full Version : حل یکسری معادلات ریاضی ساده در دلفی



francosoft
یک شنبه 23 اسفند 1383, 12:32 عصر
سلام ما در بک برنامه دلفی می خواهیم 5 تا EDITBOX داشته باشیم.
وقتی BUTTON را زدیم.

برنامه EDITBOX1* EDITBOX2/EDITBOX3/EDITBOX4*EDITBOX5 = EDITBOX6

را حساب کرده و بعد جواب را در EDITBOX 6 بنویسد

لطفا نمونه مثلا را برایم بگذارید.

منتظرم

مرسی :oops:

mehdi_moosavi
یک شنبه 23 اسفند 1383, 12:56 عصر
Edit3.Text := IntToStr( StrToInt(Edit1.Text) * StrToInt(Edit2.Text) )

francosoft
یک شنبه 23 اسفند 1383, 13:04 عصر
سلام

مرسی
دوست عزیز اگر بخواهیم جمع و یا تقسیم بکنیم چی

یک شنبه 23 اسفند 1383, 13:45 عصر
سلام

مرسی
دوست عزیز اگر بخواهیم جمع و یا تقسیم بکنیم چی

:گیج:
خوب جمع یا تفریق میکنیش دیگه .



:موفق:

francosoft
یک شنبه 23 اسفند 1383, 13:55 عصر
می دونم

ولی یک مشکلی است

یکی اینکه اعدا اعشاری را قبول نمی کنه
:D
یکی اینکه برای تقسیم چه کنیم

Delphi Skyline
یک شنبه 23 اسفند 1383, 15:45 عصر
خوب از متغیر های نوع real یا float استفاده کن مثلا :


var a,b,c:real;
a:=strtofloat(a);
b:=strtofloat(edit2.text);
c:=a*b;
edit3.text:=floattostr(c);


بای...

در ضمن برای تقسیم کردن integer از div استفاده کن