program SemWork; uses Forms, sem1 in 'sem1.pas' {FormUcty}, newklient in 'newklient.pas' {Form_newklient}; {$R *.RES} begin Application.Initialize; Application.CreateForm(TFormUcty, FormUcty); Application.CreateForm(TForm_newklient, Form_newklient); Application.Run; end.