program OSVersionSample; uses Forms, Unit1 in 'Unit1.pas' {Form13}, VistaUnit in '..\VistaUnit.pas', OSVersionUnit in '..\OSVersionUnit.pas'; {$R *.res} begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TForm13, Form13); Application.Run; end.