Changeset 4 for trunk/StudioPackage/Forms/UFormProject.pas

Timestamp:

Aug 1, 2012, 11:10:12 PM (12 years ago)

Author:

chronos

Message:

• Modified: Base pagecontrol layout.

File:

• trunk/StudioPackage/Forms/UFormProject.pas (modified) (3 diffs)

trunk/StudioPackage/Forms/UFormProject.pas

@@ -45 +45 @@
 
 uses
-  UDataModule, UFormMain, UFormSourceCode, UFormTargetCode, UFormCodeTree;
+  UDataModule, UFormMain, UFormSourceCode;
 
 resourcestring
@@ -107 +107 @@
 begin
   if Assigned(TreeViewProject.Selected) then
-    Core.Project.Files.Remove(TObject(TreeViewProject.Selected.Data));
+    DataModule1.Project.Files.Remove(TObject(TreeViewProject.Selected.Data));
   UpdateProjectTree;
 end;
@@ -135 +135 @@
   NewNode: TTreeNode;
 begin
-  with Core, TreeViewProject, Items do
+  with DataModule1, TreeViewProject, Items do
   try
     BeginUpdate;