مشكله فى العمليات الحسابيه

[esam2015]

عندى مشكله فى العمليات  الحسابيه 
كيف  يمكن  طرح خليتين واظهار ناتج الطرح فى تيكست مع العلم بان الناتج يوجد به كسور مثل    105.25

[مبرمج حر]

السلام عليكم
ما هو الكود الذي استخدمته ؟
ارفق محاولتك حنى يمكن مساعدتك والتعديل عليها

[esam2015]

اولا شكرا على سرعه الرد وهذا هو الكود

كود :

EDIT3.TEXT:=FLOATTOSTR(strtofloat(EDIT1.TEXT)+strtofloat(EDIT2.TEXT));

[أبو معاذ]

1- المثال الذي أوردته مثال الجمع و ليس الطرح كما ذكرت في أول مشاركتك.
2- ما هي رسالة الخطأ التي تظهر في برنامجك؟

[esam2015]

انا احاول اتعامل مع العمليات الحسابيه عموما
لانى احاول عمل برنامج لحساب الفواتير وبالتالى يوجد بها كتير من العمليات الحسابيه
فمثلا احاول وضع قيمه فى تيكست وبعد ذلك حساب الضريبه ويعد ذلك حساب اجمالى الفانوره

[أبو معاذ]

انا احاول اتعامل مع العمليات الحسابيه عموما
لانى احاول عمل برنامج لحساب الفواتير وبالتالى يوجد بها كتير من العمليات الحسابيه
فمثلا احاول وضع قيمه فى تيكست وبعد ذلك حساب الضريبه ويعد ذلك حساب اجمالى الفانوره

طيب ،
1- لم تجب على السؤال الثاني ،
أين هي رسالة  الخطأ التي تظهر لك عند تنفيذ برنامجك؟
2- هل تستعمل قواعد بياناتذ؟ إذا كان نعم ، فما هو نوعها؟

[esam2015]

انا احاول ضرب
total forfait * taux

[مبرمج حر]

استخدم متغيرات للحساب

كود :

Var A,B,C :   Currency; begin   A := StrToFloat(Edit1.Text);   B := StrToFloat(Edit2.Text);   C:= A - B ;   Edit3.Text := FloatToStr(c); end;

[esam2015]

سامحنى على كثره السؤال 

انا جربت البرنامج بس لما تضع فى التكست قيمه عشريه لا يقبل ويعطى خطا كما بالصوره

[مبرمج حر]

كود :

procedure TForm1.FormCreate(Sender: TObject); begin DecimalSeparator := '.'; end;