Forms. Вывести названия каталогов в определенной папке в RichTextBox

@Kostik654 · Регистрация: 02.03.2017

Студворк — интернет-сервис помощи студентам

Проблема с выводом названия папок в определенном каталоге. Пробовал использовать NumerateDirectories, но не смог преобразовать к типу String для вывода в RichTextBox. Вот как такое провернуть? Знаю, что тип данных sequence of string, но вывеси можно только за счет println, а мне нужно вывести в RichTextBox, т.е. последовательность надо как-то в string переделать, но как??

@volvo · 30.07.2017, 21:25

Pascal
1
2
3
4
5
6
7
8
9
implementation
uses System.IO;
 
// ...
procedure Form1.button1_Click(sender: Object; e: EventArgs);
begin
  richTextBox1.Text += 
    Directory.EnumerateDirectories(path, '*.*', SearchOption.AllDirectories).JoinIntoString(NewLine);
end;

, например

@Kostik654 · 30.07.2017, 21:36 **[ТС]**

Ошибка на той строке, где написано у меня:
loads.Text:= Directory.EnumerateDirectories(path, 'saves', SearchOption.AllDirectories).JoinIntoStr ing(NewLine);

ОЖИДАЛАСЬ ПЕРЕМЕННАЯ

@volvo · 30.07.2017, 21:46

Где именно ошибка? В каком месте строки курсор?

Добавлено через 2 минуты
Ясно. Переменная path у меня хранит путь к папке, в которой надо найти поддиректории:

Pascal
1
var path := 'C:\test';

. Если у тебя этой переменной нет - то подразумевается класс System.IO.Path. Вот и ошибка...

@Kostik654 · 30.07.2017, 21:49 **[ТС]**

перед словом path

Добавлено через 2 минуты
спасибо, помогло!
вот, что вывело:
saves\mer1
saves\uch

а как убрать вывод названия папки, в которой происходит поиск нужных папок? Вот папки Saves убрать название

@volvo · 30.07.2017, 21:57

Pascal
1
2
3
  richTextBox1.Text := 
    Directory.EnumerateDirectories(path, '*.*', SearchOption.AllDirectories).
      Select(v -> System.IO.Path.GetFileName(v)).JoinIntoString(NewLine);

выводит мне только названия самих подпапок

@Kostik654 · 30.07.2017, 22:00 **[ТС]**

а V что за переменная? Просто она у меня занята. А то не что-то не работает, но компилирует верно

@volvo · 30.07.2017, 22:01

Да что ж у тебя все не так, как должно быть? Я скопировал строку из работающего проекта. Может, у тебя версия компилятора старая?

@Kostik654 · 30.07.2017, 22:08 **[ТС]**

Да нет, все работает, но не удаляет нужное слово. V что за переменная? Просто она у меня занята

Добавлено через 2 минуты
Ладно, сам разберусь по ходу дела, а так -- спасибо

Новые блоги и статьи Все статьи Все блоги /
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .

@Kostik654 0 / 0 / 1 Регистрация: 02.03.2017 Сообщений: 129

	Forms. Вывести названия каталогов в определенной папке в RichTextBox 30.07.2017, 21:07. Показов 1512. Ответов 8 Метки нет (Все метки) Проблема с выводом названия папок в определенном каталоге. Пробовал использовать NumerateDirectories, но не смог преобразовать к типу String для вывода в RichTextBox. Вот как такое провернуть? Знаю, что тип данных sequence of string, но вывеси можно только за счет println, а мне нужно вывести в RichTextBox, т.е. последовательность надо как-то в string переделать, но как?? 0

@Kostik654 0 / 0 / 1 Регистрация: 02.03.2017 Сообщений: 129
	30.07.2017, 21:36 [ТС]
	Ошибка на той строке, где написано у меня: loads.Text:= Directory.EnumerateDirectories(path, 'saves', SearchOption.AllDirectories).JoinIntoStr ing(NewLine); ОЖИДАЛАСЬ ПЕРЕМЕННАЯ 0

@Kostik654 0 / 0 / 1 Регистрация: 02.03.2017 Сообщений: 129
	30.07.2017, 21:49 [ТС]
	перед словом path Добавлено через 2 минуты спасибо, помогло! вот, что вывело: saves\mer1 saves\uch а как убрать вывод названия папки, в которой происходит поиск нужных папок? Вот папки Saves убрать название 0

@Kostik654 0 / 0 / 1 Регистрация: 02.03.2017 Сообщений: 129
	30.07.2017, 22:00 [ТС]
	а V что за переменная? Просто она у меня занята. А то не что-то не работает, но компилирует верно 0

@volvo Супер-модератор 33398 / 21508 / 8236 Регистрация: 22.10.2011 Сообщений: 36,906 Записей в блоге: 12
	30.07.2017, 22:01
	Да что ж у тебя все не так, как должно быть? Я скопировал строку из работающего проекта. Может, у тебя версия компилятора старая? 0

@Kostik654 0 / 0 / 1 Регистрация: 02.03.2017 Сообщений: 129
	30.07.2017, 22:08 [ТС]
	Да нет, все работает, но не удаляет нужное слово. V что за переменная? Просто она у меня занята Добавлено через 2 минуты Ладно, сам разберусь по ходу дела, а так -- спасибо 0

Forms. Вывести названия каталогов в определенной папке в RichTextBox

Решение