Changeset 4 for trunk/UFormMain.lfm


Ignore:
Timestamp:
May 1, 2014, 7:29:12 PM (11 years ago)
Author:
chronos
Message:
  • Added: Rearrange items in tree according Depends and Condition.
  • Fixed: Wrong parsing multiline commands.
  • Added: Log and option list forms.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/UFormMain.lfm

    r3 r4  
    1818    Height = 504
    1919    Top = 0
    20     Width = 840
     20    Width = 520
    2121    Anchors = [akTop, akLeft, akRight, akBottom]
    2222    DefaultItemHeight = 24
     23    ReadOnly = True
     24    RowSelect = True
    2325    TabOrder = 0
     26    OnSelectionChanged = TreeView1SelectionChanged
     27    Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRowSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
    2428  end
    2529  object StatusBar1: TStatusBar
     
    4549      Style = tbsCheck
    4650    end
     51    object ToolButton1: TToolButton
     52      Left = 24
     53      Top = 2
     54      Action = AShowList
     55    end
     56  end
     57  object Memo1: TMemo
     58    Left = 536
     59    Height = 498
     60    Top = 0
     61    Width = 312
     62    Anchors = [akTop, akRight, akBottom]
     63    ReadOnly = True
     64    ScrollBars = ssAutoBoth
     65    TabOrder = 3
    4766  end
    4867  object MainMenu1: TMainMenu
     
    6180        Action = AViemSystem
    6281      end
     82      object MenuItem5: TMenuItem
     83        Action = AShowList
     84      end
     85      object MenuItem6: TMenuItem
     86        Action = AShowLog
     87      end
    6388    end
    6489  end
     
    75100      OnExecute = AViemSystemExecute
    76101    end
     102    object AShowList: TAction
     103      Caption = 'Show list'
     104      OnExecute = AShowListExecute
     105    end
     106    object AShowLog: TAction
     107      Caption = 'Show log'
     108      OnExecute = AShowLogExecute
     109    end
    77110  end
    78111  object ImageList1: TImageList
Note: See TracChangeset for help on using the changeset viewer.