program ProjectUML;







{%TogetherDiagram 'ModelSupport_ProjectUML\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_ProjectUML\UnitUML\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_ProjectUML\ProjectUML\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_ProjectUML\default.txvpck'}
{%TogetherDiagram 'ModelSupport_ProjectUML\UnitUML\default.txvpck'}
{%TogetherDiagram 'ModelSupport_ProjectUML\ProjectUML\default.txvpck'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Class Diagram1.txvcls'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Activity Diagram1.txvact'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Deployment Diagram1.txvdpl'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Sequence Diagram1.txvint'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Use Case Diagram1.txvuse'}
{%TogetherDiagram 'ModelSupport_ProjectUML\Component Diagram1.txvcmp'}

uses
  Forms,
  UnitUML in 'UnitUML.pas' {Form1};

{$R *.res}

begin

  UnitUML.Controller:= UnitUML.Tcontroller.Create;
  unitUML.storage:=unitUML.Tstorage.Create;
  Application.CreateForm(TBaseForm, BaseForm);
  unitUML.Controller.Connectborder(Baseform);
  unitUML.Controller.ConnectStorage(Storage);
  unitUML.Baseform.ConnectController(Controller);
  unitUML.storage.ConnectController(Controller);
  Application.Run;
end.