v1.0.1

Helltar · Apr 18, 2015 · 0c10dbe · 0c10dbe
1 parent ad19517
commit 0c10dbe
Show file tree

Hide file tree

Showing 2 changed files with 23 additions and 31 deletions.
diff --git a/src/ampaside.lpi b/src/ampaside.lpi
@@ -17,6 +17,7 @@
       <UseVersionInfo Value="True"/>
       <AutoIncrementBuild Value="True"/>
       <MajorVersionNr Value="1"/>
+      <RevisionNr Value="1"/>
       <BuildNr Value="7"/>
       <StringTable FileDescription="Advanced MIDletPascal IDE" LegalCopyright="© 2015 Helltar" OriginalFilename="ampaside" ProductName="AMPASIDE" ProductVersion=""/>
     </VersionInfo>
@@ -118,6 +119,7 @@
       <Unit1>
         <Filename Value="uampascore.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="uAMPASCore"/>
       </Unit1>
       <Unit2>
         <Filename Value="ucodeeditor.pas"/>
@@ -161,91 +163,81 @@
         <ComponentName Value="EditorOptionsFrame"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Frame"/>
-        <UnitName Value="uEditorOptionsFrame"/>
       </Unit11>
       <Unit12>
         <Filename Value="frames/ufilemanagerframe.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="FileManagerFrame"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Frame"/>
-        <UnitName Value="uFileManagerFrame"/>
       </Unit12>
       <Unit13>
         <Filename Value="frames/ugeneraloptionsframe.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="GeneralOptionsFrame"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Frame"/>
-        <UnitName Value="uGeneralOptionsFrame"/>
       </Unit13>
       <Unit14>
         <Filename Value="frames/uprojectoptionsframe.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="ProjectOptionsFrame"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Frame"/>
-        <UnitName Value="uProjectOptionsFrame"/>
       </Unit14>
       <Unit15>
         <Filename Value="forms/uaboutform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmAbout"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uAboutForm"/>
       </Unit15>
       <Unit16>
         <Filename Value="forms/ucodeeditordm.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="dmCodeEditor"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="DataModule"/>
-        <UnitName Value="uCodeEditorDM"/>
       </Unit16>
       <Unit17>
         <Filename Value="forms/uidemacrosform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmIDEMacros"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uIDEMacrosForm"/>
       </Unit17>
       <Unit18>
         <Filename Value="forms/uideoptionsform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmIDEOptions"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uIDEOptionsForm"/>
       </Unit18>
       <Unit19>
         <Filename Value="forms/umainform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmMain"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uMainForm"/>
       </Unit19>
       <Unit20>
         <Filename Value="forms/unewprojform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmNewProj"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uNewProjForm"/>
       </Unit20>
       <Unit21>
         <Filename Value="forms/umanifestmfform.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="frmManifestMf"/>
         <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
-        <UnitName Value="uManifestMfForm"/>
       </Unit21>
       <Unit22>
         <Filename Value="uautocomplete.pas"/>
         <IsPartOfProject Value="True"/>
+        <UnitName Value="uAutocomplete"/>
       </Unit22>
     </Units>
   </ProjectOptions>

diff --git a/src/forms/umainform.lfm b/src/forms/umainform.lfm
@@ -1,12 +1,12 @@
 object frmMain: TfrmMain
-  Left = 548
-  Height = 522
-  Top = 213
-  Width = 803
+  Left = 493
+  Height = 509
+  Top = 211
+  Width = 796
   AllowDropFiles = True
   Caption = 'AMPASIDE'
-  ClientHeight = 501
-  ClientWidth = 803
+  ClientHeight = 488
+  ClientWidth = 796
   Menu = mmMain
   OnCloseQuery = FormCloseQuery
   OnCreate = FormCreate
@@ -22,7 +22,7 @@ object frmMain: TfrmMain
     Left = 322
     Height = 26
     Top = 6
-    Width = 475
+    Width = 468
     Align = alNone
     Anchors = [akTop, akLeft, akRight]
     BorderSpacing.Around = 6
@@ -120,9 +120,9 @@ object frmMain: TfrmMain
     AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = stbEditor
     Left = 322
-    Height = 225
+    Height = 212
     Top = 38
-    Width = 475
+    Width = 468
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Around = 6
     PopupMenu = pmEditor
@@ -138,8 +138,8 @@ object frmMain: TfrmMain
     AnchorSideBottom.Control = splBottom
     Left = 322
     Height = 20
-    Top = 269
-    Width = 475
+    Top = 256
+    Width = 468
     Action = actUpdateStatusBar
     Align = alNone
     Anchors = [akLeft, akRight, akBottom]
@@ -168,8 +168,8 @@ object frmMain: TfrmMain
     Cursor = crVSplit
     Left = 322
     Height = 5
-    Top = 295
-    Width = 481
+    Top = 282
+    Width = 474
     Align = alNone
     Anchors = [akLeft, akRight, akBottom]
     ResizeAnchor = akBottom
@@ -185,8 +185,8 @@ object frmMain: TfrmMain
     AnchorSideBottom.Side = asrBottom
     Left = 322
     Height = 189
-    Top = 306
-    Width = 475
+    Top = 293
+    Width = 468
     ActivePage = tsLogMsg
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Around = 6
@@ -195,12 +195,12 @@ object frmMain: TfrmMain
     object tsLogMsg: TTabSheet
       Caption = 'Сообщения'
       ClientHeight = 159
-      ClientWidth = 467
+      ClientWidth = 460
       object tvMsg: TTreeView
         Left = 6
         Height = 147
         Top = 6
-        Width = 455
+        Width = 448
         Align = alClient
         AutoExpand = True
         BorderSpacing.Around = 6
@@ -728,7 +728,7 @@ object frmMain: TfrmMain
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 251
-    Height = 457
+    Height = 444
     Top = 38
     Width = 65
     Align = alNone
@@ -803,7 +803,7 @@ object frmMain: TfrmMain
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 240
-    Height = 501
+    Height = 488
     Top = 0
     Width = 5
     Align = alNone
@@ -816,7 +816,7 @@ object frmMain: TfrmMain
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 6
-    Height = 489
+    Height = 476
     Top = 6
     Width = 228
     ActivePage = tsProjSettings