program Project_shar; uses Forms, Unit_shar in 'Unit_shar.pas' {fmForm1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TfmForm1, fmForm1); Application.Run; end.