program SCA;

uses
  Forms,
  Windows,
  Principal in 'Principal.pas' {F_Principal},
  DMConexao in 'DMConexao.pas' {DM: TDataModule},
  Pai in 'Pai.pas' {F_Pai},
  Abertura in 'Abertura.pas' {F_Abertura},
  ProcuraBanco in 'ProcuraBanco.pas' {F_ProcuraBanco},
  Cliente in 'Cliente.pas' {F_Cliente};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'Sistema de Controle de Aluguel e Agua';
  Application.CreateForm(TF_Principal, F_Principal);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TF_Pai, F_Pai);
  F_Principal.Visible:= False;
  Application.CreateForm(TF_Abertura, F_Abertura);
  F_Abertura.Show;
  Application.ProcessMessages;
  Sleep(3000);
  F_Abertura.Close;
  F_Principal.Visible:= True;
  Application.Run;
end.
