pubinfo.dfm

电话银行菜单编辑器

object PubForm: TPubForm
  Left = 196
  Top = 212
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = '公共信息配置'
  ClientHeight = 294
  ClientWidth = 469
  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 PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 469
    Height = 294
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '机构信息'
      object Label1: TLabel
        Left = 16
        Top = 64
        Width = 67
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '核算机构:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 248
        Top = 64
        Width = 59
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '发送机构:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label3: TLabel
        Left = 32
        Top = 108
        Width = 51
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '操作员:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 231
        Top = 108
        Width = 75
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '交易提交者:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 23
        Top = 152
        Width = 59
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '交易渠道:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 37
        Top = 78
        Width = 24
        Height = 13
        Caption = '0320'
      end
      object Label7: TLabel
        Left = 265
        Top = 78
        Width = 24
        Height = 13
        Caption = '0330'
      end
      object Label8: TLabel
        Left = 45
        Top = 122
        Width = 24
        Height = 13
        Caption = '0601'
      end
      object Label9: TLabel
        Left = 256
        Top = 122
        Width = 24
        Height = 13
        Caption = '0609'
      end
      object Label10: TLabel
        Left = 40
        Top = 166
        Width = 25
        Height = 13
        Caption = '060C'
      end
      object Edit1: TEdit
        Left = 88
        Top = 60
        Width = 121
        Height = 21
        MaxLength = 10
        TabOrder = 0
        OnKeyUp = Edit1KeyUp
      end
      object Edit2: TEdit
        Left = 312
        Top = 60
        Width = 121
        Height = 21
        MaxLength = 10
        TabOrder = 1
        OnKeyUp = Edit1KeyUp
      end
      object Edit3: TEdit
        Left = 88
        Top = 104
        Width = 121
        Height = 21
        MaxLength = 10
        TabOrder = 2
        OnKeyUp = Edit1KeyUp
      end
      object Edit4: TEdit
        Left = 312
        Top = 104
        Width = 121
        Height = 21
        MaxLength = 10
        TabOrder = 3
        OnKeyUp = Edit1KeyUp
      end
      object Edit5: TEdit
        Left = 88
        Top = 148
        Width = 121
        Height = 21
        MaxLength = 10
        TabOrder = 4
        OnKeyUp = Edit1KeyUp
      end
      object BitBtn1: TBitBtn
        Left = 120
        Top = 200
        Width = 75
        Height = 25
        Caption = '修改'
        Default = True
        TabOrder = 5
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object BitBtn2: TBitBtn
        Left = 248
        Top = 200
        Width = 75
        Height = 25
        Caption = '取消'
        TabOrder = 6
        Kind = bkCancel
      end
    end
  end
  object Query1: TQuery
    DatabaseName = 'DB1'
    Left = 256
  end
end