السلام عليكم
بأي طريقه بالدلفي اطلب فيها حجم ملف معين راح يكون بالبايت
طيب كيف ممكن نحول من البايت للكيلو بايت ونضع القيمه في text
تحويل من بايت الى k.b
مغلق
للتحويل نقسم على 1024
مثال :
edit1.text:=floattostr(size)
حيث SIZE هو متحول حجم الملف
flattostr تحول من رقم حقيقي إلى نص
للتحويل من رقم صحيح (بليقبل فواصل) ممكن نستخدم inttostr
ألف شكرررررر
فقط مشكله بسيطه انه بعض الأحيان يكون الحجم بعد التحويل مثلا 250.125415454
كيف أقربه لعدد صحيح بدون فواصل
الخاصية round >>
مثال
showmessage(inttostr(round(3.225)));
في النظام العشري نعبر عن اآلاف ب 1Kilo = 10^3 = 1000 و عن الملايين بال 1Mega= 10^6 = 1 000 000.
لكن في النظام البيناري فالأمر يختلف.
فالألاف تقيم ب 1kilo = 2^10 =1024 و الملايين هي مضاعفات 1024 أي 1Mega= 2^20 = 1024 * 1024= 1048576...
وكما هو معلوم أن أنظمة الحواسيب هي انظمة تعتمد أساسا على لبناري, فكل رقم يستعمل ستجد أkنه مضاعف من مضاعفات 1024 = 2 أس 10.
مثلا نجد أن بطاقة ذاكرة كتب عليها 128MegaBytes فهي ذاكرة تتكون بالضبط من 128 * 1024 *1024 =
134217728..
وكما في المثال المرفق هذا ملف من 1024 بايت. عند استعمال WindowsExplorer ستجد أن ويندوز يظهر أن حجمه هو 1.00kb
سأتغيب عن المنتدى وستكون لي زيارات خفيفة بين الحين و الحين
يا صاحب الهم إن الهم منفرج.....................أبشر بخير فإن الفارج الله.
اليأس يقطع أحيانا بصاحبه..........................لا تيأس فإن الكافي الله.
الله يحدث بعد العسر ميسرة.........................لا تفزعن فإن الصانع الله.
إذا بليت فثق بالله وارض به...................فإن الذي يكشف البلوى هو الله.
و الله ما لك غير الله من أحد.......................فحسبك الله في كل لك الله
أخوكم مراد
هذا الموضوع مغلق.