Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.11.2010, 15:35   #1
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
Вопрос Условие из поиска

Что именно значит данная строчка:
Код:
(SR.Name <> '.') or (SR.Name <> '..')
?
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 27.11.2010, 17:44   #2
Neeter
Форумчанин
 
Аватар для Neeter
 
Регистрация: 22.02.2009
Сообщений: 875
По умолчанию

В каждом каталоге есть элементы "." и "..". Первый - это корневая директория; второй - наддиректория. В данной строчке проверяется, не равно ли имя файла этим элементам. Возможно, это сделано для того, чтобы не добавить их в TList (или TMemo; в общем, туда, куда вы выводите список найденных файлов).
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Neeter вне форума Ответить с цитированием
Старый 27.11.2010, 18:06   #3
baster128
Форумчанин
 
Аватар для baster128
 
Регистрация: 24.04.2010
Сообщений: 205
По умолчанию

Таких имен быть не может. Если только человек объяснит, что такое SR
baster128 вне форума Ответить с цитированием
Старый 27.11.2010, 18:09   #4
Neeter
Форумчанин
 
Аватар для Neeter
 
Регистрация: 22.02.2009
Сообщений: 875
По умолчанию

baster128, а что же непонятного? TSearchRec.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Neeter вне форума Ответить с цитированием
Старый 27.11.2010, 18:21   #5
Dj_SheLL
Форумчанин
 
Аватар для Dj_SheLL
 
Регистрация: 14.10.2009
Сообщений: 128
По умолчанию

Смотри огромную статью посвящённую любому (по маске,по дате и т.д.) поиску файлов ВОТ ТУТ
Всё с комментариями,после которых отпадут многие вопросы.
Dj_SheLL вне форума Ответить с цитированием
Старый 27.11.2010, 18:24   #6
baster128
Форумчанин
 
Аватар для baster128
 
Регистрация: 24.04.2010
Сообщений: 205
По умолчанию

Так не пойдет поиск. Поясни задачу полностью.
baster128 вне форума Ответить с цитированием
Старый 27.11.2010, 19:51   #7
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Это кусок из моего кода по поиску файлов. Полная строчка такая:
Код:
if (SR.Name <> '.') or (SR.Name <> '..') then ....
.
Мне просто было важно уточнить, что это значит. Как я понял это условие нужно использовать когда нужно, чтобы файлы искались и в корневой папке
Код:
(SR.Name <> '.')
и во всех подпапках
Код:
(SR.Name <> '..')
.
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 27.11.2010, 20:16   #8
Neeter
Форумчанин
 
Аватар для Neeter
 
Регистрация: 22.02.2009
Сообщений: 875
По умолчанию

artemavd, вы полностью код приведите.
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Neeter вне форума Ответить с цитированием
Старый 27.11.2010, 22:41   #9
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Если бы я полностью привел код, то он бы на трех постах бы не уместился))
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 27.11.2010, 22:44   #10
Neeter
Форумчанин
 
Аватар для Neeter
 
Регистрация: 22.02.2009
Сообщений: 875
По умолчанию

artemavd, просто, одна строчка - как-то несерьезно)
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство.
Neeter вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Условие SkrudjMakdak Microsoft Office Excel 3 02.09.2010 17:56
условие Maka111 Microsoft Office Excel 5 17.05.2009 18:25
условие Neymexa Общие вопросы .NET 3 19.04.2009 15:39
условие Neymexa Общие вопросы по Java, Java SE, Kotlin 2 07.02.2009 11:37
Условие [Smarik] Паскаль, Turbo Pascal, PascalABC.NET 3 03.02.2008 08:08