mainform.dfm

East make Tray Icon in delphi

object frmMain: TfrmMain
  Left = 163
  Top = 126
  Width = 807
  Height = 600
  Caption = 'JVCL Package editor and generator'
  Color = clBtnFace
  Constraints.MinHeight = 400
  Constraints.MinWidth = 600
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnCloseQuery = FormCloseQuery
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object jspLeft: TJvSplitter
    Left = 137
    Top = 52
    Width = 2
    Height = 502
    Cursor = crHSplit
  end
  object jsbStatus: TJvStatusBar
    Left = 0
    Top = 554
    Width = 799
    Height = 19
    Panels = <
      item
        Width = 50
      end>
    SimplePanel = False
  end
  object pnlList: TPanel
    Left = 0
    Top = 52
    Width = 137
    Height = 502
    Align = alLeft
    BevelOuter = bvLowered
    TabOrder = 1
    object jlbList: TJvListBox
      Left = 8
      Top = 8
      Width = 121
      Height = 486
      Anchors = [akLeft, akTop, akRight, akBottom]
      ItemHeight = 13
      Background.FillMode = bfmTile
      Background.Visible = False
      PopupMenu = jpmList
      ScrollBars = ssVertical
      Sorted = True
      TabOrder = 0
      OnClick = jlbListClick
      OnKeyDown = jlbListKeyDown
      OnMouseDown = jlbListMouseDown
    end
  end
  object jcbMain: TJvControlBar
    Left = 0
    Top = 0
    Width = 799
    Height = 52
    Align = alTop
    AutoSize = True
    BevelEdges = []
    BevelInner = bvLowered
    TabOrder = 2
    object jtbMenus: TJvToolBar
      Left = 11
      Top = 2
      Width = 229
      Height = 22
      Align = alNone
      ButtonHeight = 21
      ButtonWidth = 64
      Caption = 'Menus'
      EdgeBorders = []
      Flat = True
      Menu = jmmMain
      ShowCaptions = True
      TabOrder = 0
      Wrapable = False
    end
    object jtbTools: TJvToolBar
      Left = 11
      Top = 28
      Width = 170
      Height = 22
      Caption = 'Main tools'
      DisabledImages = imlDisabled
      DragKind = dkDock
      DragMode = dmAutomatic
      EdgeBorders = []
      Flat = True
      Images = imlActive
      TabOrder = 1
      object tbtOpen: TToolButton
        Left = 0
        Top = 0
        Action = actNew
        ParentShowHint = False
        ShowHint = True
      end
      object tbtSave: TToolButton
        Left = 23
        Top = 0
        Action = actSave
        ParentShowHint = False
        ShowHint = True
      end
      object tbtExit: TToolButton
        Left = 46
        Top = 0
        Action = actExit
        ParentShowHint = False
        ShowHint = True
      end
      object tbtSep: TToolButton
        Left = 69
        Top = 0
        Width = 8
        Caption = 'tbtSep'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object tbtPrevPackage: TToolButton
        Left = 77
        Top = 0
        Action = actPrevPackage
        ParentShowHint = False
        ShowHint = True
      end
      object tbtNextPackage: TToolButton
        Left = 100
        Top = 0
        Action = actNextPackage
        ParentShowHint = False
        ShowHint = True
      end
      object tbtAddFiles: TToolButton
        Left = 123
        Top = 0
        Action = actAddFiles
        ParentShowHint = False
        ShowHint = True
      end
      object tbtGenerate: TToolButton
        Left = 146
        Top = 0
        Action = actGenerate
        ParentShowHint = False
        ShowHint = True
      end
    end
    object pnlOptions: TPanel
      Left = 194
      Top = 28
      Width = 195
      Height = 22
      BevelOuter = bvNone
      Caption = 'Options'
      DragKind = dkDock
      DragMode = dmAutomatic
      TabOrder = 2
      object shHideOptions: TShape
        Left = 0
        Top = 0
        Width = 195
        Height = 22
        Align = alClient
        Brush.Color = clBtnFace
        Pen.Style = psClear
      end
      object lblModel: TLabel
        Left = 0
        Top = 4
        Width = 61
        Height = 13
        Caption = 'Model to use'
      end
      object cmbModel: TComboBox
        Left = 68
        Top = 0
        Width = 89
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 0
        OnClick = cmbModelClick
      end
      object btnEditModel: TButton
        Left = 160
        Top = 0
        Width = 33
        Height = 21
        Caption = 'Edit'
        TabOrder = 1
        OnClick = btnEditModelClick
      end
    end
  end
  object pnlEdit: TPanel
    Left = 139
    Top = 52
    Width = 660
    Height = 502
    Align = alClient
    BevelOuter = bvLowered
    TabOrder = 3
    object lblDependencies: TLabel
      Left = 12
      Top = 132
      Width = 72
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Dependencies'
    end
    object lblFiles: TLabel
      Left = 12
      Top = 328
      Width = 72
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Files'
    end
    object lblName: TLabel
      Left = 12
      Top = 16
      Width = 72
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Name'
    end
    object lblDescription: TLabel
      Left = 12
      Top = 36
      Width = 72
      Height = 13
      Alignment = taRightJustify
      AutoSize = False
      Caption = 'Description'
    end
    object lblC5PFlags: TLabel
      Left = 12
      Top = 452
      Width = 72
      Height = 13
      Alignment = taRightJustify
      Anchors = [akLeft, akBottom]
      AutoSize = False
      Caption = 'BCB5 PFlags'
    end
    object lblC6PFlags: TLabel