program YearOpen; uses Forms, unYearOpen in 'unYearOpen.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.