Main: Allow drop files

[d2df-editor.git] / src / editor / f_main.lfm

diff --git a/src/editor/f_main.lfm b/src/editor/f_main.lfm
index ba976399319fab97f72002dd5e473a0330195790..0a7bf85a18f92d62b20f50899da3ae527afe6f60 100644 (file)
--- a/src/editor/f_main.lfm
+++ b/src/editor/f_main.lfm
@@ -3,6 +3,7 @@ object MainForm: TMainForm
   Height = 480
   Top = 255
   Width = 672
+  AllowDropFiles = True
   Caption = '2'
   ClientHeight = 460
   ClientWidth = 672
@@ -18,10 +19,11 @@ object MainForm: TMainForm
   OnCloseQuery = FormCloseQuery
   OnCreate = FormCreate
   OnDestroy = FormDestroy
+  OnDropFiles = FormDropFiles
   OnKeyDown = FormKeyDown
   OnKeyUp = FormKeyUp
   OnResize = FormResize
-  LCLVersion = '1.6.0.4'
+  LCLVersion = '1.6.4.0'
   object Splitter1: TSplitter
     Left = 518
     Height = 289
@@ -31,6 +33,7 @@ object MainForm: TMainForm
     Beveled = True
     MinSize = 64
     OnCanResize = Splitter1CanResize
+    OnMoved = Splitter1Moved
     ResizeAnchor = akRight
   end
   object Splitter2: TSplitter
@@ -42,6 +45,7 @@ object MainForm: TMainForm
     Align = alBottom
     MinSize = 64
     OnCanResize = Splitter2CanResize
+    OnMoved = Splitter1Moved
     ResizeAnchor = akBottom
   end
   object PanelProps: TPanel
@@ -64,6 +68,7 @@ object MainForm: TMainForm
       Constraints.MinWidth = 145
       DefaultColWidth = 60
       DefaultRowHeight = 16
+      FixedCols = 0
       Font.Color = clWindowText
       Font.Height = -12
       Font.Name = 'MS Sans Serif'
@@ -295,9 +300,9 @@ object MainForm: TMainForm
           end
           object cbPreview: TCheckBox
             Left = 35
-            Height = 19
+            Height = 17
             Top = 54
-            Width = 165
+            Width = 163
             Caption = 'Предварительный просмотр'
             TabOrder = 0
           end
@@ -586,7 +591,7 @@ object MainForm: TMainForm
             'Выстрел'
             'Монстров нет'
           )
-          ItemHeight = 17
+          ItemHeight = 15
           TabOrder = 1
           Data = {
             06000000000000000000
@@ -606,7 +611,7 @@ object MainForm: TMainForm
             'Красная команда'
             'Синяя команда'
           )
-          ItemHeight = 17
+          ItemHeight = 15
           TabOrder = 2
           Data = {
             050000000000000000