diff --git a/ide/main.pp b/ide/main.pp
index 081ac9642f..6b15e08d30 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -2338,7 +2338,7 @@ var
   Desc: TProjectFileDescriptor;
 begin
   Category:=NewIDEItems.FindByName(FileDescGroupName);
-  Template:=Category.FindTemplateByName(EnvironmentOptions.NewUnitTemplate);
+  Template:=Category.FindTemplateByName(EnvironmentOptions.NewFormTemplate);
   if (Template is TNewItemProjectFile) and Template.VisibleInNewDialog then
     Desc:=TNewItemProjectFile(Template).Descriptor
   else