Вывести в Caption название текущей папки

@Estidilarn · Регистрация: 17.02.2015

Студворк — интернет-сервис помощи студентам

C++
1
ShellExecute(NULL, L"open", ExtractFilePath(Application->ExeName).c_str(), NULL,NULL,SW_SHOWNORMAL);//открывает папку в которой находиться сам exe

Можно ли вывести название папки в caption кнопки чтобы получилось примерно вот так : Открыть Name Folder (Name Folder - имя папки) ?

@Estidilarn · 18.02.2015, 16:04 **[ТС]**

SatanaXIII, вы поняли хоть что хочу сделать? походу не совсем!

А где название папки в которой лежит exe ?
Ведь сказал нужно в caption отобразить Открыть Name Folder (Name Folder - это имя папки в которой лежит exe)

@volvo · 18.02.2015, 16:18

Сообщение от Estidilarn

вы поняли хоть что хочу сделать?

"Да как же тебя понять, коли ты ничего не говоришь?" (С) "Иван Васильевич меняет профессию"

Объясни толком, что нужно - получишь объяснение как это сделать. Вот тебе пример полный путь к приложению:

D:\\test\\MyProgram\\exe\\project.exe

Что надо куда поместить (причем не "примерно как-то вот-так вот", а с точностью до СИМВОЛА), и что открыть?

@Estidilarn · 18.02.2015, 16:40 **[ТС]**

Сообщение от D1973

С++ или русский?

C++

Сообщение от D1973

Дык что сделать-то?

Задача
Не знаю как вы это все реализовывать будете, может что то и получиться у вас...

На форме есть MainMenu в MainMenu есть пункт: Открыть New Folder он должен автомат. определить имя папки даже если она была переименова (в которой он сам находиться exe) и вывести в caption (Открыть New Folder) название папки и должен её открывать если был произведен клик.

P.S
Должно быть так:
Зашли в MainMenu там есть пункт :нажали на Открыть New Folder и открылась папка где лежит exe

exe-файл находиться по адресу: С:\New Folder\File.exe
Открыть - это просто приставка она никак не должна изменяться
New Folder - это имя папки в которой лежит скомпилированный exe-файл

@SatanaXIII · 18.02.2015, 16:44

Сообщение от Estidilarn

вы поняли хоть что хочу сделать? походу не совсем!

Не совсем это слабо сказано.

Сообщение от Estidilarn

А где название папки в которой лежит exe ?

В заголовке окна текущей программы. Это такая полосочка верху окна, где буковки всякие и кнопочки свенуть/развернуть/закрыть.

Сообщение от Estidilarn

Не знаю как вы это все реализовывать будете

Адиос.

@Estidilarn · 18.02.2015, 16:49 **[ТС]**

Сообщение от volvo

Объясни толком

написал более подробно

@Lelik-pahan · 18.02.2015, 17:09

ну попробую и я )

я так понял, тебе нужно не полное имя (абсолютный путь), а только имя конечной директории

C++
1
2
3
4
5
    String pathName = ExtractFileDir(ParamStr(0));
    while (pathName.Pos("\\"))
        pathName.Delete(1, pathName.Pos("\\"));
 
    ShowMessage(pathName);

вот так его можно получить.

@Estidilarn · 18.02.2015, 17:14 **[ТС]**

Сообщение от Lelik-pahan

ну попробую и я )

Толку от вашего кода

caption не меняется, папка не открывается

@Lelik-pahan · 18.02.2015, 17:15

Как открыть папку и менять Caption тебе уже 100 раз тут написали, мог бы сам переделать.

//это конструктор формы

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    String pathName = ExtractFileDir(ParamStr(0));
    while (pathName.Pos("\\"))
        pathName.Delete(1, pathName.Pos("\\"));
 
    MI_Open->Caption = "Îòêðûòü " + pathName;  //MI_Open - это имя пункта меню
}
//---------------------------------------------------------------------------
//это событие, возникающее при клике по пункту меню
void __fastcall TForm1::MI_OpenClick(TObject *Sender)
{
    ShellExecute(NULL, "open", ExtractFilePath(Application->ExeName).c_str(), NULL,NULL,SW_SHOWNORMAL);  //для старых версий билдера
    //ShellExecute(NULL, L"open", ExtractFilePath(Application->ExeName).w_str(), NULL,NULL,SW_SHOWNORMAL);  //для новых
}

@volvo · 18.02.2015, 17:18

C++
1
2
    String path = ExtractFileName(ExtractFileDir(ParamStr(0)));
    ShowMessage(path);

@gunslinger · 18.02.2015, 17:24

Полагаю, нужно уточнить у ТС (мало ли что)

Если полный путь к ехе

E:\\Games\\Warcraft III\\war3.exe

то в пункте меню должно быть написано

Открыть Warcraft III

По нажатию на пункт меню требуется открыть директорию

E:\\Games\\Warcraft III

Так?

@volvo · 18.02.2015, 17:29

gunslinger, оставь его, это просто тролль, я уже задавал этот вопрос - он остался без ответа. Чего ты решил, что тебе он ответит? Любой первоклассник бы уже написал код по тем фрагментам, которые тут выложили.

P.S. Don't feed the Troll

@Estidilarn · 18.02.2015, 17:35 **[ТС]**

Сообщение от volvo

String path = ExtractFileName(ExtractFileDir(ParamStr( 0)));
* * ShowMessage(path);

Мне окошко не не надо,
надо в caption компонента

Добавлено через 51 секунду

Сообщение от gunslinger

Открыть Warcraft III

да так

Добавлено через 1 минуту

Сообщение от volvo

я уже задавал этот вопрос - он остался без ответа

какой вопрос ? я дал ответ что надо сделать!

Добавлено через 45 секунд

Сообщение от volvo

Объясни толком, что нужно - получишь объяснение как это сделать. Вот тебе пример полный путь к приложению

Задача
Не знаю как вы это все реализовывать будете, может что то и получиться у вас...

На форме есть MainMenu в MainMenu есть пункт: Открыть New Folder он должен автомат. определить имя папки даже если она была переименова (в которой он сам находиться exe) и вывести в caption (Открыть New Folder) название папки и должен её открывать если был произведен клик.

P.S
Должно быть так:
Зашли в MainMenu там есть пункт :нажали на Открыть New Folder и открылась папка где лежит exe

exe-файл находиться по адресу: С:\New Folder\File.exe
Открыть - это просто приставка она никак не должна изменяться
New Folder - это имя папки в которой лежит скомпилированный exe-файл

Добавлено через 2 минуты

Сообщение от gunslinger

E:\\Games\\Warcraft III

Можете и этот вариант сделать если вас не затруднит

@D1973 · 18.02.2015, 17:47

Так, попытаюсь и я...

Попытка - не пытка. Л.Берия

1.

Сообщение от Estidilarn

На форме есть MainMenu

Единственное, что понятно на 100%
2.

Сообщение от Estidilarn

в MainMenu есть пункт: Открыть New Folder он должен автомат. определить имя папки даже если она была переименова (в которой он сам находиться exe)

Остановимся тут чуть-чуть подольше...
Вопрос 1.

в которой он сам находиться exe

Что это за ехе?
а) Это исполняемый файл твоего проекта?
б) Это просто какая-то левая программа, которую ты хочешь запустить из своего приложения?
в) Не знаю...
Вопрос 2.

даже если она была переименова

а) Ты предлагаешь искать какой-то файл File.exe по всему винчестеру и забирать в переменную имя папки, в которой он лежит?
б) Ты знаешь точно, где лежит файл File.exe?
в) Не знаю...
3.

Сообщение от Estidilarn

вывести в caption (Открыть New Folder) название папки

а) Caption должен влючать полный путь к папке?
б) Caption должен включать только каталог последнего уровня без имени exe-файла?
в) Caption должен включать только каталог последнего уровня с именем exe-файла?
г) Не знаю...

Ответь на вопросы вышепреведенного теста, тогда господам форумчанам будет более понятно, что ты хочешь и хочешь ли вообще...

@Estidilarn · 18.02.2015, 17:52 **[ТС]**

Сообщение от D1973

Так, попытаюсь и я.

Можете даже исходник не смотреть просто exe проекта запустить
Там всё ясно чего хотел

P.S
Здесь за место полного пути показывает конечную папку в caption
Хотелось бы посмотреть ваш вариант

@Estidilarn · 18.02.2015, 18:34 **[ТС]**

Сообщение от D1973

Что это за ехе?

Сообщение от D1973

даже если она была переименова

exe проекта

Сообщение от D1973

Ты знаешь точно, где лежит файл File.exe?

Да знаю,в папке где лежит exe проекта

Сообщение от D1973

Caption должен влючать полный путь к папке?

Можно полный путь

Добавлено через 33 секунды

Сообщение от D1973

Ответь на вопросы вышепреведенного теста, тогда господам форумчанам будет более понятно, что ты хочешь и хочешь ли вообще...

Ответы даны!

@Lelik-pahan · 19.02.2015, 09:29

Сообщение от volvo

String path = ExtractFileName(ExtractFileDir(ParamStr( 0)));
ShowMessage(path);

Что-то я и не додумался, что директория - это тоже файл. Искал функцию на подобии ExtractDirName :-)

Estidilarn, с учётом поправки volvo вот этот код. Всего три строчки! что сложного? скажи, что у тебя тут не работает?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//это конструктор формы
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    String pathName = ExtractFileName(ExtractFileDir(ParamStr(0)));
    MI_Open->Caption = "Открыть " + pathName;  //MI_Open - это имя пункта меню
}
//---------------------------------------------------------------------------
//это событие, возникающее при клике по пункту меню
void __fastcall TForm1::MI_OpenClick(TObject *Sender)
{
    ShellExecute(NULL, "open", ExtractFilePath(Application->ExeName).c_str(), NULL, NULL, SW_SHOWNORMAL);  //для старых версий билдера
    //ShellExecute(NULL, L"open", ExtractFilePath(Application->ExeName).w_str(), NULL, NULL, SW_SHOWNORMAL);  //для новых
}

Новые блоги и статьи Все статьи Все блоги /
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть не большие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .

@Estidilarn 0 / 0 / 0 Регистрация: 17.02.2015 Сообщений: 18
	18.02.2015, 16:04 [ТС]
	SatanaXIII, вы поняли хоть что хочу сделать? походу не совсем! А где название папки в которой лежит exe ? Ведь сказал нужно в caption отобразить Открыть Name Folder (Name Folder - это имя папки в которой лежит exe) 0

@volvo Супер-модератор 33478 / 21576 / 8250 Регистрация: 22.10.2011 Сообщений: 37,034 Записей в блоге: 12
	18.02.2015, 17:29
	gunslinger, оставь его, это просто тролль, я уже задавал этот вопрос - он остался без ответа. Чего ты решил, что тебе он ответит? Любой первоклассник бы уже написал код по тем фрагментам, которые тут выложили. P.S. Don't feed the Troll 0