X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Feditor%2Ff_main.lfm;h=344fefb0dac03850713cd2f0183a1e359ac9738e;hb=fe7bb30e30aa2c6d52bb6ad641b5f0ae10de329e;hp=e404cfab854920de9f99980430b5a18066ee2c03;hpb=b4fac8bc01cf16c033ea0e66c16eabe919c86f86;p=d2df-editor.git diff --git a/src/editor/f_main.lfm b/src/editor/f_main.lfm index e404cfa..344fefb 100644 --- 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 @@ -61,15 +65,18 @@ object MainForm: TMainForm Top = 2 Width = 145 Align = alClient + AutoAdvance = aaNone Constraints.MinWidth = 145 DefaultColWidth = 60 - DefaultRowHeight = 16 + DefaultRowHeight = 20 + Flat = True Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' + MouseWheelOption = mwGrid ParentFont = False RowCount = 2 - ScrollBars = ssVertical + ScrollBars = ssAutoVertical TabOrder = 0 TitleFont.Color = clWindowText TitleFont.Height = -12 @@ -80,6 +87,7 @@ object MainForm: TMainForm OnKeyDown = vleObjectPropertyKeyDown DisplayOptions = [doColumnTitles, doAutoColResize] DropDownRows = 11 + Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goEditing, goAlwaysShowEditor, goThumbTracking] Strings.Strings = ( '' ) @@ -89,8 +97,8 @@ object MainForm: TMainForm ) OnGetPickList = vleObjectPropertyGetPickList ColWidths = ( - 62 - 62 + 72 + 72 ) end object PanelPropApply: TPanel @@ -295,9 +303,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 +594,7 @@ object MainForm: TMainForm 'Выстрел' 'Монстров нет' ) - ItemHeight = 17 + ItemHeight = 15 TabOrder = 1 Data = { 06000000000000000000 @@ -606,7 +614,7 @@ object MainForm: TMainForm 'Красная команда' 'Синяя команда' ) - ItemHeight = 17 + ItemHeight = 15 TabOrder = 2 Data = { 050000000000000000 @@ -1936,6 +1944,12 @@ object MainForm: TMainForm object miLine1: TMenuItem Caption = '-' end + object miReopenMap: TMenuItem + Caption = 'Открыть заново' + ImageIndex = 1 + ShortCut = 116 + OnClick = miReopenMapClick + end object miSaveMiniMap: TMenuItem Caption = 'Сохранить мини-карту' Bitmap.Data = {