Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.10.2009, 00:34   #11
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

А ты как считывал файлы? Вроде как по строкам и было...
Я, собствено, и изложил эту идею двумя постами выше:

Код:
Var
   InF, OutF : TextFile;
   A : String;
Begin
AssignFile(InF, 'До.txt'); Reset(InF);
AssignFile(OutF, 'После.txt'); Rewrite(OutF);
While Not EoF(InF) Do
  Begin
    Readln(InF, A);
    If A = E1.Text Then
      Begin
        Writeln(OutF, E2.Text);
        Continue;
      End;
    If A = E2.Text Then Continue;
    Writeln(OutF, A);
  End;
CloseFile(InF); CloseFile(OutF);
End;

Последний раз редактировалось Вавел из ГМТУ; 29.10.2009 в 00:37.
Вавел из ГМТУ вне форума Ответить с цитированием
Старый 29.10.2009, 18:27   #12
TaYgA
Форумчанин
 
Аватар для TaYgA
 
Регистрация: 24.09.2009
Сообщений: 264
По умолчанию

Вавел из ГМТУ, большое вам спасибо. Я по вашей идеи и решил делать, просто сначало пытался сделать подругиму... Мне было не совсем понятно как именно это делается, поэтому вернулся к этой теме... Ещё раз спасибо
TaYgA вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
работа с файлом lg12 Помощь студентам 7 24.08.2009 08:33
С++ работа с файлом. НедоВовик Помощь студентам 1 05.07.2009 18:22
Работа с файлом в (Delphi/pascal) Mashul'ka Помощь студентам 5 14.05.2009 16:54
Работа с текстовым файлом (delphi). Помогите доделать программу. Snord Помощь студентам 1 14.12.2007 14:10