Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
Вниз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] совсем никак не катит?
← →
TButton © (2004-04-14 19:50) [6]катит. но [1] функция общего профиля, а моя - конкретного.
← →
Fay © (2004-04-14 19:52) [7]Ценю юмор 8))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.042 c