Подскажите пожалуйста, как сделать так, чтобы в FileListBox не отображались расширения файлов.

В procedure TFileListBox.ReadFileNames; осуществляется поиск файлов по маске. Строка где все подходящие файлы запоминаются выглядит так: Items.Add(Format('[%s]',[FileInfo.Name])); т.е. прямо с расширением, т.к. FileInfo: TSearchRec;.
Есть вариант делать невидимым компонент TFileListBox и из него копировать при изменении в TListBox изменяя к нужному виду. А можно выдрать коды TFileListBox из FileCtrl и поменяв там код использовать как свой новенький компонент...

P.S. способы предложены за неимением лучшего...

Спасибо за помощь