حل یکسری معادلات ریاضی ساده در دلفی

[francosoft]

سلام ما در بک برنامه دلفی می خواهیم 5 تا EDITBOX داشته باشیم.
وقتی BUTTON را زدیم.

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

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

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

منتظرم

مرسی :oops:

[mehdi_moosavi]

Edit3.Text := IntToStr( StrToInt(Edit1.Text) * StrToInt(Edit2.Text) )

[francosoft]

سلام

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

سلام

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

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



:موفق:

[francosoft]

می دونم

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

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

[Delphi Skyline]

خوب از متغیر های نوع real یا float استفاده کن مثلا :

var a,b,c:real;

a:=strtofloat(a);

b:=strtofloat(edit2.text);

c:=a*b;

edit3.text:=floattostr(c);

بای...

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