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

Вниз

Подскажите, как из fat32 считать информацию о файле?   Найти похожие ветки 

 
Cosinus   (2002-07-15 15:27) [0]

Извините за наверное, как вам покажется глупый вопрос, но все же, не подскажите, как узнать размер текстового файла? По-моему было что-то для прямого считывания из fat32, или я не прав?
Заранее благодарен, Владислав.


 
anatol   (2002-07-15 15:35) [1]

Ni4egi s4itivat" iz fat32 ne nado. Vot primer cac uznat" razmer
liubogo tipa faila:

function GetFileSize(FileName: string): Int64;
var
SearchRec: TSearchRec;
Res: Integer;
begin
Result := 0;
try
Res := FindFirst(FileName, faAnyFile, SearchRec);
try
if Res <> 0 then
Result := 0
else
Result := SearchRec.Size;
finally
SysUtils.FindClose(SearchRec);
end;
except
Result := 0;
end;
end;


 
valery_f   (2002-07-15 15:35) [2]

А как насчет FileSize (дельфийская ф-я) или GetFileSize (WinAPI) ?


 
Cosinus   (2002-07-15 15:42) [3]

Спасибо. А насчет FileSize, то она не работает для текстовых файлов. GetFileSize по-моему тоже.


 
Digitman   (2002-07-15 15:50) [4]

>>Cosinus

Скажи на милость, где, из каких источников ты почерпнул утверждение о том, что текст.файл с т.з. упомянутых тобой ф-ций неким образом отличается от файлов с иным содержимым ? EXE, например ?


 
Poirot   (2002-07-15 15:53) [5]


> Спасибо. А насчет FileSize, то она не работает для текстовых
> файлов. GetFileSize по-моему тоже.

Ну это ещё как посмотреть... т.е. как открыть... bin или txt


 
Digitman   (2002-07-15 15:54) [6]

Если ты о
Note: FileSize can"t be used on a text file.

то почему сразу FAT32 ? А если файл на томе с NTFS ? Или с HPFS ? Тогда как ?



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

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

Наверх





Память: 0.45 MB
Время: 0.009 c
3-85330
maxim2
2002-09-04 12:51
2002.09.26
В Table есть свойства Recno и Recordcount а есть ли такиеже в AD


1-85426
olookin
2002-09-14 09:05
2002.09.26
TMemo или TRichEdit


3-85349
Nonam
2002-09-04 16:48
2002.09.26
Ref Cursor


1-85485
AFrolov
2002-09-16 17:31
2002.09.26
Как узнать какой флажок сняли/установили в TCheckListBox


7-85713
ReYka
2002-07-12 12:26
2002.09.26
Приложение Сервер под KyLix?





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