TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
StringReplace(list, "text1", "text2", TReplaceFlags() << rfReplaceAll);
list->SavetoFile("C:\\text.txt");
Сохранение текста в файл и замена текста
Доброго времени суток!
Задача 1.
При нажатии на кнопку текст из Мемо1 сохраняется в файл C:\text.txt
Дано:
Button1 , Memo1
в Мемо1 содержится "text1"
Задача 2.
При нажатии Button2 заменить в файле "C:\text.txt" текст "text1" на "text2"
Дано:
Button2, Memo2
в Мемо2 содержится "text2"
Заранее благодарен.
Задача 1.
При нажатии на кнопку текст из Мемо1 сохраняется в файл C:\text.txt
Дано:
Button1 , Memo1
в Мемо1 содержится "text1"
Задача 2.
При нажатии Button2 заменить в файле "C:\text.txt" текст "text1" на "text2"
Дано:
Button2, Memo2
в Мемо2 содержится "text2"
Заранее благодарен.
Цитата: Joe Black
Доброго времени суток!
Задача 1.
При нажатии на кнопку текст из Мемо1 сохраняется в файл C:\text.txt
Дано:
Button1 , Memo1
в Мемо1 содержится "text1"
Задача 2.
При нажатии Button2 заменить в файле "C:\text.txt" текст "text1" на "text2"
Дано:
Button2, Memo2
в Мемо2 содержится "text2"
Заранее благодарен.
Задача 1.
При нажатии на кнопку текст из Мемо1 сохраняется в файл C:\text.txt
Дано:
Button1 , Memo1
в Мемо1 содержится "text1"
Задача 2.
При нажатии Button2 заменить в файле "C:\text.txt" текст "text1" на "text2"
Дано:
Button2, Memo2
в Мемо2 содержится "text2"
Заранее благодарен.
Код:
Цитата: Joe Black
Задача 1.
При нажатии на кнопку текст из Мемо1 сохраняется в файл C:\text.txt
Дано:
Button1 , Memo1
в Мемо1 содержится "text1"
Код:
Memo1->Lines->SaveToFile("C:\\text.txt");
с этим сам разобрался.
Цитата: GIZMO
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
StringReplace(list, "text1", "text2", TReplaceFlags() << rfReplaceAll);
list->SavetoFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
StringReplace(list, "text1", "text2", TReplaceFlags() << rfReplaceAll);
list->SavetoFile("C:\\text.txt");
тут выдаёт ошибки при компиляции ничего не понел.
может подгружать надо что-то?
Цитата: Joe Black
тут выдаёт ошибки при компиляции ничего не понел.
может подгружать надо что-то?
какие ошибки? приведи сообщения компиллятора, я код не тестировал кстати забыл сообщить:(
кстати надо еще опосля удалять list;
Цитата: GIZMO
какие ошибки? приведи сообщения компиллятора, я код не тестировал кстати забыл сообщить:(
кстати надо еще опосля удалять list;
кстати надо еще опосля удалять list;
[C++ Error] Unit1.cpp(23): E2034 Cannot convert 'TStringList *' to 'AnsiString'
[C++ Error] Unit1.cpp(23): E2342 Type mismatch in parameter 'S' (wanted 'const AnsiString', got 'TStringList *')
[C++ Error] Unit1.cpp(24): E2316 'SavetoFile' is not a member of 'TStringList'
Цитата:
[C++ Error] Unit1.cpp(23): E2034 Cannot convert 'TStringList *' to 'AnsiString'
[C++ Error] Unit1.cpp(23): E2342 Type mismatch in parameter 'S' (wanted 'const AnsiString', got 'TStringList *')
Для устранения этих ошибок надо не
StringReplace(list, "text1", "text2", TReplaceFlags() << rfReplaceAll);
а StringReplace(list->Txet, "text1", "text2", TReplaceFlags() << rfReplaceAll);
Цитата:
[C++ Error] Unit1.cpp(24): E2316 'SavetoFile' is not a member of 'TStringList'
а это потомушто надо не
list->SavetoFile("C:\\text.txt");
а
list->SaveToFile("C:\\text.txt");
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
StringReplace(list->Text, "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
StringReplace(list->Text, "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
теперь ошибок не выдаёт, но замена текста не происходит.....
В цикле проходи по каждой строчке
(Не помню точно) вроде так:
(Не помню точно) вроде так:
Код:
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
Цитата: Se AD WMD
В цикле проходи по каждой строчке
(Не помню точно) вроде так:
(Не помню точно) вроде так:
Код:
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
Пробовал 2мя способами
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[0], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[0], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
не работает, без изменений...
Цитата: Joe Black
Пробовал 2мя способами
не работает, без изменений...
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[0], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[0], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->SaveToFile("C:\\text.txt");
не работает, без изменений...
Айяяяяй. Сил хватает только читать форум? Нажать Ф1 и справку прочесть - сил не хватает?
Код:
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
Посмотрите на результат.
Или например так:
Код:
String tmp = "";
for(int x=0;x<list->Count;x+=1){
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
}
for(int x=0;x<list->Count;x+=1){
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
}
Цикл кстати должен выглядеть так:
Код:
for(int x=0;x<list->Count;x++)
Код:
StringReplace(list, "text1", "text2", TReplaceFlags() << rfReplaceAll);
это я херню написал, торопился на обед:)
Цитата: kot_
Айяяяяй. Сил хватает только читать форум? Нажать Ф1 и справку прочесть - сил не хватает?
Посмотрите на результат.
Код:
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
Посмотрите на результат.
Попробовал код:
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
list->LoadFromFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
зависает программа.
А если так:
Код:
TStringList* list = new TStringList;
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
for(int x=0;x<list->Count;x+=1)
list->Add(StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll));
list->SaveToFile("C:\\text.txt");
то документ становится пустым, но прогресс очевиден, но не достигнут результата.
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
String tmp = "";
for(int x=0;x<list->Count;x++);
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
list->LoadFromFile("C:\\text.txt");
String tmp = "";
for(int x=0;x<list->Count;x++);
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
Ошибку выдаёт [C++ Error] Unit1.cpp(24): E2451 Undefined symbol 'x'
Цитата: Joe Black
Код:
TStringList* list = new TStringList;
list->LoadFromFile("C:\\text.txt");
String tmp = "";
for(int x=0;x<list->Count;x++);
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
list->LoadFromFile("C:\\text.txt");
String tmp = "";
for(int x=0;x<list->Count;x++);
tmp = StringReplace(list->Strings[x], "text2", "text1", TReplaceFlags() << rfReplaceAll);
list->Delete(x);
list->Insert(x,tmp);
Ошибку выдаёт [C++ Error] Unit1.cpp(24): E2451 Undefined symbol 'x'
Посмотри на свой код и посмотри на мой.
Цитата:
это я херню написал, торопился на обед
А ему религия не позволяет в справку посмотреть?
З.Ы. Так как приведенный код полностью рабочий, и тема исчерпана, она закрывается. автору рекомендуется не только смотреть в справку но и внимательно копипастить.