IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

> Удалить из текста символ!
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 45
Пол: Мужской

Репутация: -  0  +


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

__ABC_____FDC__
чтобы допустим получилось
2,3ABC5,3FDC2,0

Получается что цифра перед запятой - это количество пробелов или последовательно идущих символа, а после запятой - через сколько символов опять будет пробел. Причем сделать мне это надо именно так (препод так сказал)

Язык программирования С++ Builder но тут вроде нету неизвестных функций
вот что получилось

void __fastcall TForm1::delClick(TObject *Sender)
{
char p[255];
sym=Edit->Text;
output=fopen ("WWW.txt","w");
u=0;
g=sym[1]; - это символ который надо удалить
i=0;
c=',';
while (!feof(input)) пока не конец файла
{
if (feof(input)) break;

fgets (p,255,input); считываем строку
for (i=1;i<strlen(p);i++) пока не конец строки
{
u=0; nu=0; u- количество подряд идущих пробелов например; nu-через сколько символов опять будет пробел
if (p[i]==g) {
k=i;
while (p[i]==g){ считаем кол-во повторов символа
u++;
i++;
}
while (p[i]!=g){ считаем через сколько опять пробел будет
i++;
nu++; }
s=IntToStr(u);
r=s[1];
fwrite (&r,sizeof(char),1,output);
fwrite (&c,sizeof(char),1,output);
s=IntToStr(nu);
r=s[1];
fwrite (&r,sizeof(char),1,output);}
else
{
while (p[k]==g)
k++;
fwrite (&p[k],sizeof(char),1,output);}

}

}
fclose (input);
fclose (output);
Mem->Clear();
output=fopen ("WWW.txt","r");
Mem->Lines->LoadFromFile("WWW.txt");
}


Сообщение отредактировано: Lapp -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Гость






		for(char *p = buffer; *p; p++) {
// while(*p != to_delete) p++; // Эту строку можешь удалить...

while(*p == to_delete) {
count += 1;
p++;
}
У меня на твоем примере отработало...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 45
Пол: Мужской

Репутация: -  0  +


оооо круто работает!!!! Спасибо smile.gif))
ура ща буду смотреть кнопку возвращения обратно текста этого smile.gif)


Сообщение отредактировано: Child of Bodom -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Child of Bodom   Удалить из текста символ!   18.12.2007 14:03
Lapp   Почему в паскалевском разделе?.. Переношу в С.   18.12.2007 18:09
volvo   Child of Bodom, так что-ли: #include <fstream.…   18.12.2007 20:35
Child of Bodom   Child of Bodom, так что-ли: #include <fstream…   19.12.2007 0:52
volvo   А тут не используется ничего такого, что изменило…   19.12.2007 1:34
Child of Bodom   А вообще-то тебе надо разобраться с указателями …   19.12.2007 11:45
volvo   Восстановление исходной строки я бы делал так: vo…   19.12.2007 15:17
Child of Bodom   А вот еще у меня вопросик. Можно ли по этой технол…   19.12.2007 18:24
volvo   В принципе, если ты знаешь формат файла, который ч…   19.12.2007 19:14
Child of Bodom   void __fastcall TForm1::delClick(TObject *Sender) …   19.12.2007 23:55
volvo   Вот так там будет: void __fastcall TForm1::Button6…   20.12.2007 0:26
Child of Bodom   Так вывод я попробую по аналогии сделать. Спасибо …   20.12.2007 1:10
Child of Bodom   Слушай че то не то получается. Например, пишу удал…   20.12.2007 2:15
volvo   for(char *p = buffer; *p; p++) { // while(*p …   20.12.2007 21:16
Child of Bodom   оооо круто работает!!!! Спасибо :)…   20.12.2007 22:55
Child of Bodom   ой я скоро покончу с собой:(( препод начал проверя…   21.12.2007 16:14
volvo   А теперь расскажи, что ИМЕННО ты вводишь? У тебя в…   21.12.2007 16:57
Child of Bodom   Спасибо большое еще раз. Вроде пашет.ну при опреде…   22.12.2007 21:42


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 5.05.2024 18:20
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name