[Genry]

Как узнать разер файла в байтах, а потом перевести в килобайты, мегабайты, гигабайты...???

[moo2k]

http://www.delphibasics.ru/FileSize.php

[zip000]

Все делается гораздо проще. В uses добавляем idGlobal и спокойно юзаем функцию FileSizeByName. для перевода в килобайты делим это число на 1024, в мегабайты еще раз делим на 1024 и т.д.

[FekalieRex]

Я делаю так:

1. Декларируем переменную типа File of byte
2. Дальше вводим код:

AssignFile(Comp2,Edit1.Text);
Reset(Comp2);
Reps := FileSize(Comp2);
CloseFile(Comp2);

Где:

Comp2 - Я так назвал переменную File of byte
Edit1.Text - Подставляем свой файл
Reps - Переменная для хранения размера файла