Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.06.2011, 12:44   #1
iliili
Пользователь
 
Аватар для iliili
 
Регистрация: 06.03.2010
Сообщений: 56
По умолчанию размер файла

Как узнать размер файла?(в КБ)
Сделал ошибку.Исправил.Подзаработал
iliili вне форума Ответить с цитированием
Старый 22.06.2011, 13:08   #2
tsar_
Форумчанин
 
Аватар для tsar_
 
Регистрация: 06.01.2011
Сообщений: 369
По умолчанию

Сходите сюдой:
http://delphidevelop.ru/publ/13-1-0-261
А вообще гуглите, на первой же странице масса примеров.
Программирую по необходимости
tsar_ вне форума Ответить с цитированием
Старый 22.06.2011, 13:13   #3
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,882
По умолчанию

С потоком так :
Код:
var fs : tfilestream;
...
fs := tfilestream.create('full_file_name', fmopenread);
теперь размер файла в fs.size
Можно с assign :
Код:
var f : file of ...;
...
assign(f, 'full_file_name');
size := filesize(f); // только тут будет размер соответственно типу файла, поэтому для Вашей цели лучше объявлять file of byte
Можно через findfirst :
Код:
var sr : tsearchrec;
...
if findfirst('full_file_name', faanyfile, sr) = 0 then 
теперь размер файла в sr.size
Получить размер в Кб - надо потом разделить то, что получили на 1024.

Можно ещё через винапи, но я не задавался этим вопросом.

А вообще - поиск для таких как Вы, уже столько тем подобных.

Последний раз редактировалось phomm; 22.06.2011 в 13:22.
phomm вне форума Ответить с цитированием
Старый 22.06.2011, 13:14   #4
iliili
Пользователь
 
Аватар для iliili
 
Регистрация: 06.03.2010
Сообщений: 56
По умолчанию

спаибо))))))
Сделал ошибку.Исправил.Подзаработал
iliili вне форума Ответить с цитированием
Старый 22.06.2011, 13:28   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

про поиск - это правильное замечание!

можно зайти СЮДА

а ещё ЗДЕСЬ отличные примеры!
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Размер файла paravoz1k Общие вопросы Delphi 2 13.02.2011 21:52
Размер файла flug Общие вопросы Delphi 2 29.10.2009 13:43
Размер файла NetSpace Свободное общение 2 15.06.2009 13:36
Размер файла Tesmont Помощь студентам 1 15.05.2009 17:31
Размер файла Naposaram PHP 2 08.02.2009 11:54