program Charge; uses Vcl.Forms, udtmSystem in 'udtmSystem.pas' {dtmSystem: TDataModule}, umstCadastro in 'umstCadastro.pas' {mstCadastro}, umstMaster in 'umstMaster.pas' {mstMaster}, umstLista in 'umstLista.pas' {mstLista}, udtmCharge in 'udtmCharge.pas' {dtmCharge: TDataModule}, {$R *.res} begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.Title := 'Charge'; Application.CreateForm(TdtmSystem, dtmSystem); Application.CreateForm(TfrmCharge, frmCharge); Application.Run; end.