Не могу найти необходимую процедуру для просмотра текстовых файлов в папке Pascal ABC.NET

[ameks94]

Добрый вечер, у меня стоит Pascal ABC.NET. И мне нужно просмотреть имена всех текстовых файлов в папке с программой, но в Pascal ABC.NET нет модуля DOS в котором содержаться такие процедуры как FindFirst, FindNext. Как можно это сделать, или какие альтернативные процедуры или модули есть в Pascal ABC.NET.
Заранее благодарен.

[TinMan]

Гм. Насколько я понимаю, в ABC.NET доступен весь функционал фреймворка .NET
Найди соответствующий метод и используйу его. Полагаю, что метод Directory.GetFiles - это то, что тебе нужно.

[ameks94]

Сообщение от TinMan

Гм. Насколько я понимаю, в ABC.NET доступен весь функционал фреймворка .NET
Найди соответствующий метод и используйу его. Полагаю, что метод Directory.GetFiles - это то, что тебе нужно.

Может я не так вас понял, но функции которые есть в этом методе (GetFiles(string);GetFiles(String, String, SearchOption)) не известны в ABC.NET.

[TinMan]

Сообщение от ameks94

Может я не так вас понял, но функции которые есть в этом методе (GetFiles(string);GetFiles(String, String, SearchOption)) не известны в ABC.NET.

1. Эти методы принадлежат классу Directory (используй форму записи Класс.Метод).
2. Класс Directory находится в модуле System.IO (добавь в uses).

Вот тебе рабочий пример, пляши от него.

uses
  System.IO;
var
  s: array of string;
  i: integer;

begin
  s:= Directory.GetFiles('c:\t\','*.txt');
  for i:=0 to s.Length-1 do writeln(s[i]);
end.

[ameks94]

Сообщение от TinMan

1. Эти методы принадлежат классу Directory (используй форму записи Класс.Метод).
2. Класс Directory находится в модуле System.IO (добавь в uses).

Вот тебе рабочий пример, пляши от него.

uses
  System.IO;
var
  s: array of string;
  i: integer;

begin
  s:= Directory.GetFiles('c:\t\','*.txt');
  for i:=0 to s.Length-1 do writeln(s[i]);
end.

Огромное спасибо!