Changeset 24 for trunk/IDE/Forms/UProjectManager.pas

Timestamp:

Nov 10, 2010, 9:42:27 AM (14 years ago)

Author:

george

Message:

• Added: Parsing type parameters.
• Fixed: Saving edited files.

File:

• trunk/IDE/Forms/UProjectManager.pas (modified) (1 diff)

trunk/IDE/Forms/UProjectManager.pas

@@ -77 +77 @@
     NewNode.Expand(True);
     EndUpdate;
-    TreeViewProject.TopItem.Items[0].Selected := True;
+    if Assigned(TreeViewProject.TopItem) and
+      (TreeViewProject.TopItem.Count > 0) then
+      TreeViewProject.TopItem.Items[0].Selected := True
+      else CodeForm.ProjectFile := nil;
   end;
 end;