Главная страница
    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.75 MB
Время: 3.251 c
1-28472
Delphig
2001-12-22 03:16
2002.01.10
Вот такая штука. Нужно чтобы при выборе в ListBox строчки....


1-28470
JankinDoll
2001-12-21 20:07
2002.01.10
Как посмотреть выделенный символ в Richedite является символом переноса или нет?


6-28526
Diamond Dog
2001-10-14 17:21
2002.01.10
Отключение компьютера по сети.


1-28459
SerGa
2001-12-21 21:22
2002.01.10
Реестр и NT


14-28532
Scarlett
2001-11-16 14:20
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский