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

📄 cha_xing_jia.~dfm

📁 采购管理系统:delphi+sql实现了企业采购自动化作业流程
💻 ~DFM
字号:
object cha_xing_ji: Tcha_xing_ji
  Left = -2
  Top = 97
  Width = 794
  Height = 437
  Caption = #35426#20729#36039#26009#26597#35426
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  DesignSize = (
    786
    410)
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 769
    Height = 121
    Anchors = [akLeft, akTop, akRight]
    Caption = #35426#20215#26597#35426
    TabOrder = 2
    object Label2: TLabel
      Left = 42
      Top = 26
      Width = 24
      Height = 13
      AutoSize = False
      Caption = #38917#30446
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 237
      Top = 27
      Width = 24
      Height = 13
      AutoSize = False
      Caption = #20839#23481
    end
    object Label7: TLabel
      Left = 92
      Top = 46
      Width = 17
      Height = 13
      AutoSize = False
      Caption = #24478
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 292
      Top = 46
      Width = 17
      Height = 13
      AutoSize = False
      Caption = #21040
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 263
      Top = 24
      Width = 85
      Height = 21
      TabOrder = 0
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
    object BitBtn1: TBitBtn
      Left = 416
      Top = 25
      Width = 70
      Height = 21
      Hint = #26597#35426
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
        300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
        330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
        333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
        339977FF777777773377000BFB03333333337773FF733333333F333000333333
        3300333777333333337733333333333333003333333333333377333333333333
        333333333333333333FF33333333333330003333333333333777333333333333
        3000333333333333377733333333333333333333333333333333}
      NumGlyphs = 2
    end
    object BitBtn2: TBitBtn
      Left = 568
      Top = 25
      Width = 70
      Height = 21
      Hint = #21047#26032
      ParentShowHint = False
      ShowHint = True
      TabOrder = 2
      OnClick = BitBtn2Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333FF3333333333333003333333333333F77F33333333333009033
        333333333F7737F333333333009990333333333F773337FFFFFF330099999000
        00003F773333377777770099999999999990773FF33333FFFFF7330099999000
        000033773FF33777777733330099903333333333773FF7F33333333333009033
        33333333337737F3333333333333003333333333333377333333333333333333
        3333333333333333333333333333333333333333333333333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
    end
    object t1: TMaskEdit
      Left = 69
      Top = 61
      Width = 85
      Height = 21
      EditMask = '9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 3
      Text = '    /  /  '
      OnKeyPress = t1KeyPress
    end
    object t2: TMaskEdit
      Left = 263
      Top = 61
      Width = 85
      Height = 21
      EditMask = '9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 4
      Text = '    /  /  '
      OnKeyPress = t2KeyPress
    end
  end
  object DBGrid1: TDBGrid
    Left = 9
    Top = 137
    Width = 767
    Height = 128
    Color = clLime
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'xing_jia_computerno'
        Title.Caption = #38651#33126#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xing_jia_no'
        Title.Caption = #35426#20729#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'qing_gou_no'
        Title.Caption = #35531#36092#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xing_jia_date'
        Title.Caption = #35426#20215#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'jiao_ji'
        Title.Caption = #20132#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_no'
        Title.Caption = #20379#25033#21830#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_name'
        Title.Caption = #20379#25033#21830#21517#31281
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_phone'
        Title.Caption = #38651#35441
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_adress'
        Title.Caption = #20379#25033#21830#22320#22336
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_fu_kuan'
        Title.Caption = #20184#27454#26041#24335
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_fo_bi_kind'
        Title.Caption = #36008#24163#24418#24335
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_fax'
        Title.Caption = #20659#30495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shang_ren'
        Title.Caption = #32879#31995#20154
        Visible = True
      end>
  end
  object ComboBox1: TComboBox
    Left = 78
    Top = 31
    Width = 85
    Height = 21
    ItemHeight = 13
    TabOrder = 1
    Text = 'ComboBox1'
    OnClick = ComboBox1Click
    OnKeyPress = ComboBox1KeyPress
    Items.Strings = (
      #35426#20729#21934#32232#34399
      #35531#36092#21934#32232#34399
      #20132#26399
      #20379#25033#21830#32232#34399)
  end
  object DBGrid2: TDBGrid
    Left = 8
    Top = 269
    Width = 769
    Height = 139
    Color = clYellow
    DataSource = DataSource2
    ReadOnly = True
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'xing_jia_no'
        Title.Caption = #35426#20729#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'zi_hao'
        Title.Caption = #23376#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'wu_no'
        Title.Caption = #29289#26009#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'wu_name'
        Title.Caption = #29289#26009#21517#31281
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'wu_gui'
        Title.Caption = #35215#26684
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'dan_wei'
        Title.Caption = #21934#20301
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_jia'
        Title.Caption = #22577#20215
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'gong_shu_liang'
        Title.Caption = #21487#20379#25976#37327
        Visible = True
      end>
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'vvv'
    SQL.Strings = (
      'select * from xing_jia_wei_zhu')
    Left = 200
    Top = 184
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 448
    Top = 200
  end
  object Query2: TQuery
    Active = True
    DatabaseName = 'vvv'
    SQL.Strings = (
      'select * from xing_jia_wei')
    Left = 224
    Top = 304
  end
  object DataSource2: TDataSource
    DataSet = Table2
    Left = 280
    Top = 304
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'vvv'
    TableName = 'dbo.xing_jia_wei_zhu'
    Left = 128
    Top = 184
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'vvv'
    IndexFieldNames = 'xing_jia_no'
    MasterFields = 'xing_jia_no'
    MasterSource = DataSource1
    TableName = 'dbo.xing_jia_wei'
    Left = 168
    Top = 320
  end
end

⌨️ 快捷键说明

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