Высокоуровневые методы информатики и программирования. Сивохин А.В - 82 стр.

     end;

     procedure TOrlovMainForm.miDestroyFileFormClick(Sender: TObject);
     begin
     OrlovFileForm.Destroy;
     end;

     procedure TOrlovMainForm.miExitFileFormClick(Sender: TObject);
     begin
     Application.Terminate;
     end;

     procedure TOrlovMainForm.miCreateGraphicFormClick(Sender: TObject);
     begin
     OrlovGraphicForm:=
     TOrlovGraphicForm.Create(Application);
     end;

     procedure TOrlovMainForm.miShowGraphicFormClick(Sender: TObject);
     begin
     OrlovGraphicForm.Show;
     end;

     procedure TOrlovMainForm.miHideGraphicFormClick(Sender: TObject);
     begin
     OrlovGraphicForm.Hide;
     end;

     procedure TOrlovMainForm.miCloseGraphicFormClick(Sender: TObject);
     begin
     OrlovGraphicForm.Close;
     end;

     procedure TOrlovMainForm.miDestroyGraphicFormClick(Sender: TObject);
     begin
     OrlovGraphicForm.Destroy;
     end;

     procedure TOrlovMainForm.miExitGraphicFormClick(Sender: TObject);
     begin
     Application.Terminate;
     end;

     procedure TOrlovMainForm.miCreateTableFormClick(Sender: TObject);
     begin
     OrlovTableForm:=
     TOrlovTableForm.Create(Application);
59