production_unit.dfm

客户关系管理系统 DELPHI7下的

object frmProduction: TfrmProduction
  Left = 242
  Top = 137
  Width = 640
  Height = 460
  Caption = #20135#21697#21457#24067#20449#24687
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 632
    Height = 195
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 16
      Width = 60
      Height = 12
      Caption = #20135#21697#32534#21495#65306
    end
    object Label2: TLabel
      Left = 24
      Top = 48
      Width = 60
      Height = 12
      Caption = #20135#21697#21517#31216#65306
      FocusControl = DBEdit2
    end
    object Label3: TLabel
      Left = 296
      Top = 16
      Width = 60
      Height = 12
      Caption = #21457#24067#26085#26399#65306
      FocusControl = DBEdit3
    end
    object Label4: TLabel
      Left = 296
      Top = 48
      Width = 60
      Height = 12
      Caption = #20135#21697#36136#37327#65306
      FocusControl = DBEdit4
    end
    object Label5: TLabel
      Left = 24
      Top = 80
      Width = 60
      Height = 12
      Caption = #20135#21697#35268#26684#65306
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 484
      Top = 81
      Width = 60
      Height = 12
      Caption = #20215'    '#26684#65306
      FocusControl = DBEdit6
    end
    object Label7: TLabel
      Left = 296
      Top = 81
      Width = 60
      Height = 12
      Caption = #20445' '#36136' '#26399#65306
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 23
      Top = 111
      Width = 60
      Height = 12
      Caption = #24066#22330#21069#26223#65306
    end
    object Label9: TLabel
      Left = 24
      Top = 157
      Width = 60
      Height = 12
      Caption = #20135#21697#20171#32461#65306
    end
    object SpeedButton3: TSpeedButton
      Left = 455
      Top = 77
      Width = 20
      Height = 22
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333700000733333333F777773FF3333333007F0F70
        0333333773373377FF3333300FFF7FFF003333773F3333377FF33300F0FFFFF0
        F00337737333F37377F33707FFFF0FFFF70737F33337F33337FF300FFFFF0FFF
        FF00773F3337F333377F30707FFF0FFF70707F733337F333737F300FFFF09FFF
        FF0077F33377F33337733707FF0F9FFFF70737FF3737F33F37F33300F0FF9FF0
        F003377F7337F373773333300FFF9FFF00333377FF37F3377FF33300007F9F70
        000337777FF7FF77773333703070007030733373777777737333333333330333
        333333333337FF33333333333330003333333333337773333333}
      NumGlyphs = 2
      OnClick = SpeedButton3Click
    end
    object SpeedButton1: TSpeedButton
      Left = 456
      Top = 11
      Width = 20
      Height = 22
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333700000733333333F777773FF3333333007F0F70
        0333333773373377FF3333300FFF7FFF003333773F3333377FF33300F0FFFFF0
        F00337737333F37377F33707FFFF0FFFF70737F33337F33337FF300FFFFF0FFF
        FF00773F3337F333377F30707FFF0FFF70707F733337F333737F300FFFF09FFF
        FF0077F33377F33337733707FF0F9FFFF70737FF3737F33F37F33300F0FF9FF0
        F003377F7337F373773333300FFF9FFF00333377FF37F3377FF33300007F9F70
        000337777FF7FF77773333703070007030733373777777737333333333330333
        333333333337FF33333333333330003333333333337773333333}
      NumGlyphs = 2
      OnClick = SpeedButton1Click
    end
    object DBEdit1: TDBEdit
      Left = 84
      Top = 12
      Width = 200
      Height = 20
      DataField = 'PRODUCTIONID'
      DataSource = DM.dsrProduction
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 84
      Top = 44
      Width = 200
      Height = 20
      DataField = 'PRODUCTIONDESCN'
      DataSource = DM.dsrProduction
      TabOrder = 1
    end
    object DBEdit3: TDBEdit
      Left = 354
      Top = 12
      Width = 100
      Height = 20
      DataField = 'ISSUEDATE'
      DataSource = DM.dsrProduction
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 354
      Top = 44
      Width = 200
      Height = 20
      DataField = 'QUALITY'
      DataSource = DM.dsrProduction
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 85
      Top = 76
      Width = 200
      Height = 20
      DataField = 'SPEC'
      DataSource = DM.dsrProduction
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 542
      Top = 77
      Width = 80
      Height = 20
      DataField = 'PRICE'
      DataSource = DM.dsrProduction
      TabOrder = 5
    end
    object DBEdit7: TDBEdit
      Left = 354
      Top = 77
      Width = 100
      Height = 20
      DataField = 'KEEPDATE'
      DataSource = DM.dsrProduction
      ReadOnly = True
      TabOrder = 6
    end
    object DBMemo1: TDBMemo
      Left = 85
      Top = 108
      Width = 476
      Height = 35
      DataField = 'MARKETVALUE'
      DataSource = DM.dsrProduction
      ScrollBars = ssVertical
      TabOrder = 7
    end
    object DBMemo2: TDBMemo
      Left = 85
      Top = 153
      Width = 476
      Height = 35
      DataField = 'INTRODUCE'
      DataSource = DM.dsrProduction
      ScrollBars = ssVertical
      TabOrder = 8
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 195
    Width = 632
    Height = 197
    Align = alClient
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 14
      Width = 628
      Height = 181
      Align = alClient
      DataSource = DM.dsrProduction
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'PRODUCTIONID'
          Title.Alignment = taCenter