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

📄 c_setup.~dfm

📁 电子元件管理软件
💻 ~DFM
字号:
object Form2: TForm2
  Left = 294
  Top = 192
  Width = 501
  Height = 349
  Caption = #35774#32622#31867#21035#21644#23553#35013
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 8
    Top = 16
    Width = 481
    Height = 273
    ActivePage = TabSheet1
    TabIndex = 0
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #31867#21035
      object Label1: TLabel
        Left = 8
        Top = 224
        Width = 264
        Height = 13
        Caption = #22686#21152#35831#21040#25968#25454#26368#21518#19968#34892#25353#21521#19979#20809#26631#65292#21024#38500'CTRL+del'
      end
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 241
        Height = 201
        Caption = #22823#31867
        TabOrder = 0
        object DBGrid1: TDBGrid
          Left = 8
          Top = 16
          Width = 225
          Height = 120
          DataSource = ds_ado_comdl
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'kind_name'
              Title.Caption = #22823#31867#21517
              Width = 124
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'kind_order_id'
              Title.Caption = #25490#24207#21495
              Visible = True
            end>
        end
      end
      object GroupBox2: TGroupBox
        Left = 256
        Top = 8
        Width = 209
        Height = 201
        Caption = #23567#31867
        TabOrder = 1
        object DBGrid2: TDBGrid
          Left = 8
          Top = 16
          Width = 193
          Height = 120
          DataSource = ds_ado_comxl
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'child_kind_name'
              Title.Caption = #23567#31867#21517
              Width = 99
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'child_kind_order_id'
              Title.Caption = #25490#24207#21495
              Visible = True
            end>
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #23553#35013
      ImageIndex = 1
      object GroupBox3: TGroupBox
        Left = 8
        Top = 8
        Width = 457
        Height = 169
        Caption = #23553#35013
        TabOrder = 0
        object DBGrid3: TDBGrid
          Left = 8
          Top = 16
          Width = 441
          Height = 145
          DataSource = ds_ado_encap
          TabOrder = 0
          TitleFont.Charset = DEFAULT_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -11
          TitleFont.Name = 'MS Sans Serif'
          TitleFont.Style = []
          Columns = <
            item
              Expanded = False
              FieldName = 'encap_name'
              Title.Caption = #23553#35013#21517#31216
              Width = 266
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'encap_order_id'
              Title.Caption = #25490#24207#21495
              Visible = True
            end>
        end
      end
    end
  end
  object Button1: TButton
    Left = 408
    Top = 296
    Width = 75
    Height = 25
    Caption = #20851#38381
    TabOrder = 1
    OnClick = Button1Click
  end
  object ado_comdl: TADOQuery
    Connection = d.ado1
    CursorType = ctStatic
    AfterScroll = ado_comdlAfterScroll
    Parameters = <>
    SQL.Strings = (
      'select * from kind order by kind_order_id')
    Left = 304
    object ado_comdlid: TSmallintField
      FieldName = 'id'
    end
    object ado_comdlkind_name: TWideStringField
      FieldName = 'kind_name'
      Size = 50
    end
    object ado_comdlkind_order_id: TSmallintField
      FieldName = 'kind_order_id'
    end
  end
  object ds_ado_comdl: TDataSource
    DataSet = ado_comdl
    Left = 336
  end
  object ado_comxl: TADOQuery
    Connection = d.ado1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from child_kind order by child_kind_order_id')
    Left = 384
    object ado_comxlid: TAutoIncField
      FieldName = 'id'
      ReadOnly = True
    end
    object ado_comxlpara_kind_id: TSmallintField
      FieldName = 'para_kind_id'
    end
    object ado_comxlchild_kind_name: TWideStringField
      FieldName = 'child_kind_name'
      Size = 50
    end
    object ado_comxlchild_kind_order_id: TSmallintField
      FieldName = 'child_kind_order_id'
    end
  end
  object ds_ado_comxl: TDataSource
    DataSet = ado_comxl
    Left = 416
  end
  object ado_encap: TADOQuery
    Connection = d.ado1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from encap order by encap_order_id')
    Left = 152
    object ado_encapid: TIntegerField
      FieldName = 'id'
    end
    object ado_encapencap_name: TWideStringField
      FieldName = 'encap_name'
      Size = 50
    end
    object ado_encapencap_memo: TWideStringField
      FieldName = 'encap_memo'
      Size = 50
    end
    object ado_encapencap_order_id: TIntegerField
      FieldName = 'encap_order_id'
    end
  end
  object ds_ado_encap: TDataSource
    DataSet = ado_encap
    Left = 184
  end
end

⌨️ 快捷键说明

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