Чтение\запись файла

@AlexP11223 · Регистрация: 20.04.2011

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

Как в 6 Билдере читать построчно файл, содержащий текст (наверно в лучше в string или char*?), и потом записывать строки в другой файл построчно (т.е. в итоге из первого файла я получу какую-то строку типа "Программирование на "Borland Builder 6"." Как потом в один файл записать "Программирование на ", а в другой ""Borland Builder 6"."? при этом в обоих должно перейти на новую строку для записи следующих строк)
Путь к файлам получаю с помощью OpenDialog в edit1/2/3

mimicria · 21.06.2011, 10:16

Получить список строк

C++

1 2	TStringList *list = new TStringList; list->LoadFromFile(OpenDialog1->FileName);

А дальше делите строки как пожелаете

@AlexP11223 · 21.06.2011, 10:28 **[ТС]**

Эм...Так в list же запишется вся строка из файла выше. А как потом разделить ее на две? В гугле что-то не нашел как это сделать.
И можно пример записи оттуда в файл?

mimicria · 21.06.2011, 10:33

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

Как в 6 Билдере читать построчно файл, содержащий текст

Считали построчно. Этот код я привёл выше

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

и потом записывать строки в другой файл построчно

C++

1	list->SaveToFile(SaveDialog1->FileName);

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

Как потом в один файл записать "Программирование на ", а в другой ""Borland Builder 6"."?

По какому принципу вы хотите делить эту строку?

@AlexP11223 · 21.06.2011, 11:19 **[ТС]**

До первого встретившегося знака " в первый файл и от него до второго " во второй файл. Если второго знака нету, то конец строки во втором файле (чтобы след. строка была с новой строки).

Добавлено через 28 минут
ой, точнее конец строки в любом случае в обоих файлах. Только в первом может быть еще текст в той же строке(если он есть соответственно в той же строке после второго ").

Добавлено через 11 минут
т.е. еще раз:
есть файл с содержимым такого типа:

Код

Программирование на "Borland Builder 6".
Программирование на "Borland Builder 6" — это легко!
Программирование на "Borland Builder 6 IDE
фывапролдж
"йцукенг"

Нужно разделить это на 2 файла.
1 файл:

Код

Программирование на .
Программирование на — это легко!
Программирование на 
фывапролдж

2 файл:

Код

Borland Builder 6
Borland Builder 6
Borland Builder 6 IDE
йцукенг

mimicria · 21.06.2011, 11:37

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

Нужно разделить это на 2 файла

А если там кавычек будет больше?

@AlexP11223 · 21.06.2011, 11:48 **[ТС]**

Как больше?

Программирование на "Borland Builder 6 ". "Borland Builder 6"
Программирование на .
Borland Builder 6 Borland Builder 6

Вообще особо замороченных проверок содержимого не требуется.

mimicria · 21.06.2011, 12:06

C++

 TStringList *srcfile = new TStringList;
 TStringList *file1 = new TStringList;
 TStringList *file2 = new TStringList;
 srcfile->LoadFromFile(OpenDialog1->FileName);
 AnsiString curr, s1, s2;
 int len;
 bool flag=false;
 for (int t=0;t<srcfile->Count;t++)
 {
  curr = srcfile->Strings[t];
  len=curr.Length();
  s1=""; s2="";
  for (int i=1;i<=len;i++)
  {
   if (curr[i]=='\"') flag=!flag;
   else
   {
    if (flag) s2=s2+curr[i];
    else s1=s1+curr[i];
   }
  }
  file1->Add(s1);
  file2->Add(s2);
 }
file1->SaveToFile("file1.txt"); // Ну или через диалог
file2->SaveToFile("file2.txt");

@AlexP11223 · 21.06.2011, 13:07 **[ТС]**

Спасибо.
А почему тут начинается с 1?

for (int i=1;i<=len;i++)

Вроде же все строки начинаются с 0.

LK · 21.06.2011, 14:56

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

А почему тут начинается с 1?
Вроде же все строки начинаются с 0.

если массив строк - с 0 , если символы в строке - с 1 .

@AlexP11223 141 / 110 / 30 Регистрация: 20.04.2011 Сообщений: 581
		1
	Чтение\запись файла 21.06.2011, 10:00. Показов 13004. Ответов 9 Метки нет (Все метки) Как в 6 Билдере читать построчно файл, содержащий текст (наверно в лучше в string или char*?), и потом записывать строки в другой файл построчно (т.е. в итоге из первого файла я получу какую-то строку типа "Программирование на "Borland Builder 6"." Как потом в один файл записать "Программирование на ", а в другой ""Borland Builder 6"."? при этом в обоих должно перейти на новую строку для записи следующих строк) Путь к файлам получаю с помощью OpenDialog в edit1/2/3 0

@AlexP11223 141 / 110 / 30 Регистрация: 20.04.2011 Сообщений: 581
	21.06.2011, 10:28 [ТС]	3
	Эм...Так в list же запишется вся строка из файла выше. А как потом разделить ее на две? В гугле что-то не нашел как это сделать. И можно пример записи оттуда в файл? 0

@AlexP11223 141 / 110 / 30 Регистрация: 20.04.2011 Сообщений: 581
	21.06.2011, 11:19 [ТС]	5
	До первого встретившегося знака " в первый файл и от него до второго " во второй файл. Если второго знака нету, то конец строки во втором файле (чтобы след. строка была с новой строки). Добавлено через 28 минут ой, точнее конец строки в любом случае в обоих файлах. Только в первом может быть еще текст в той же строке(если он есть соответственно в той же строке после второго "). Добавлено через 11 минут т.е. еще раз: есть файл с содержимым такого типа: Код Программирование на "Borland Builder 6". Программирование на "Borland Builder 6" — это легко! Программирование на "Borland Builder 6 IDE фывапролдж "йцукенг" Нужно разделить это на 2 файла. 1 файл: Код Программирование на . Программирование на — это легко! Программирование на фывапролдж 2 файл: Код Borland Builder 6 Borland Builder 6 Borland Builder 6 IDE йцукенг 0

mimicria return (true); 1976 / 1111 / 221 Регистрация: 19.04.2011 Сообщений: 2,345
	21.06.2011, 11:37	6
	Сообщение от Nubik756 Нужно разделить это на 2 файла А если там кавычек будет больше? 0

@AlexP11223 141 / 110 / 30 Регистрация: 20.04.2011 Сообщений: 581
	21.06.2011, 11:48 [ТС]	7
	Как больше? Программирование на "Borland Builder 6 ". "Borland Builder 6" Программирование на . Borland Builder 6 Borland Builder 6 Вообще особо замороченных проверок содержимого не требуется. 0

@AlexP11223 141 / 110 / 30 Регистрация: 20.04.2011 Сообщений: 581
	21.06.2011, 13:07 [ТС]	9
	Спасибо. А почему тут начинается с 1? for (int i=1;i<=len;i++) Вроде же все строки начинаются с 0. 0

LK Заблокирован
	21.06.2011, 14:56	10
	Сообщение от Nubik756 А почему тут начинается с 1? Вроде же все строки начинаются с 0. если массив строк - с 0 , если символы в строке - с 1 . 1