| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
имя файла без расширения [D7, WinXP]
lehich © (2005-03-14 14:49:00)собственно каким образом получить???
Начинающий2 (2005-03-14 17:02:00) [1]Antonn © (14.03.05 16:56) [5]
Вообщето переменная здесь и не нужна, я привёл это для твоего варианта.
Antonn (2005-03-14 16:56:00) [2]Начинающий2 (14.03.05 16:49) [4]
у меня велосипеднее:) Вот что значит лень искать готовые функции:))
Начинающий2 (2005-03-14 16:49:00) [3]Точно велосипед, не проще ли так:
ss:=ChangeFileExt(ExtractFileName('C:\windows\boot.ini'),'');
label1.Caption:= ss;
Antonn (2005-03-14 16:30:00) [4]А вот велосипед еще никто не предлагал:)
ss:='C:\windows\boot.ini';
ss:=extractfilename(ss);
delete(ss,(length(ss)- length(extractfileext(ss))+1), length(extractfileext(ss)));
label1.Caption:= ss;
Начинающий2 (2005-03-14 16:18:00) [5]Вот так точно даст без расширения:
ChangeFileExt(ExtractFileName(Fileopen),'')
ssk (2005-03-14 14:51:00) [6]ChangeFileExt()
| |
