|
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail | |||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
13.07.2015, 17:54
|
#1 |
|
Регистрация: 13.07.2015
Сообщений: 3
|
Поиск файла
Как открыть файл с неизвестным именем, но с известной директорией где он лежит? В этой директории только один файл, но есть папки в которых тоже есть файлы.
|
|
|
|
13.07.2015, 18:45
|
#2 |
|
Форумчанин
Регистрация: 31.05.2011
Сообщений: 301
|
http://www.programmersforum.ru/showthread.php?t=55828
только там для txt, там нужно проверку убрать и ссыпать все файлы в листбокс))) |
|
|
|
|
13.07.2015, 19:20
|
#3 | |
|
Форумчанин
Регистрация: 30.06.2015
Сообщений: 353
|
Цитата:
|
|
|
|
|
|
13.07.2015, 19:47
|
#4 |
|
Участник клуба
Регистрация: 12.09.2012
Сообщений: 1,030
|
Просканируй эту директорию с помощью TSearchRect, чтобы получить имя файла, а за тем делай с ним что хочешь.
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби. 
|
|
|
|
|
14.07.2015, 09:05
|
#5 |
|
Регистрация: 13.07.2015
Сообщений: 3
|
Procedure tform1.button1click(sender:tobject) ;
Var sr : TSearchRec; Begin if FindFirst('Uni*', faAnyFile, sr) = 0 then begin Repeat Memo1.Lines.Add(sr.name); Until FindNext(sr) <> 0; FindClose(sr); end; End; Везде где есть sr пишет ошибку, types of actual and formal var parameters must be identical |
|
|
|
|
14.07.2015, 09:15
|
#6 |
|
Регистрация: 13.07.2015
Сообщений: 3
|
Все вопрос решил, спасибо!
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Поиск файла | parshin | Microsoft Office Excel | 7 | 28.02.2013 17:27 |
| Поиск файла | plusstick | Microsoft Office Access | 4 | 22.02.2010 11:09 |
| поиск файла | Mihailhome | Общие вопросы Delphi | 1 | 25.05.2009 18:03 |
| Поиск файла | Cpluser | Общие вопросы C/C++ | 4 | 03.03.2009 11:30 |
| Поиск файла БД | D-mon | БД в Delphi | 12 | 29.05.2008 13:26 |
