Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перезаписывать тхт построчно


alexdn ©   (2011-09-26 13:20:00) 

Есть ли возможность перезаписать строку в тхт выборочно? что-то вроде
 AssignFile(Fc,FName);
  reset(Fc);
     x:=0;
 While not eof(Fc) do //задаем цикл до конца файла
  begin
    readln(Fc, str); //читаем строку из файла в переменную str
     if x=1 then begin
      begin
      if radiobutton1.checked=true then writeln(Fc, '1');
      if radiobutton2.checked=true then writeln(Fc, '2');
     end;
    x:=x+1;
   end;

или переходить на бинарник из записей, что не очень хо чтобы не терять наглядность.


alexdn   (2011-09-26 13:42:00) [1]

> ProgRAMmer Dimonych ©   (26.09.11 13:24) [1]
> TStringList? Некрасиво, но задачу решит.
ну почему некрасиво, вообщем не визуальный компонент, сойдёт. спасибо


ProgRAMmer Dimonych   (2011-09-26 13:24:00) [2]

TStringList? Некрасиво, но задачу решит.


RWolf   (2011-09-26 13:24:00) [3]

StringList.LoadFromFile(FName);
StringList[42] := '111';
StringList.SaveToFile(FName);


Наверх

Титульная страница Поиск, карта сайта Написать письмо