Problem в пути файлов OpenDialog

@Beaver · Регистрация: 26.05.2009

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

Подскажите. Я добавляю файл через OPenDialog в Edit записался путь (например H:/Курсовая/1.rtf),
на другом компьютере вставил Флешку, определяет не на Н а на I в этом случаи при просмотре у меня выбивает Error Cannon open file H:/Курсовая/1.rtf Типа того (неможет найти файл). Как избавиться от этой проблемы с адресом файла. Зарание Спасибо.

AntonChik · 13.04.2010, 10:03

я так понял ты сохраняешь в ini-файле последний путь, а потом пытаешься начать поиск через OpenDialog с этого пути?
и надеюсь ты не прописываешь путь в самом exe-шнике (в Edit), это моветон.
в общем думаю функция проверки существования файла тебе очень пригодится

Code
1
bool FileExists(AnsiString FileName);

@MikeSoft · 13.04.2010, 13:02

Beaver, переформулируйте вашу проблему более точно, а то не понятно, что делать дальше...

Как я понял, в OpenDialog выбирается файл... свойству Edit->Text присваивается OpenDialog->FileName ... а дальше что? Зачем вообще писать в Edit? Лучше будет напрямую в файл записать. Это первый совет.

А второй совет - делать проверку ... Считываем информацию из файла, содержащего путь к исполняемому файлу и заменяем литеру диска на ту, что получит функция GetCurrentDir()

Функция GetCurrentDir() возвратит строку типа UnicodeString, содержащую в себе путь, в котором лежит exe-файл приложения. Остаётся только подменить первую букву.

@Beaver · 13.04.2010, 21:13 **[ТС]**

Продолжу подробнее на кнопку пишу Button1 Click

C++
1
2
OpenDialog1->Execute();
Edit2->Text=OpenDialog1->FileName;

На второю кнопку добавить Button2 Click

C++
1
2
Query1->Params->ParamByName("Info")->AsString=(Edit2->Text);
Query1->ExecSQL();

заносится в таблицу в поля Info H:/Курсовая/1.rtf
а на другом компьютере диск I
При просмотри пишет Неможет открыть H:/Курсовая/1.rtf так как файл изменил путь I:/Курсовая/1.rtf

@Roma_F · 13.04.2010, 22:00

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

Продолжу подробнее ...

Так выше уже всё практически расписали.
Меняете первую букву в сохранённом пути на первую букву строки полученной от GetCurrentDir
Главное, чтобы исполняемый модуль и файлы находились всегда в одном разделе

@MikeSoft · 13.04.2010, 22:13

Beaver,

значит проблему я понял почти правильно. Данное мною решение полностью подходит.

Как вариант, для улучшения, советую сделать выбор файла для записи при старте программы ...

Замечание к коду:

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

C++
1
2
OpenDialog1->Execute(); 
Edit2->Text=OpenDialog1->FileName;

Советую изменить на:

C++
1
2
3
if (OpenDialog1->Execute()) { 
  Edit2->Text=OpenDialog1->FileName;
}

Это исключит вариант закрытия OpenDialog без выбора файла.

Новые блоги и статьи Все статьи Все блоги /
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .

@Beaver 1 / 1 / 0 Регистрация: 26.05.2009 Сообщений: 17

	Problem в пути файлов OpenDialog 13.04.2010, 03:41. Показов 1827. Ответов 5 Метки нет (Все метки) Подскажите. Я добавляю файл через OPenDialog в Edit записался путь (например H:/Курсовая/1.rtf), на другом компьютере вставил Флешку, определяет не на Н а на I в этом случаи при просмотре у меня выбивает Error Cannon open file H:/Курсовая/1.rtf Типа того (неможет найти файл). Как избавиться от этой проблемы с адресом файла. Зарание Спасибо. 0

@MikeSoft 3956 / 1811 / 184 Регистрация: 21.11.2009 Сообщений: 2,540
	13.04.2010, 13:02
	Beaver, переформулируйте вашу проблему более точно, а то не понятно, что делать дальше... Как я понял, в OpenDialog выбирается файл... свойству Edit->Text присваивается OpenDialog->FileName ... а дальше что? Зачем вообще писать в Edit? Лучше будет напрямую в файл записать. Это первый совет. А второй совет - делать проверку ... Считываем информацию из файла, содержащего путь к исполняемому файлу и заменяем литеру диска на ту, что получит функция GetCurrentDir() Функция GetCurrentDir() возвратит строку типа UnicodeString, содержащую в себе путь, в котором лежит exe-файл приложения. Остаётся только подменить первую букву. 0