| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
FindFirst, FindNext
Sliski Slimak © (2003-04-23 16:34:00)Привет всем!
что это такое, может кто объяснит..
в папке 2 текстовых файла.....
if FindFirst ("папка\*.*,s")=0 then
begin
Memo1.lines.add (s.name);
while FindNext (s)=0 do
begin
Memo1.lines.add (s.name);
end;
end;
и вижу в Мемо такой текст
.
..
1.тхт
2.тхт
что это за точки?
Palladin (2003-04-24 10:34:00) [1]что бы знать основы ОС
начинай ты лучьше с DOS
Sliski Slimak (2003-04-24 04:50:00) [2]Спасибо....
Будем знать основы ОС ;)
Song (2003-04-23 19:49:00) [3]FindClose() забыли
Proton (2003-04-23 19:41:00) [4]Позволю себе наглость неколко модифицировать ваш пример
sr := FindFirst ("папка\*.*",s);
while sr = 0 do
begin
Memo1.lines.add(s.name);
sr := FindNext (s);
end;
panov (2003-04-23 16:36:00) [5]Основы ОС надо знать.
. - фиктивныя ссылка, указывающая на текущий каталог
.. - фиктивныя ссылка, указывающая на каталог уровнем выше
MortalScorpion (2003-04-23 16:36:00) [6]Одна точка - это твой каталог
Две точки - это предыдущий каталог
| |
