main_.dfm

以可视的方式画IVR语音导航的流程,并把流程做为源文件保存起来

object main: Tmain
  Left = 113
  Top = 342
  AutoScroll = False
  Caption = 'main'
  ClientHeight = 531
  ClientWidth = 757
  Color = clBtnFace
  Constraints.MaxHeight = 768
  Constraints.MaxWidth = 1024
  Constraints.MinHeight = 50
  Constraints.MinWidth = 125
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Splitter1: TSplitter
    Left = 131
    Top = 56
    Width = 4
    Height = 456
    Beveled = True
    Color = clBackground
    ParentColor = False
    ResizeStyle = rsUpdate
  end
  object IVRPointTree: TTreeView
    Left = 0
    Top = 56
    Width = 131
    Height = 456
    Align = alLeft
    Color = clWhite
    Indent = 19
    PopupMenu = TreePopupMenu
    ReadOnly = True
    TabOrder = 0
    OnChange = IVRPointTreeChange
    OnEdited = IVRPointTreeEdited
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 512
    Width = 757
    Height = 19
    AutoHint = True
    Panels = <
      item
        Width = 200
      end
      item
        Width = 200
      end
      item
        Width = 120
      end
      item
        Width = 80
      end
      item
        Width = 50
      end>
  end
  object CoolBar1: TCoolBar
    Left = 0
    Top = 0
    Width = 757
    Height = 56
    Bands = <
      item
        Control = ToolBar1
        ImageIndex = -1
        Width = 753
      end
      item
        Control = IVRPointTypeBar
        ImageIndex = -1
        Width = 753
      end>
    object ToolBar1: TToolBar
      Left = 9
      Top = 0
      Width = 740
      Height = 25
      Caption = 'ToolBar1'
      Color = clSilver
      Flat = True
      Images = MainImage
      ParentColor = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
      object ToolButton1: TToolButton
        Left = 0
        Top = 0
        Action = actFileNew
      end
      object ToolButton9: TToolButton
        Left = 23
        Top = 0
        Width = 8
        Caption = 'ToolButton9'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ToolButton2: TToolButton
        Left = 31
        Top = 0
        Action = actFileOpen
      end
      object ToolButton3: TToolButton
        Left = 54
        Top = 0
        Action = actFileSave
        DropdownMenu = SavePopupMenu
        Style = tbsDropDown
      end
      object ToolButton10: TToolButton
        Left = 90
        Top = 0
        Width = 8
        Caption = 'ToolButton10'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ToolButton4: TToolButton
        Left = 98
        Top = 0
        Action = actEditProperty
      end
      object ToolButton5: TToolButton
        Left = 121
        Top = 0
        Action = actEditInputPointer
      end
      object ToolButton14: TToolButton
        Left = 144
        Top = 0
        Width = 8
        Caption = 'ToolButton14'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object ToolButton15: TToolButton
        Left = 152
        Top = 0
        Action = actProjectDefine
      end
      object ToolButton11: TToolButton
        Left = 175
        Top = 0
        Action = actProjectCheck
      end
      object ToolButton13: TToolButton
        Left = 198
        Top = 0
        Action = actProjectBuild
        DropdownMenu = EnginePopup
        Style = tbsDropDown
      end
      object ToolButton12: TToolButton
        Left = 234
        Top = 0
        Width = 8
        Caption = 'ToolButton12'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object ToolButton6: TToolButton
        Left = 242
        Top = 0
        Action = acfSetupGernal
      end
      object ToolButton16: TToolButton
        Left = 265
        Top = 0
        Width = 8
        Caption = 'ToolButton16'
        ImageIndex = 3
        Style = tbsSeparator
      end
      object ToolButton7: TToolButton
        Left = 273
        Top = 0
        Action = actHelpAbout
      end
      object ToolButton8: TToolButton
        Left = 296
        Top = 0
        Action = actFileExit
      end
      object ToolButton17: TToolButton
        Left = 319
        Top = 0
        Caption = 'ToolButton17'
        ImageIndex = 3
      end
      object ToolButton18: TToolButton
        Left = 342
        Top = 0
        Width = 8
        Caption = 'ToolButton18'
        ImageIndex = 4
        Style = tbsSeparator
      end
      object Label1: TLabel
        Left = 350
        Top = 0
        Width = 48
        Height = 22
        Alignment = taCenter
        Caption = '  '#27969#31243'  '
        Color = clBtnFace
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentColor = False
        ParentFont = False
        Layout = tlCenter
      end
      object ToolButton19: TToolButton
        Left = 398
        Top = 0
        Width = 8
        Caption = 'ToolButton19'
        ImageIndex = 5
        Style = tbsSeparator
      end
      object fcTreeCombo1: TfcTreeCombo
        Left = 406
        Top = 0
        Width = 179
        Height = 22
        ButtonStyle = cbsDownArrow
        Color = clWhite
        DropDownCount = 10
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Images = IVRImage
        Items.StreamVersion = 1
        Items.Data = {00000000}
        Options = [icoExpanded, icoEndNodesOnly]
        ReadOnly = False
        ShowMatchText = True
        Sorted = False
        Style = csDropDownList
        TabOrder = 0
        TreeOptions = [tvoHideSelection, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoHotTrack, tvoToolTips]
        OnChange = fcTreeCombo1Change