dstatselftel.dfm

来自「一套BCB6开发的电话管理系统」· DFM 代码 · 共 242 行

DFM
242
字号
object DlgStatSelfTel: TDlgStatSelfTel
  Left = 361
  Top = 231
  BorderIcons = [biMinimize]
  BorderStyle = bsDialog
  Caption = 'DlgStatSelfTel'
  ClientHeight = 226
  ClientWidth = 225
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object Lab_Phone: TLabel
    Left = 15
    Top = 14
    Width = 60
    Height = 12
    Caption = #20998#27231#34399#30908#12288
    Font.Charset = CHINESEBIG5_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #32048#26126#39636
    Font.Style = []
    ParentFont = False
  end
  object CBPhone: TComboBox
    Left = 73
    Top = 10
    Width = 120
    Height = 21
    ItemHeight = 13
    Sorted = True
    TabOrder = 0
  end
  object GroupBox3: TGroupBox
    Left = 8
    Top = 39
    Width = 197
    Height = 80
    Caption = #32080#24115#22987#26411#26178#38291
    Font.Charset = CHINESEBIG5_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #32048#26126#39636
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 48
      Height = 12
      Caption = #38283#22987#26085#26399
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 53
      Width = 48
      Height = 12
      Caption = #32080#26463#26178#38291
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
    end
    object DPBeginDate: TDateTimePicker
      Left = 64
      Top = 20
      Width = 120
      Height = 20
      CalAlignment = dtaLeft
      Date = 39006
      Time = 39006
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 0
    end
    object DPEndDate: TDateTimePicker
      Left = 64
      Top = 49
      Width = 120
      Height = 20
      CalAlignment = dtaLeft
      Date = 39008.3654008218
      Time = 39008.3654008218
      DateFormat = dfShort
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
  end
  object OKBtn: TBitBtn
    Left = 25
    Top = 198
    Width = 70
    Height = 25
    Caption = #30906#23450
    ModalResult = 1
    TabOrder = 2
    OnClick = OKBtnClick
    Glyph.Data = {
      4E010000424D4E01000000000000760000002800000012000000120000000100
      040000000000D800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888880000008888844888888888880000008888422488888888880000008884
      2222488888888800000088422222248888888800000084222A22224888888800
      00008222A8A222488888880000008A2A888A222488888800000088A88888A222
      488888000000888888888A222488880000008888888888A22248880000008888
      8888888A222488000000888888888888A222480000008888888888888A224800
      000088888888888888A228000000888888888888888A88000000888888888888
      888888000000888888888888888888000000}
  end
  object CancelBtn: TBitBtn
    Left = 124
    Top = 198
    Width = 72
    Height = 25
    Caption = #21462#28040
    ModalResult = 2
    TabOrder = 3
    Glyph.Data = {
      4E010000424D4E01000000000000760000002800000012000000120000000100
      040000000000D800000000000000000000001000000000000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
      8888880000008887788888888888880000008891178888897888880000008891
      1178889117888800000088911117891111788800000088891111711111788800
      0000888891111111178888000000888889111111788888000000888888111117
      8888880000008888889111178888880000008888891111178888880000008888
      9111711178888800000088891117891117888800000088891178889111788800
      0000888891888889111888000000888888888888919888000000888888888888
      888888000000888888888888888888000000}
  end
  object GroupBox4: TGroupBox
    Left = 8
    Top = 121
    Width = 201
    Height = 73
    Caption = #20839#23481
    Font.Charset = CHINESEBIG5_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #32048#26126#39636
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    object ChkType34: TCheckBox
      Left = 8
      Top = 13
      Width = 80
      Height = 17
      Caption = #22283#38555#38263#36884
      Checked = True
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 0
    end
    object ChkType25: TCheckBox
      Left = 108
      Top = 12
      Width = 80
      Height = 17
      Caption = #22283#20839#38263#36884
      Checked = True
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 1
    end
    object ChkType1: TCheckBox
      Left = 9
      Top = 34
      Width = 80
      Height = 17
      Caption = #29305#27530#23616#21521
      Checked = True
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 2
    end
    object ChkType0: TCheckBox
      Left = 108
      Top = 35
      Width = 80
      Height = 17
      Caption = #26412#21312#24066#35441
      Checked = True
      Font.Charset = CHINESEBIG5_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #32048#26126#39636
      Font.Style = []
      ParentFont = False
      State = cbChecked
      TabOrder = 3
    end
    object CHBMobile: TCheckBox
      Left = 9
      Top = 53
      Width = 97
      Height = 17
      Caption = #22806#22320#25163#27231
      Checked = True
      State = cbChecked
      TabOrder = 4
    end
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?