Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/9: Рейтинг темы: голосов - 9, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16

Изменить слеш на обратный при записи OpenDialog->FileName

14.06.2015, 16:20. Показов 1948. Ответов 16
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Прошу помощи, дорогие форумчане:
"Как сделать, чтобы у OpenDialog->FileName адрес записывался, как
C:/
а не
C:\

Добавлено через 17 минут
Это вообще возможно?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
14.06.2015, 16:20
Ответы с готовыми решениями:

OpenDialog->FileName;
OpenDialog->FileName; от сюда беру путь. Мне надо вырезать рабочий каталог как лучше всего ето сделать! Либо как мне открыть етот...

OpenDialog->FileName;
OpenDialog->FileName; от сюда беру путь. Мне надо вырезать рабочий каталог как лучше всего ето сделать! Либо как мне открыть етот...

Opendialog.filename
На форме лежит dbgrid. В него выводится таблица из БД. Я выбирают в dbgrid определённую запись и для этой записи в последний(пустой)...

16
:)
Эксперт С++
4773 / 3267 / 497
Регистрация: 19.02.2013
Сообщений: 9,046
14.06.2015, 16:31
Цитата Сообщение от Яна Матрица Посмотреть сообщение
Это вообще возможно?
И главное, зачем?
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 16:36  [ТС]
Отличный сарказм))) Не приложу мозг, как справится с этой задачей.
0
:)
Эксперт С++
4773 / 3267 / 497
Регистрация: 19.02.2013
Сообщений: 9,046
14.06.2015, 16:37
Цитата Сообщение от Яна Матрица Посмотреть сообщение
Отличный сарказм
В данном случае, это уточняющий вопрос. В чем причина обозначенного желания?
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 16:49  [ТС]
считать (прочитать) из файла информацию. Это то, чего добиваюсь. Но Функция OpenDialog1->FileName всегда пишет с \ а ifstream всегда воспринимает только / и тут ничого не сделаешь?

Добавлено через 1 минуту
Цитата Сообщение от Tulosba Посмотреть сообщение
В данном случае, это уточняющий вопрос. В чем причина обозначенного желания?
считать (прочитать) из файла информацию. Это то, чего добиваюсь. Но Функция OpenDialog1->FileName всегда пишет с \ а ifstream всегда воспринимает только / и тут ничого не сделаешь?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33192 / 21488 / 8233
Регистрация: 22.10.2011
Сообщений: 36,873
Записей в блоге: 12
14.06.2015, 16:53
Лучший ответ Сообщение было отмечено Яна Матрица как решение

Решение

Замени \\ на / через StringReplace перед тем, как передавать строку в ifstream.

C++
1
2
String s = StringReplace(OpenDialog1->FileName, "\\", "/", TReplaceFlags() << rfReplaceAll);
// и s уже передавай
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 17:15  [ТС]
Цитата Сообщение от volvo Посмотреть сообщение
Замени \\ на / через StringReplace перед тем, как передавать строку в ifstream.
C++
1
2
String s = StringReplace(OpenDialog1->FileName, "\\", "/", TReplaceFlags() << rfReplaceAll);
// и s уже передавай
Сейчас попробую и сразу отпишусь.

Добавлено через 12 минут
Вот код, чёт не получается решение от volvo, может я неправильно записала и поэтому ошибка:
Вот код:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
void __fastcall TForm1::N1Click(TObject *Sender)
{
OpenDialog1->Execute();
AnsiString n1;
n1 = OpenDialog1->FileName;
Form2->Memo1->Lines->LoadFromFile(n1);
AnsiString dir=OpenDialog1->FileName;
String s = StringReplace(OpenDialog1->FileName, "\\", "/",
 TReplaceFlags() << rfReplaceAll);
ifstream input_file("s");
int a1[9];
int i=0;
while (!input_file.eof() && i<9)
{
 input_file >> a1[i];
 i++;
}
Edit1->Text = IntToStr(a1[0]);
Edit2->Text = IntToStr(a1[1]);
Edit3->Text = IntToStr(a1[2]);
Edit4->Text = IntToStr(a1[3]);
Edit5->Text = IntToStr(a1[4]);
Edit6->Text = IntToStr(a1[5]);
Edit7->Text = IntToStr(a1[6]);
Edit8->Text = IntToStr(a1[7]);
input_file.close();
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33192 / 21488 / 8233
Регистрация: 22.10.2011
Сообщений: 36,873
Записей в блоге: 12
14.06.2015, 17:41
Лучший ответ Сообщение было отмечено Яна Матрица как решение

Решение

C++
1
ifstream input_file(s);
, без кавычек
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 17:52  [ТС]
Цитата Сообщение от volvo Посмотреть сообщение
, без кавычек
Убрала кавычки и вылезло:
[BCC32 Error] Unit1.cpp(44): E2285 Could not find a match for 'ifstream::basic_ifstream(UnicodeString) '
Full parser context
Unit1.cpp(36): parsing: void _fastcall TForm1::N1Click(TObject *)
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33192 / 21488 / 8233
Регистрация: 22.10.2011
Сообщений: 36,873
Записей в блоге: 12
14.06.2015, 18:02
Лучший ответ Сообщение было отмечено Яна Матрица как решение

Решение

Вот так все нормально компилируется и работает:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
    if (OpenDialog1->Execute())
    {
        AnsiString n1 = OpenDialog1->FileName;
        Form2->Memo1->Lines->LoadFromFile(n1);
        AnsiString s = StringReplace(dir, "\\", "/", TReplaceFlags() << rfReplaceAll);
        ifstream input_file(s.c_str());
        int a1[9];
        int i = 0;
        while (!input_file.eof() && i < 9)
        {
            input_file >> a1[i];
            i++;
        }
        Edit1->Text = IntToStr(a1[0]);
        Edit2->Text = IntToStr(a1[1]);
        Edit3->Text = IntToStr(a1[2]);
        Edit4->Text = IntToStr(a1[3]);
        Edit5->Text = IntToStr(a1[4]);
        Edit6->Text = IntToStr(a1[5]);
        Edit7->Text = IntToStr(a1[6]);
        Edit8->Text = IntToStr(a1[7]);
        input_file.close();
    }
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 18:25  [ТС]
Цитата Сообщение от volvo Посмотреть сообщение
Вот так все нормально компилируется и работает:
Огромное Спасибо Тебе (Благодарю от всего своего сердца)! Всё компилируется отлично!!!!!!!
У меня все компилируется, однако в файле - пусто. И я думаю почему:
Моя структура:
C++
1
2
3
4
5
6
7
8
9
10
11
struct kimn
{
 int stil;
 int shkaf;
 int divan;
 int lishko;
 int stilets;
 int krislo;
 int tumbochka;
 int polutsa;
}kim;
Код с неизвестной ошибкой
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
void __fastcall TForm1::N2Click(TObject *Sender)
{
SaveDialog1->Execute();
AnsiString n;
n = SaveDialog1->FileName;
  kim.stil=StrToInt(Edit1->Text);
  kim.shkaf=StrToInt(Edit2->Text);
  kim.divan=StrToInt(Edit3->Text);
  kim.lishko=StrToInt(Edit4->Text);
  kim.stilets=StrToInt(Edit5->Text);
  kim.krislo=StrToInt(Edit6->Text);
  kim.tumbochka=StrToInt(Edit7->Text);
  kim.polutsa=StrToInt(Edit8->Text);
ofstream input_file2("n");
input_file2 << kim.stil << endl;
input_file2 << kim.shkaf << endl;
input_file2 << kim.divan << endl;
input_file2 << kim.lishko << endl;
input_file2 << kim.stilets << endl;
input_file2 << kim.krislo << endl;
input_file2 << kim.tumbochka << endl;
input_file2 << kim.polutsa << endl;
Form3->Memo1->Lines->SaveToFile(n);
Form3->Show();
input_file2.close();}
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33192 / 21488 / 8233
Регистрация: 22.10.2011
Сообщений: 36,873
Записей в блоге: 12
14.06.2015, 18:33
Ну то же самое ведь:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
    if (SaveDialog1->Execute())
    {
        AnsiString n = SaveDialog1->FileName;
        kim.stil = StrToInt(Edit1->Text);
        kim.shkaf = StrToInt(Edit2->Text);
        kim.divan = StrToInt(Edit3->Text);
        kim.lishko = StrToInt(Edit4->Text);
        kim.stilets = StrToInt(Edit5->Text);
        kim.krislo = StrToInt(Edit6->Text);
        kim.tumbochka = StrToInt(Edit7->Text);
        kim.polutsa = StrToInt(Edit8->Text);
 
        ofstream input_file2(n.c_str()); // прекрасно работает и без замены бекслешей
 
        input_file2 << kim.stil << endl;
        input_file2 << kim.shkaf << endl;
        input_file2 << kim.divan << endl;
        input_file2 << kim.lishko << endl;
        input_file2 << kim.stilets << endl;
        input_file2 << kim.krislo << endl;
        input_file2 << kim.tumbochka << endl;
        input_file2 << kim.polutsa << endl;
        Form3->Memo1->Lines->SaveToFile(n);
        Form3->Show();
        input_file2.close();
    }
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 19:00  [ТС]
Цитата Сообщение от volvo Посмотреть сообщение
Ну то же самое ведь:
"Процесс не может получить доступ к файлу, так как это файл занят другим процессом."
С чем это может быть связано. Это уже касается последнего сообщения volvo.

Добавлено через 4 минуты
Возможно это через моё Memo? Оно не появляется.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33192 / 21488 / 8233
Регистрация: 22.10.2011
Сообщений: 36,873
Записей в блоге: 12
14.06.2015, 19:00
Кто-то другой держит твой файл. Может быть он открыт в блокноте, или еще в каком-то редакторе, проверь.
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
14.06.2015, 19:11  [ТС]
Без Мемо работает!

Добавлено через 10 минут
Огромное спасибо, от всей души, что помогли мне!!!!!!!! Я верю в благородную карму, и она Тебя volvo обязательно вознаградит! Да прибудет Мир и Программный код во всём мире!
0
управление сложностью
 Аватар для Почтальон
1693 / 1306 / 259
Регистрация: 22.03.2015
Сообщений: 7,545
Записей в блоге: 5
15.06.2015, 09:14
Всегда когда что-то открываете - уходя - закрывайте
1
0 / 0 / 0
Регистрация: 20.05.2015
Сообщений: 16
15.06.2015, 09:19  [ТС]
Тема закрыта! Огромное спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.06.2015, 09:19
Помогаю со студенческими работами здесь

ExtractFileName(OpenDialog.FileName)
OpenFileDialog возвращает только полный путь с именем файла... Мне нужно знать только имя файла xxxxx.xxx

Сохранение openDialog.FileName в txt (delphi)
Вопрос что не так, почему не работает сохранение openDialog.FileName в файл derictory1? Принцип такой я выбираю файл из OpenDialog...

Обратный слеш
Надо это a\a заменить на ! Вот рабочий код echo preg_replace('#a\\\a#', '!', 'a\a abc'); Почему работает с тремя слешами, если...

обратный слеш в регулярке
добры вечер, естъ проблема в регулярке хачу такои штуку: если слова содержит толко симболи латинского алфавита (маленкие) и обратный...

Обратный слеш: в чем специфика?
Код: $rod_grupp = &quot;\&quot;; echo &quot;&lt;br /&gt;$rod_grupp &quot;; В редакторе подсветка кода при написании слеша гаснет, указывая на ошибку. А...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Новые блоги и статьи
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
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru