Предмет: Информатика,
автор: JigulMc47
Помогите написать код delphi, который бы брал введенные данные и сохранял в txt файл.
Ответы
Автор ответа:
0
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Text := Edit1.Text;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
f: textFile;
begin
AssignFile(f, 'C:UsersHRAshtonDesktopout.txt');
rewrite(f);
Write(f, Memo1.Text);
closeFile(f);
end;
Воть, приклейте эти процедуры на кнопки:)
begin
Memo1.Text := Edit1.Text;
end;
procedure TForm1.Button2Click(Sender: TObject);
var
f: textFile;
begin
AssignFile(f, 'C:UsersHRAshtonDesktopout.txt');
rewrite(f);
Write(f, Memo1.Text);
closeFile(f);
end;
Воть, приклейте эти процедуры на кнопки:)
Приложения:
Похожие вопросы
Предмет: История,
автор: enchantics
Предмет: Геометрия,
автор: illyagnapovskiy
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: znavur1
Предмет: История,
автор: Ckaaaad