managermain.dfm

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

          item
            Expanded = False
            FieldName = 'Caption'
            Title.Caption = '属性描述'
            Width = 250
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Must'
            PickList.Strings = (
              'False'
              'True')
            Title.Caption = '是否必须'
            Width = 55
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Around'
            Title.Caption = '改变流程编号'
            Width = 93
            Visible = True
          end>
      end
    end
    object TabEvent: TTabSheet
      Caption = '事件资料'
      ImageIndex = 4
      OnShow = TabEventShow
      object DBGrid5: TDBGrid
        Left = 0
        Top = 0
        Width = 625
        Height = 461
        Align = alClient
        DataSource = ds
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        OnTitleClick = DBGrid2TitleClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'iType'
            Title.Caption = '项目类型'
            Width = 50
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'iContent'
            Title.Caption = '项目名称'
            Width = 50
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'iValue'
            Title.Caption = '索引值'
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Caption'
            Title.Caption = '事件名称'
            Width = 150
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Hints'
            Title.Caption = '鼠标提示'
            Width = 300
            Visible = True
          end>
      end
    end
    object TabDefine: TTabSheet
      Caption = '公共变量定义'
      ImageIndex = 5
      OnShow = TabDefineShow
      object DBGrid1: TDBGrid
        Left = 0
        Top = 0
        Width = 625
        Height = 461
        Align = alClient
        DataSource = ds
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        OnTitleClick = DBGrid2TitleClick
        Columns = <
          item
            Expanded = False
            FieldName = 'ID'
            Title.Caption = 'ID号'
            Width = 30
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'vcname'
            Title.Caption = '常量名称'
            Width = 150
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'iType'
            Title.Caption = '类型'
            Width = 30
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'vccomment'
            Title.Caption = '常量注释'
            Width = 350
            Visible = True
          end>
      end
    end
    object TabVar: TTabSheet
      Caption = '每一通道变量'
      ImageIndex = 5
      OnShow = TabVarShow
      object DBGrid6: TDBGrid
        Left = 0
        Top = 0
        Width = 625
        Height = 461
        Align = alClient
        DataSource = ds
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -12
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        OnTitleClick = DBGrid2TitleClick
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'ID'
            Title.Caption = 'ID号'
            Width = 50
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'cValue'
            Title.Caption = '通道变量名称'
            Width = 350
            Visible = True
          end>
      end
    end
  end
  object CLDBNavigator1: TCLDBNavigator
    Left = 6
    Top = 495
    Width = 378
    Height = 25
    DataSource = ds
    VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbEdit, nbPost, nbCancel]
    Anchors = [akLeft, akBottom]
    Flat = True
    TabOrder = 1
    ButtonStyle = nsTextOnly
    ButtonCaptions.Strings = (
      '首记录'
      '上一条'
      '下一条'
      '末记录'
      '插入'
      '删除'
      '编辑'
      '提交'
      '取消'
      '刷新')
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
  end
  object Table: TADOTable
    CursorType = ctStatic
    AfterClose = TableAfterClose
    TableName = 'var'
    Left = 204
    Top = 216
  end
  object ds: TDataSource
    DataSet = Table
    Left = 172
    Top = 216
  end
  object CLAbout1: TCLAbout
    AutoSetVer = True
    PageURL = 'http://www.telpo.com'
    Copyright = 'NanHai Telpo.'
    ApplicationName = 'IVRStudio配置'
    WriteYear = '2002-04'
    FormColor = 8388672
    FontColor = clWhite
    LinkColor = 8454143
    SoftwareType = tCoopWare
    FormFont = 'Arial'
    CorpFont = '黑体'
    CorpFontSize = 24
    AboutBitmap.Data = {
      56880200424D56880200000000003600000028000000B5000000310100000100
      18000000000020880200202E0000202E00000000000000000000FFFFC8FFFFC8
      FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFF
      C8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFC8FFFFCEFFD4AAFF6468FFA0A2FF
      DCDBFEF0EEF8DAD7FFBBBCDF9399C7C5B5FFFFE2FFFFDDFEFEDEFFFFDEFFFFDF
      FFFFDFFFFFDFFFFFE2FFFFE3FFFFE1FFFFDDFFFFDCFFFFDDFFFFE1FFFFE3FFFF
      E1FFFFEDFFFFF0FFFFDFFEFEE9FFFFFEFFFFFFE3E3E2C3C3C2B3B3B3B4B4B4BF
      BFBFBABABAB3B3B3B4B4B4BCBCBCC9C9C9DBDBDBE5E5E5E5E5E5E0E0E0D5D5D5
      D4D4D4E0E0E0ECECECF9F9F9FEFEFEF7F7F7EBEBEBD9D9D9C8C8C8BDBDBDB6B6
      B6B8B8B8BDBDBDC7C7C7D7D7D7E7E7E7EEEEEEEBEBEBE2E2E2D5D5D5D4D4D4E0
      E0E0ECECECF9F9F9FEFEFEFCFCFCFAFAFAF8F8F8F7F7F7F8F8F8F9F9F9F4F4F4