Changeset 42 for trunk/IDE/Forms

Timestamp:

Feb 29, 2012, 11:16:44 AM (13 years ago)

Author:

chronos

Message:

• Added: Targets definition classes.

Location:

trunk/IDE/Forms

Files:

• UCompilersForm.lfm (deleted)
• UCompilersForm.pas (deleted)
• UFormTargets.lfm (added)
• UFormTargets.lrt (added)
• UFormTargets.pas (added)
• UMainForm.lfm (modified) (7 diffs)
• UMainForm.lrt (modified) (2 diffs)
• UMainForm.pas (modified) (4 diffs)

trunk/IDE/Forms/UMainForm.lfm

@@ -89 +89 @@
     Top = 26
     Width = 200
-    ActivePage = TabSheetProject
+    ActivePage = TabSheetCompiledProject
     Align = alRight
-    TabIndex = 0
+    TabIndex = 2
     TabOrder = 3
     TabPosition = tpRight
@@ -148 +148 @@
   object MainMenu1: TMainMenu
     Images = ImageList1
-    left = 624
-    top = 8
+    left = 115
+    top = 160
     object MenuItem1: TMenuItem
       Caption = 'Project'
@@ -474 +474 @@
       end
       object MenuItemProducer: TMenuItem
-        Caption = 'Producer'
+        Caption = 'Target'
       end
     end
@@ -540 +540 @@
       end
       object MenuItem24: TMenuItem
-        Action = AViewProducers
+        Action = AViewTargets
       end
     end
@@ -591 +591 @@
   object ActionList1: TActionList
     Images = ImageList1
-    left = 624
-    top = 64
+    left = 112
+    top = 216
     object AProjectNew: TAction
       Category = 'Project'
@@ -688 +688 @@
       OnExecute = AViewCompiledSoruceExecute
     end
-    object AViewProducers: TAction
+    object AViewTargets: TAction
       Category = 'View'
-      Caption = 'Producers'
-      OnExecute = AViewProducersExecute
+      Caption = 'Targets'
+      OnExecute = AViewTargetsExecute
     end
   end
@@ -707 +707 @@
   end
   object ImageList1: TImageList
-    left = 624
-    top = 112
+    left = 344
+    top = 184
     Bitmap = {
       4C690E0000001000000010000000000000000000000000000000000000000000

trunk/IDE/Forms/UMainForm.lrt

@@ -11 +11 @@
 TMAINFORM.MENUITEM12.CAPTION=-
 TMAINFORM.MENUITEM7.CAPTION=Run
-TMAINFORM.MENUITEMPRODUCER.CAPTION=Producer
+TMAINFORM.MENUITEMPRODUCER.CAPTION=Target
 TMAINFORM.MENUITEM15.CAPTION=View
 TMAINFORM.MENUITEM22.CAPTION=-
@@ -36 +36 @@
 TMAINFORM.AVIEWCODETREE.CAPTION=Code tree
 TMAINFORM.AVIEWCOMPILEDSORUCE.CAPTION=Compiled source
-TMAINFORM.AVIEWPRODUCERS.CAPTION=Producers
+TMAINFORM.AVIEWTARGETS.CAPTION=Targets

trunk/IDE/Forms/UMainForm.pas

@@ -29 +29 @@
   TMainForm = class(TForm)
     ABuild: TAction;
-    AViewProducers: TAction;
+    AViewTargets: TAction;
     AViewCompiledSoruce: TAction;
     AViewCodeTree: TAction;
@@ -114 +114 @@
     procedure AViewMessagesExecute(Sender: TObject);
     procedure AViewOptionsExecute(Sender: TObject);
-    procedure AViewProducersExecute(Sender: TObject);
+    procedure AViewTargetsExecute(Sender: TObject);
     procedure AViewProjectExecute(Sender: TObject);
     procedure AViewSourceEditorExecute(Sender: TObject);
@@ -156 +156 @@
 uses
   UMessagesForm, UCodeForm, UProjectManager, UCommon, UAboutForm, UFormOptions,
-  UCompilersForm, UTarget, UAnalyzer, UProducer;
+  UFormTargets, UTarget, UAnalyzer, UProducer;
 
 resourcestring
@@ -250 +250 @@
 end;
 
-procedure TMainForm.AViewProducersExecute(Sender: TObject);
-begin
-  FormProducers.Show;
+procedure TMainForm.AViewTargetsExecute(Sender: TObject);
+begin
+  FormTargets.Show;
 end;