IMC.dpr

program IMC;

uses
  Vcl.Forms,
  IMC.Forms.Principal in 'Forms\IMC.Forms.Principal.pas' {frmPrincipal},
  IMC.Helpers.TiposAuxiliares in 'Helpers\IMC.Helpers.TiposAuxiliares.pas',
  IMC.Helpers.Exceptions in 'Helpers\IMC.Helpers.Exceptions.pas',
  IMC.Helpers.Funcoes in 'Helpers\IMC.Helpers.Funcoes.pas',
  IMC.Classes.Pessoa in 'Classes\IMC.Classes.Pessoa.pas',
  IMC.Classes.IMCFemi in 'Classes\Strategy\IMC.Classes.IMCFemi.pas',
  IMC.Classes.IMCMasc in 'Classes\Strategy\IMC.Classes.IMCMasc.pas',
  IMC.Classes.Restaurar in 'Classes\Memento\IMC.Classes.Restaurar.pas',
  IMC.Classes.Historico in 'Classes\Memento\IMC.Classes.Historico.pas',
  IMC.Classes.Paciente in 'Classes\IMC.Classes.Paciente.pas',
  IMC.Forms.Historico in 'Forms\IMC.Forms.Historico.pas' {frmHistorico},
  IMC.Interfaces.StrategyIMC in 'Interfaces\Strategy\IMC.Interfaces.StrategyIMC.pas',
  IMC.Frames.ResultadoIMC in 'Frames\IMC.Frames.ResultadoIMC.pas' {frmResultadoIMC: TFrame},
  IMC.Interfaces.Observer in 'Interfaces\Observer\IMC.Interfaces.Observer.pas',
  IMC.Interfaces.Subject in 'Interfaces\Observer\IMC.Interfaces.Subject.pas',
  IMC.Frames.DadosCalculoIMC in 'Frames\IMC.Frames.DadosCalculoIMC.pas' {frmDadosCalculoIMC: TFrame},
  IMC.Interfaces.AbstractFactory in 'Interfaces\Abstract_Factory\IMC.Interfaces.AbstractFactory.pas',
  IMC.Classes.ConsultarSeta in 'Classes\Abstract_Factory\IMC.Classes.ConsultarSeta.pas',
  IMC.Classes.ConfigSeta in 'Classes\Abstract_Factory\IMC.Classes.ConfigSeta.pas',
  IMC.Interfaces.FabricaShapeCores in 'Interfaces\Factory_Method\IMC.Interfaces.FabricaShapeCores.pas',
  IMC.Interfaces.CoresShape in 'Interfaces\Factory_Method\IMC.Interfaces.CoresShape.pas',
  IMC.Classes.FabricaShapeCor in 'Classes\Factory_Method\IMC.Classes.FabricaShapeCor.pas',
  IMC.Classes.ShapeCores in 'Classes\Factory_Method\IMC.Classes.ShapeCores.pas';

{$R *.res}

begin
  ReportMemoryLeaksOnShutdown := True;
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TfrmPrincipal, frmPrincipal);
  Application.Run;
end.