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

[مبرمج حر]

كود :

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