program Project1;

{%TogetherDiagram 'ModelSupport_Project1\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\Project1\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\Unit1\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Project1\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Activity.txvact'}
{%TogetherDiagram 'ModelSupport_Project1\Unit1\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Component Diagram.txvcmp'}
{%TogetherDiagram 'ModelSupport_Project1\Sequence Diagram1.txvint'}
{%TogetherDiagram 'ModelSupport_Project1\Class Diagram1.txvcls'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace1\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace1\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace2\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace2\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace3\default.txaPackage'}
{%TogetherDiagram 'ModelSupport_Project1\Namespace3\default.txvpck'}
{%TogetherDiagram 'ModelSupport_Project1\Use Case Diagram1.txvuse'}

uses
  Forms,
  Unit1 in 'Unit1.pas' {FormBase},
  Namespace3 in 'Namespace3.pas';

{$R *.res}
var
  Form       : Unit1.TFormBase;
  Controller : Unit1.TController;
  Repository : Unit1.TRepository;
begin
  Application.CreateForm(TFormBase,Form);
  Controller := Unit1.TController.Create;
  Repository := Unit1.TRepository.Create;
  Unit1.connection(Form,Controller,Repository);
  Application.Run;
end.