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

📄 addconform.dfm

📁 书籍类别(种类编号
💻 DFM
字号:
object AddContract: TAddContract
  Left = 284
  Top = 118
  Width = 628
  Height = 452
  BorderIcons = [biSystemMenu]
  Caption = #28155#21152#21512#21516
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 1
    Width = 601
    Height = 49
    Caption = #20998#31867
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object Label7: TLabel
      Left = 16
      Top = 19
      Width = 60
      Height = 13
      AutoSize = False
      Caption = #21512#21516#31867#22411#65306
    end
    object Label8: TLabel
      Left = 288
      Top = 19
      Width = 60
      Height = 13
      Caption = #21512#21516#23567#31867#65306
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 15
      Width = 185
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 0
      OnChange = ComboBox1Change
    end
    object ComboBox2: TComboBox
      Left = 384
      Top = 15
      Width = 153
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Top = 50
    Width = 601
    Height = 311
    Caption = #39033#30446
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 27
      Width = 70
      Height = 13
      AutoSize = False
      Caption = #39033#30446#21517#31216#65306
    end
    object Label2: TLabel
      Left = 16
      Top = 69
      Width = 60
      Height = 13
      Caption = #26045#24037#21333#20301#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 112
      Width = 60
      Height = 13
      Caption = #21512#21516#32534#21495#65306
    end
    object Label9: TLabel
      Left = 16
      Top = 226
      Width = 60
      Height = 13
      Caption = #21512#21516#22791#27880#65306
    end
    object Label13: TLabel
      Left = 296
      Top = 113
      Width = 84
      Height = 13
      Caption = #24037#31243#26159#21542#39564#25910#65306
    end
    object Label14: TLabel
      Left = 296
      Top = 158
      Width = 84
      Height = 13
      Caption = #39033#30446#25253#23457#24773#20917#65306
    end
    object Label15: TLabel
      Left = 296
      Top = 68
      Width = 60
      Height = 13
      Caption = #31614#35746#26102#38388#65306
      OnClick = Label15Click
    end
    object Label4: TLabel
      Left = 296
      Top = 24
      Width = 60
      Height = 13
      Caption = #32852'  '#31995'  '#20154#65306
    end
    object Label5: TLabel
      Left = 16
      Top = 155
      Width = 60
      Height = 13
      Caption = #24231#33853#20301#32622#65306
    end
    object Label6: TLabel
      Left = 16
      Top = 189
      Width = 60
      Height = 13
      AutoSize = False
      Caption = #32852#31995#30005#35805#65306
    end
    object Edit1: TEdit
      Left = 80
      Top = 24
      Width = 185
      Height = 19
      TabOrder = 0
    end
    object Edit2: TEdit
      Left = 80
      Top = 109
      Width = 185
      Height = 19
      TabOrder = 1
    end
    object ComboBox4: TComboBox
      Left = 384
      Top = 107
      Width = 153
      Height = 21
      ItemHeight = 13
      TabOrder = 2
      Text = #26410#23436#24037
      Items.Strings = (
        #24050#39564#25910
        #26410#23436#24037
        #26410#39564#25910
        #24050#23436#24037)
    end
    object DateTimePicker1: TDateTimePicker
      Left = 384
      Top = 63
      Width = 153
      Height = 21
      Date = 38889.864185463000000000
      Time = 38889.864185463000000000
      DateMode = dmUpDown
      TabOrder = 3
    end
    object Memo1: TMemo
      Left = 80
      Top = 224
      Width = 457
      Height = 73
      Lines.Strings = (
        #26242#26080)
      ScrollBars = ssVertical
      TabOrder = 4
    end
    object ComboBox5: TComboBox
      Left = 384
      Top = 152
      Width = 153
      Height = 21
      ItemHeight = 13
      TabOrder = 5
      Text = #21253#27515
      Items.Strings = (
        #21253#27515
        #25253#23457
        #26410#25253#23457
        #39044#25253#23457)
    end
    object RzComboBox1: TRzComboBox
      Left = 80
      Top = 66
      Width = 185
      Height = 21
      Ctl3D = True
      ItemHeight = 13
      ParentCtl3D = False
      TabOrder = 6
      OnDropDown = RzComboBox1DropDown
    end
    object Edit8: TEdit
      Left = 384
      Top = 19
      Width = 153
      Height = 19
      TabOrder = 7
    end
    object Edit9: TEdit
      Left = 80
      Top = 152
      Width = 185
      Height = 19
      TabOrder = 8
    end
    object Edit3: TEdit
      Left = 80
      Top = 184
      Width = 185
      Height = 19
      TabOrder = 9
      Text = #26242#26080
    end
  end
  object GroupBox4: TGroupBox
    Left = 8
    Top = 368
    Width = 601
    Height = 49
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 2
    object BitBtn1: TBitBtn
      Left = 228
      Top = 15
      Width = 75
      Height = 25
      Caption = #20445#23384
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 308
      Top = 15
      Width = 75
      Height = 25
      Caption = #21462#28040
      TabOrder = 1
      OnClick = BitBtn2Click
    end
    object CheckBox1: TCheckBox
      Left = 6
      Top = 19
      Width = 83
      Height = 17
      Caption = #36830#32493#28155#21152
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 2
      OnClick = CheckBox1Click
    end
    object CheckBox2: TCheckBox
      Left = 390
      Top = 19
      Width = 75
      Height = 17
      Hint = #26412#21512#21516#30340#36130#21153#35760#24405#22312#36873#25321#30340#21512#21516#20013
      Caption = #35760#24080#36873#25321
      Ctl3D = False
      ParentCtl3D = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 3
      OnClick = CheckBox2Click
    end
    object RzComboBox2: TRzComboBox
      Left = 477
      Top = 15
      Width = 113
      Height = 21
      Ctl3D = True
      ItemHeight = 13
      ParentCtl3D = False
      TabOrder = 4
      Visible = False
      OnDropDown = RzComboBox2DropDown
    end
    object Button1: TButton
      Left = 160
      Top = 16
      Width = 59
      Height = 25
      Caption = #19979#19968#26465
      TabOrder = 5
      Visible = False
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 104
      Top = 16
      Width = 57
      Height = 25
      Caption = #19978#19968#26465
      TabOrder = 6
      Visible = False
      OnClick = Button2Click
    end
  end
  object ComboxGrid2: TComboxGrid
    Ado = True
    DisplayField.Strings = (
      'DepName'
      'ConPerson'
      'Tel')
    DisplayText.Strings = (
      #26045#24037#21333#20301#21517#31216
      #32852#31995#20154
      #32852#31995#30005#35805)
    Displaywidth.Strings = (
      '140'
      '45'
      '45')
    LinkControl = RzComboBox1
    ShowInsterBtn = True
    RFieldName1 = 'DepName'
    RFieldName2 = 'ConPerson'
    SQL.Strings = (
      'Select * from ConstructUnit ')
    ADOConnection = DM.POSADOConn
    Active = True
    GridTileFont.Charset = DEFAULT_CHARSET
    GridTileFont.Color = clWindowText
    GridTileFont.Height = -11
    GridTileFont.Name = 'MS Sans Serif'
    GridTileFont.Style = []
    GridFont.Charset = DEFAULT_CHARSET
    GridFont.Color = clWindowText
    GridFont.Height = -11
    GridFont.Name = 'MS Sans Serif'
    GridFont.Style = []
    RowLine = False
    TileColor = clGreen
    GridColor = clWindow
    ClickReturn = False
    TileAlignment = taCenter
    WidthAsColumn = False
    ShowFilter = True
    FilterFieldName = 'DepName'
    StringGrid = True
    SgOptions = [goFixedVertLine, goFixedHorzLine, goVertLine, goTabs, goRowSelect]
    Left = 315
    Top = 88
  end
  object ComboxGrid1: TComboxGrid
    Ado = True
    DisplayField.Strings = (
      'ConstructUnit'
      'connumber')
    DisplayText.Strings = (
      #26045#24037#21333#20301#21517#31216
      #21512#21516#32534#21495)
    Displaywidth.Strings = (
      '80'
      '45')
    LinkControl = RzComboBox2
    ShowInsterBtn = True
    RFieldName1 = 'ConstructUnit'
    RFieldName2 = 'connumber'
    SQL.Strings = (
      'Select * from contract')
    ADOConnection = DM.POSADOConn
    Active = True
    GridTileFont.Charset = DEFAULT_CHARSET
    GridTileFont.Color = clWindowText
    GridTileFont.Height = -11
    GridTileFont.Name = 'MS Sans Serif'
    GridTileFont.Style = []
    GridFont.Charset = DEFAULT_CHARSET
    GridFont.Color = clWindowText
    GridFont.Height = -11
    GridFont.Name = 'MS Sans Serif'
    GridFont.Style = []
    RowLine = False
    TileColor = clGreen
    GridColor = clWindow
    ClickReturn = False
    TileAlignment = taCenter
    WidthAsColumn = False
    ShowFilter = True
    FilterFieldName = 'ConstructUnit'
    StringGrid = True
    SgOptions = [goFixedVertLine, goFixedHorzLine, goVertLine, goTabs, goRowSelect]
    Left = 555
    Top = 328
  end
end

⌨️ 快捷键说明

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