Контрольная работа: Анализ входного файла программы и вывод результатов в выходной файл
Application.Terminate;
end;
procedure TForm1.N4Click(Sender: TObject); // "Опрограмме"
begin
Form2.Show; // Открываем Form2
end;
procedure TForm1.N5Click(Sender: TObject); // "Обновить"
begin
Vv2.Lines.Clear; // Очищаем TMemo2
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); // Процедуразакрытия TForm1
begin
Application.Terminate;
end;
end.
Приложение Б. Результаты работы программы.
