Frac تعرض الجزء العشري في Delphi

ali 28/3/2018, 8:56 pm

بسم الله الرحمن الرحيم
الصلاة السلام على رسول الله وعلى آله وصحبه أجمعين

Frac تعرض الجزء العشري في Delphi

تعرض الجزء العشري أو الجزء الذي تأتي بعد الفاصلة من الاعداد ذات الفواصل أو الاعداد الناطقة
ويجب أن يكون العدد من 1.1 الى 9999.999999999999999

Frac تعرض الجزء العشري أو الجزء الذي تأتي بعد الفاصلة من الاعداد ذات الفواصل أو الاعداد الناطقة

الكود:: procedure TForm1.btnFrac1Click(Sender: TObject); begin /// Returns the fractional part of a real number. /// Frac تعرض الجزء العشري أو الجزء الذي تأتي بعد الفاصلة من الاعداد ذات الفواصل أو الاعداد الناطقة /// ويجب أن يكون العدد من 1.1 الى 9999.999999999999999 caption := FloatToStr(Frac(StrToFloat(ed1.Text))); // Frac(10.25) = 0.25 // Frac(-11.75) = -0.75 end;