Chip 1999 June/Chip_1999-06_cd.bin/tema/Diadema/Demo/setup.exe/Pantheon.csy/RCDATA/TOBJECTBROWSERFORM/TOBJECTBROWSERFORM.txt

Text File | 1999-04-22 | 4.5 KB | 213 lines

object ObjectBrowserForm: TObjectBrowserForm
  Left = 258
  Top = 94
  Width = 337
  Height = 353
  BorderIcons = [biSystemMenu, biMinimize, biHelp]
  Caption = 'V�b�r typu objektu'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Menu = BrowserMainMenu
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object ObjTreeView: TTreeView
    Left = 9
    Top = 49
    Width = 311
    Height = 199
    ReadOnly = True
    HideSelection = False
    Indent = 19
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    TabOrder = 0
    OnDblClick = ObjTreeViewDblClick
    PopupMenu = BrowserPopupMenu
    ParentFont = False
  end
  object LeftPanel: TPanel
    Left = 0
    Top = 49
    Width = 9
    Height = 199
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 1
  end
  object RightPanel: TPanel
    Left = 320
    Top = 49
    Width = 9
    Height = 199
    Align = alRight
    BevelOuter = bvNone
    TabOrder = 2
  end
  object BottomPanel: TPanel
    Left = 0
    Top = 248
    Width = 329
    Height = 59
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 3
    object Label1: TLabel
      Left = 10
      Top = 4
      Width = 286
      Height = 13
      Caption = 'Tip: V rozbalen�m stromu m��ete pou��t p��r�stkov� hled�n�.'
    end
    object OKBtn: TButton
      Left = 168
      Top = 25
      Width = 75
      Height = 25
      Caption = 'OK'
      Default = True
      ModalResult = 1
      TabOrder = 0
    end
    object StornoBtn: TButton
      Left = 248
      Top = 25
      Width = 75
      Height = 25
      Caption = 'Storno'
      ModalResult = 2
      TabOrder = 1
    end
  end
  object TopPanel: TPanel
    Left = 0
    Top = 26
    Width = 329
    Height = 23
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 4
    object ObjektyLbl: TLabel
      Left = 8
      Top = 4
      Width = 100
      Height = 13
      Caption = 'Dostupn� objekty'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object BrowserCoolBar: TCoolBar
    Left = 0
    Top = 0
    Width = 329
    Height = 26
    Bands = <
      item
        Control = ToolBar
        ImageIndex = -1
        MinHeight = 22
        Width = 325
      end>
    object ToolBar: TToolBar
      Left = 0
      Top = 0
      Width = 321
      Height = 22
      Align = alBottom
      EdgeBorders = []
      EdgeInner = esNone
      EdgeOuter = esNone
      Flat = True
      HotImages = PomocneDM.BtnHotImages
      Images = PomocneDM.BtnImages
      TabOrder = 0
      object RozbalitBtn: TToolButton
        Left = 0
        Top = 0
        Width = 23
        Height = 22
        Hint = 'ToolButton1'
        Caption = 'Rozbalit'
        ImageIndex = 7
        OnClick = RozbalitBtnClick
      end
      object SbalitBtn: TToolButton
        Left = 23
        Top = 0
        Width = 23
        Height = 22
        Hint = 'ToolButton2'
        Caption = 'Sbalit'
        ImageIndex = 8
        OnClick = SbalitBtnClick
      end
    end
  end
  object BrowserPopupMenu: TPopupMenu
    OnPopup = BrowserPopupMenuPopup
    Left = 176
    Top = 64
    object _VybratMnI: TMenuItem
      Caption = 'Vybrat'
      OnClick = _VybratMnIClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object _RozbalitMnI: TMenuItem
      Caption = 'Rozbalit v�e'
      OnClick = RozbalitBtnClick
    end
    object _SbalitMnI: TMenuItem
      Caption = 'Sbalit v�e'
      OnClick = SbalitBtnClick
    end
  end
  object BrowserMainMenu: TMainMenu
    Left = 56
    Top = 72
    object ObjektyMnI: TMenuItem
      Caption = '&Objekty'
      OnClick = ObjektyMnIClick
      object VybratMnI: TMenuItem
        Caption = 'Vybrat'
        Default = True
        OnClick = _VybratMnIClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object RozbalitMnI: TMenuItem
        Caption = 'Rozbalit v�e'
        OnClick = RozbalitBtnClick
      end
      object SbalitMnI: TMenuItem
        Caption = 'Sbalit v�e'
        OnClick = SbalitBtnClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object ZavritMnI: TMenuItem
        Caption = 'Zav��t'
        OnClick = ZavritMnIClick
      end
    end
  end
end