⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 terminal.dfm

📁 1. 发卡服务端:Server 项目文件:autojet.prj 2. 计费客户端:Client 项目文件:internet.prj Explorer.prj 先启动Exp
💻 DFM
字号:
object Frm_Terminal: TFrm_Terminal
  Left = 72
  Top = 14
  BorderStyle = bsDialog
  Caption = ' '#32456#31471#32500#25252
  ClientHeight = 518
  ClientWidth = 670
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 15
  object Bevel1: TBevel
    Left = 280
    Top = 8
    Width = 376
    Height = 298
  end
  object Label1: TLabel
    Left = 360
    Top = 49
    Width = 48
    Height = 15
    Caption = #32456#31471#21517#31216
  end
  object Label2: TLabel
    Left = 361
    Top = 94
    Width = 48
    Height = 15
    Caption = #36153#29575#31867#22411
  end
  object Label3: TLabel
    Left = 367
    Top = 139
    Width = 36
    Height = 15
    Caption = #20018#21475#21495
  end
  object GroupBox1: TGroupBox
    Left = 280
    Top = 368
    Width = 375
    Height = 139
    Caption = ' '#32479#35745#20449#24687' '
    TabOrder = 9
  end
  object DBGrid1: TDBGrid
    Left = 12
    Top = 9
    Width = 258
    Height = 491
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnDrawColumnCell = DBGrid1DrawColumnCell
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'TermName'
        Title.Alignment = taCenter
        Title.Caption = #32456#31471
        Width = 60
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Rname'
        Title.Alignment = taCenter
        Title.Caption = #36153#29575
        Width = 60
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'COMNAME'
        Title.Alignment = taCenter
        Title.Caption = #20018#21475#21495
        Width = 60
        Visible = True
      end>
  end
  object Btn_Add: TButton
    Left = 329
    Top = 230
    Width = 87
    Height = 31
    Caption = #22686#21152'[&A]'
    TabOrder = 1
    OnClick = Btn_AddClick
  end
  object Btn_Modi: TButton
    Left = 433
    Top = 229
    Width = 87
    Height = 31
    Caption = #20462#25913'[&M]'
    TabOrder = 2
    OnClick = Btn_ModiClick
  end
  object Btn_Dele: TButton
    Left = 538
    Top = 230
    Width = 87
    Height = 31
    Caption = #21024#38500'[&D]'
    TabOrder = 3
    OnClick = Btn_DeleClick
  end
  object Btn_Close: TButton
    Left = 543
    Top = 322
    Width = 94
    Height = 31
    Cancel = True
    Caption = #36864#20986'(&C)'
    ModalResult = 2
    TabOrder = 4
  end
  object StaticText1: TStaticText
    Left = 314
    Top = 409
    Width = 72
    Height = 23
    BorderStyle = sbsSunken
    Caption = #32456#31471#25968#37327':'
    Color = clActiveCaption
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 5
  end
  object StTxt_Qty1: TStaticText
    Left = 387
    Top = 409
    Width = 78
    Height = 23
    BorderStyle = sbsSunken
    Caption = 'StTxt_Qty1'
    Color = clActiveCaption
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 6
  end
  object StaticText2: TStaticText
    Left = 314
    Top = 445
    Width = 184
    Height = 23
    Caption = #20854#20013#25317#26377#26222#36890#36153#29575#30340#32456#31471':'
    Color = clActiveCaption
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 7
  end
  object StTxt_Qty2: TStaticText
    Left = 500
    Top = 445
    Width = 78
    Height = 23
    BorderStyle = sbsSunken
    Caption = 'StTxt_Qty1'
    Color = clActiveCaption
    Font.Charset = ANSI_CHARSET
    Font.Color = clWhite
    Font.Height = -16
    Font.Name = #23435#20307
    Font.Style = []
    ParentColor = False
    ParentFont = False
    TabOrder = 8
  end
  object edt_Termname: TEdit
    Left = 415
    Top = 44
    Width = 126
    Height = 23
    Color = 16772846
    Enabled = False
    TabOrder = 10
  end
  object CmbBx_RName: TComboBox
    Left = 415
    Top = 88
    Width = 126
    Height = 23
    Style = csDropDownList
    Color = 16772846
    Enabled = False
    ItemHeight = 15
    ItemIndex = 0
    TabOrder = 11
    Text = #26222#36890#36153#29575
    OnChange = CmbBx_RNameChange
    Items.Strings = (
      #26222#36890#36153#29575
      #29305#21035#36153#29575)
  end
  object CmbBx_ComName: TComboBox
    Left = 415
    Top = 135
    Width = 126
    Height = 23
    Style = csDropDownList
    Color = 16772846
    Enabled = False
    ItemHeight = 15
    ItemIndex = 0
    TabOrder = 12
    Text = 'COM1'
    Items.Strings = (
      'COM1'
      'COM2'
      'COM3'
      'COM4')
  end
  object DataSource1: TDataSource
    DataSet = Frm_sys_dm.Qr_tmp1
    OnDataChange = DataSource1DataChange
    Left = 175
    Top = 79
  end
end

⌨️ 快捷键说明

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