[CuBiC]

Здравствуйте, уважаемые программисты! У меня такая задача: имеется какая-либо папка, в ней находятся различные типы файлов... На форме находится ListBox и Button. По нажатии кнопки, в ListBox добавляются все имеющиеся файлы в папке в расширением .txt - при этом само расширение отображать не нужно. Помогите, пожалуйста. Заранее спасибо!

[M.A.D.M.A.N.]

FileListBox + Filter вкладка Win 3.1.
Можешь код из них выдрать если не охота стандартные компоны юзать

[CuBiC]

А примерчик нельзя?

[NumLock]

PHP код:

procedure TForm1.Button1Click(Sender: TObject);
var
  searchrec: TSearchRec;
begin
  if FindFirst('c:\WINDOWS\*.txt', faAnyFile, searchrec)=0 then
  begin
    repeat
      ListBox1.Items.Add(Copy(searchrec.Name, 1, LastDelimiter('.', searchrec.Name)-1));
    until FindNext(searchrec)<>0;
    FindClose(searchrec);
  end;
end; 


[Страдалецъ]

Вот я кидал примерчик. Оттуда возьмите:
http://www.delphisources.ru/forum/sh...02&postcount=5