PDA

View Full Version : بدست آوردن حجم یک عکس


Diabolic
چهارشنبه 25 شهریور 1388, 20:49 عصر
سلام
میشه یه نفر یه نمونه بده که کارش این باشه :
یه عکس انتخاب کنیم و حجم عکس رو به ما بده
سه مدل حجم بده :
بایت
کیلوبایت
مگابایت

ممنون میشم :بوس:
Felony
چهارشنبه 25 شهریور 1388, 21:18 عصر
میتونی از تابع FileSize استفاده کنی یا به روش زیر عمل کنی ، تبدیل واحدش هم کاری نداره :


var
S:TSearchRec;
begin
if FindFirst('H:\adsl-www.BBN.ir.doc',FaAnyFile,S)=0 then
Form1.Caption:=IntToStr(S.Size);
end;
Diabolic
چهارشنبه 25 شهریور 1388, 22:26 عصر
این تابع حجم رو به بایت میده ؟ کیلوبایت میده ؟ مگابایت میده ؟
Felony
چهارشنبه 25 شهریور 1388, 23:49 عصر
جواب این سوال رو با مراجعه به راهنمای دلفی هم میتونستی پیدا کنی ، حجم رو به بایت برمیگردونه .
Diabolic
چهارشنبه 25 شهریور 1388, 23:53 عصر
ممنون
به کیلوبایت و مگابایت رو هم میشه بدست آورد ؟!
Felony
پنج شنبه 26 شهریور 1388, 02:08 صبح
:اشتباه:بابا یکم فکر کن ، وقتی بایت رو داری به راحتی با یه تقسیم ساده میتونی به کیلوبایت و مگابایت تبدیلش کنی .