كيغية اجراء عملية حسابية بسيطة

[Mr.DOS]

سلام عليكم

عليك بإستعمال دوال التحويل

شاهد المثال المرفق لحساب حقلين من نوع عملة currency

var a,b,c:currency;
begin
a:=StrTocurr(DBEdit1.text);
b:=StrTocurr(DBEdit2.text);
c:=a+b;
dbedit3TTC.Text:=currToStr(c);
end;