Помощь - Поиск - Пользователи - Календарь
Полная версия: Как работать с текстовым файлом?
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
KljaGGsa
Подскажите пожалуйста, как записать в имеющийся текстовый файл text.txt фрагмент текста в несколько строк, набранный в Edit1 и как можно было бы его обозначить с тем, чтобы потом можно было бы его найти и вывести скажем в Label или Memo?
Заранее спасибо! smile.gif
Unconnected
Начнём с того, что TEdit - однострочное поле. А как работать с текстовым файлом - поиск очень хорошо рассказывает.
KljaGGsa
Исчерпывающий ответ . . (( blink.gif
Client
procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
f:System.Text;
begin
s:=edit1.Text;
AssignFile(f,'c:\1.txt');
Rewrite(f);
writeln(f,s:20);
delete(s,1,20);
writeln(f,s);
CloseFile(f);
end;
Возможно так
KljaGGsa
Спасибо, пытаюсь написать)))
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.