Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];

Вниз

HELP ME!!!!!!!!!!!!!!   Найти похожие ветки 

 
AVALLOGIGS   (2001-12-22 13:27) [0]

Как мне узнать размер файла не через Filesize. К примеру мне надо узнать точный разер файла c:\text.txt можно через GetFileSize ПОМОГИТЕ


 
AVALLOGIGS   (2001-12-22 13:51) [1]

&&&???


 
Вадим   (2001-12-22 14:06) [2]

funtion GetFileSize(const FileName: string): integer;
var
Stream: TFileStream;
begin
Stream := TFileStream.Create(FileName, mfOpenRead);
try
Result := Stream.Size;
finally
Stream.Free;
end;
end;


 
AVALLOGIGS   (2001-12-22 14:34) [3]

СПАСИБО БООООЛЬШоЕ


 
Anatoly Podgoretsky   (2001-12-22 18:47) [4]

Хочу предупредить, что данным методом у тебя не всегда получится, файл может быть закрыт для чтения, лучше делвть это при помощи FindFirst


 
Иван Шихалев   (2001-12-22 18:50) [5]

API GetFileSize - тоже неплохо, если не расчитываешь то же саме делать под Linux.



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.55 MB
Время: 0.018 c
1-28486
Telemax
2001-12-22 10:56
2002.01.10
Копирование форм.


7-28550
Eduard1
2001-09-28 14:04
2002.01.10
Hook - Help me


1-28474
Delphig
2001-12-22 02:32
2002.01.10
Подсветка синтексиса? Например в HTML редакторе.


1-28456
Serg5
2001-12-21 19:36
2002.01.10
Знатоки, подскажите. плиз, как запретить ввод любых значений в StringGrid, кроме первой колонки. Т.е. остальные попросту у меня предназначенны для отображения результата.


1-28468
avr555
2001-12-21 16:50
2002.01.10
Сделать компонент поверх всех.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский