xydm.dfm

电话银行菜单编辑器

object XYDMForm: TXYDMForm
  Left = 195
  Top = 177
  Width = 513
  Height = 375
  Caption = '响应代码表'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object ListView1: TListView
    Left = 0
    Top = 0
    Width = 505
    Height = 348
    Align = alClient
    Columns = <
      item
        Caption = '响应代码'
        Width = 100
      end
      item
        AutoSize = True
        Caption = '代码说明'
      end
      item
        Caption = '语音文件'
        Width = 100
      end>
    GridLines = True
    ReadOnly = True
    RowSelect = True
    PopupMenu = PopupMenu1
    TabOrder = 0
    ViewStyle = vsReport
  end
  object PopupMenu1: TPopupMenu
    Left = 288
    object ADD: TMenuItem
      Caption = '添加(&A)'
      OnClick = ADDClick
    end
    object Delete: TMenuItem
      Caption = '删除(&D)'
      OnClick = DeleteClick
    end
    object N1: TMenuItem
      Caption = '修改(&M)'
      OnClick = N1Click
    end
  end
  object Query1: TQuery
    DatabaseName = 'DB1'
    Left = 320
  end
end