ComboBox и файлы

← →
Sever (2004-04-14 19:29) [0]

Необходимо заполнить КомбоБокс некоторыми файлами, найденными в директории....
Как проще обрезать расширения файлов, чтобы оне не показывались в КБ ???
Спасибо.

← →
Skier © (2004-04-14 19:34) [1]

ChangeFileExt(...) ?

← →
Sever (2004-04-14 19:42) [2]

мне необходимо только "отрезать" расширения файлов,
т.е. просто отредактировать содержимое Бокса....
Вопрос - как ?

← →
TButton © (2004-04-14 19:46) [3]

лэгко
function CutExtension(filename: string): string; var l: integer; begin l:=Length(ExtractFileExt(filename)); if l=0 then Exit; result:=Copy(filename,1,length(filename)-l); end;

← →
Skier © (2004-04-14 19:46) [4]

>Sever (14.04.04 19:42) [2]
Дык...при добавлении и обрезай. Или я что-то не понял ?

← →
Fay © (2004-04-14 19:48) [5]

2TButton © (14.04.04 19:46) [3]
Сильно! 8)
А [1] совсем никак не катит?

катит. но [1] функция общего профиля, а моя - конкретного.

Ценю юмор 8))

ComboBox и файлы Найти похожие ветки