X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Feditor%2Ff_main.lfm;h=0a7bf85a18f92d62b20f50899da3ae527afe6f60;hb=ea332be65eaf98a52891ec2bd691b0ce27c9d316;hp=d35946313f732d2b62f4064ef5577e59885b3f97;hpb=6f0e2f411ed57b45f4665c44d89d3c5e6d890a9a;p=d2df-editor.git diff --git a/src/editor/f_main.lfm b/src/editor/f_main.lfm index d359463..0a7bf85 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 @@ -64,12 +68,13 @@ object MainForm: TMainForm Constraints.MinWidth = 145 DefaultColWidth = 60 DefaultRowHeight = 16 + FixedCols = 0 Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' ParentFont = False RowCount = 2 - ScrollBars = ssVertical + ScrollBars = ssAutoVertical TabOrder = 0 TitleFont.Color = clWindowText TitleFont.Height = -12 @@ -89,8 +94,8 @@ object MainForm: TMainForm ) OnGetPickList = vleObjectPropertyGetPickList ColWidths = ( - 62 - 62 + 70 + 71 ) end object PanelPropApply: TPanel @@ -247,6 +252,7 @@ object MainForm: TMainForm Constraints.MinHeight = 70 ItemHeight = 13 OnClick = lbTextureListClick + OnDrawItem = lbTextureListDrawItem Style = lbOwnerDrawFixed TabOrder = 0 end @@ -294,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 @@ -585,7 +591,7 @@ object MainForm: TMainForm 'Выстрел' 'Монстров нет' ) - ItemHeight = 17 + ItemHeight = 15 TabOrder = 1 Data = { 06000000000000000000 @@ -605,7 +611,7 @@ object MainForm: TMainForm 'Красная команда' 'Синяя команда' ) - ItemHeight = 17 + ItemHeight = 15 TabOrder = 2 Data = { 050000000000000000