Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.09.18;
Скачать: CL | DM;

Вниз

Папка или файл?   Найти похожие ветки 

 
_ilya   (2003-09-05 13:13) [0]

У меня есть полный путь к файлу, как можно узнать, это папка или обычный файл? Подскажите, plz, буду оооочень признателен.


 
Basic   (2003-09-05 13:17) [1]

задай поиск Findfirst,и проверь атрибуты


 
Sandman25   (2003-09-05 13:20) [2]

DirectoryExists


 
[lamer]Barmaglot   (2003-09-05 13:21) [3]

DirectoryExists?


 
Vovchik_A   (2003-09-05 13:31) [4]

- DirectoryExists - Это проверка на наличие
Проверить нужно по атрибутам
var
sr1 : TSearchRec;
....
repeat
If ( sr1.Attr and faDirectory ) = faDirectory Then
begin
Memo1.Lines.Add("DIR "+sr1.name)
end
....


 
Sandman25   (2003-09-05 13:33) [5]

[4] Vovchik_A © (05.09.03 13:31)

FileExists


 
Vovchik_A   (2003-09-05 13:52) [6]

Я так понял ему надо узнать папка, то, что он находит или файл.
Он это узнает по атрибутам однозначно.


 
Sandman25   (2003-09-05 16:14) [7]

Согласен.


 
Vovchik_A   (2003-09-05 16:42) [8]

2 Sandman25 © (05.09.03 16:14) [7]
Давай, Саш, автора поста дождемся наверное. Пусть вопрос уточнит


 
han_malign   (2003-09-05 17:45) [9]

dw:=GetFileAttributes(Name);
fFile:=dw and FILE_ATTRIBUTE_DIRECTORY = 0;


 
Anatoly Podgoretsky   (2003-09-05 17:52) [10]

Но и через *Exists он узнает одназначно, что лучше дело вкуса, *Exists проще.


 
panov   (2003-09-05 17:56) [11]

Достаточно использовать только DirectoryExists...



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

Текущий архив: 2003.09.18;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.008 c
3-58565
KIR
2003-08-27 13:26
2003.09.18
Можно ли в цикле удалить все данные из всех таблиц IB?


1-58722
Паша_ок
2003-08-28 00:56
2003.09.18
Как сделать панел в run-time с возможностью изменения размера ...


3-58567
Jet
2003-08-28 22:49
2003.09.18
Скопировать записи из MSSQLServer в таблицу DBF


1-58778
Keith Flint
2003-09-01 09:01
2003.09.18
Структурирование программ


1-58773
star.ru
2003-09-05 13:49
2003.09.18
kodirovka i dekodirovka





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