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

📄 pur510_02.dfm.svn-base

📁 这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享
💻 SVN-BASE
📖 第 1 页 / 共 5 页
字号:
            00FF000000C0C0C0000000FF00FFFF00FFFF00FFFF00FFFF00FF000000C0C0C0
            000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FF000000000000000000808080FF00FFFF00FFFF00FF80
            8080000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0000000000000000000000000000
            00000000000000000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000000000C0C0C0
            000000000000000000000000C0C0C0000000000000000000000000FF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
            FFFF000000C0C0C0000000000000000000000000C0C0C0000000000000000000
            000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00FFFFFF80808080808000000000000000000000000000000000000000000000
            0000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFF0000000000000000000000
            00C0C0C0000000000000000000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFF808080808080FFFFFF808080
            000000000000808080808080FFFFFF000000000000FF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000FFFFFFFFFFFFFF
            FFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000FF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00FFFFFF808080808080FFFFFF808080000000000000808080808080FFFFFF00
            0000000000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFBF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
            FFFFFFFFFFFFFFBF0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFBF0000BF0000BF0000BF0000BF0000BF0000
            BF0000BF0000BF0000BF0000BF0000BF0000FF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF0000C0C0C0BF0000BF
            0000C0C0C0BF0000BF0000C0C0C0BF0000BF0000C0C0C0BF0000FF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBF00
            00BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF0000BF
            0000FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
            FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
            FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
            00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
          OnClick = sbMacNoClick
        end
        object lblItemClass: TLabel
          Left = 512
          Top = 48
          Width = 48
          Height = 12
          Alignment = taRightJustify
          Caption = #20135#21697#31867#21035
        end
        object lblModel: TLabel
          Left = 16
          Top = 48
          Width = 48
          Height = 12
          Alignment = taRightJustify
          Caption = #35268#26684#22411#21495
        end
        object lblMaker: TLabel
          Left = 16
          Top = 72
          Width = 48
          Height = 12
          Alignment = taRightJustify
          Caption = #21046#36896#21830#21495
        end
        object lblMakerName: TLabel
          Left = 200
          Top = 72
          Width = 48
          Height = 12
          Alignment = taRightJustify
          Caption = #21046#36896#21830#21517
        end
        object Label1: TLabel
          Left = 200
          Top = 48
          Width = 48
          Height = 12
          Caption = #25511#21046#22120#34399
        end
        object edtItemID: TEdit
          Left = 72
          Top = 16
          Width = 121
          Height = 20
          TabOrder = 0
        end
        object edtItemName: TEdit
          Left = 224
          Top = 16
          Width = 281
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 1
        end
        object edtMacNo: TEdit
          Left = 568
          Top = 16
          Width = 129
          Height = 20
          ReadOnly = True
          TabOrder = 2
        end
        object edtItemClass: TEdit
          Left = 568
          Top = 40
          Width = 153
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 3
        end
        object edtModel: TEdit
          Left = 72
          Top = 40
          Width = 121
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 4
        end
        object edtMaker: TEdit
          Left = 72
          Top = 64
          Width = 121
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 5
        end
        object edtMakerName: TEdit
          Left = 256
          Top = 64
          Width = 465
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 6
        end
        object edtControllerNo: TEdit
          Left = 256
          Top = 40
          Width = 249
          Height = 20
          Color = clBtnFace
          Enabled = False
          ReadOnly = True
          TabOrder = 7
        end
      end
    end
    object tsRemark: TTabSheet
      Caption = #22791#27880#20449#24687
      ImageIndex = 4
      object memRemark: TMemo
        Left = 0
        Top = 0
        Width = 745
        Height = 99
        Align = alClient
        ScrollBars = ssVertical
        TabOrder = 0
      end
    end
  end
  inherited ActionList1: TActionList
    inherited Action1: TAction
      Caption = #26680#20934
      Hint = #26680#20934
      ImageIndex = 13
      ShortCut = 32857
      Visible = True
      OnExecute = Action1Execute
    end
    inherited Action2: TAction
      Caption = #25191#34892
      Hint = #25191#34892
      ImageIndex = 19
      ShortCut = 32847
      Visible = True
      OnExecute = Action2Execute
    end
    inherited Action3: TAction
      Caption = #21462#28040
      Hint = #21462#28040
      ImageIndex = 14
      ShortCut = 32846
      Visible = True
      OnExecute = Action3Execute
    end
  end
  inherited ADOQuery1: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'select A.*,'
      '    B.P100_002,'
      '    C.O150_002,C.O150_003,C.O150_005,C.O150_006,C.O150_012,'
      '    D.G100_002,D.G100_003,'
      '    E.G110_002'
      'from PUR510A A,PUR100 B,ORD150 C,GLD100 D,GLD110 E'
      
        'where A.P510A_002=B.P100_001 and A.P510A_017=C.O150_001 and A.P5' +
        '10A_007=D.G100_001 and A.P510A_009=E.G110_001'
      'order by A.P510A_022 asc')
    object ADOQuery1P510A_001: TWideStringField
      DisplayLabel = #37319#36141#21333#21495
      FieldName = 'P510A_001'
      Size = 30
    end
    object ADOQuery1P100_002: TWideStringField
      DisplayLabel = #37319#36141#31867#22411
      FieldName = 'P100_002'
      Size = 50
    end
    object ADOQuery1P510A_002: TIntegerField
      FieldName = 'P510A_002'
      Visible = False
    end
    object ADOQuery1P510A_003: TDateTimeField
      DisplayLabel = #37319#36141#26085#26399
      FieldName = 'P510A_003'
    end
    object ADOQuery1P510A_004: TSmallintField
      DisplayLabel = #23450#21333#29366#24577
      FieldName = 'P510A_004'
      OnGetText = ADOQuery1P510A_004GetText
    end
    object ADOQuery1H150_002: TStringField
      DisplayLabel = #37319#36141#21592#21495
      FieldKind = fkLookup
      FieldName = 'H150_002'
      LookupDataSet = qryHrm150
      LookupKeyFields = 'H150_001'
      LookupResultField = 'H150_002'
      KeyFields = 'P510A_005'
      Lookup = True
    end
    object ADOQuery1H150_003: TStringField
      DisplayLabel = #37319#36141#21592#21517
      FieldKind = fkLookup
      FieldName = 'H150_003'
      LookupDataSet = qryHrm150
      LookupKeyFields = 'H150_001'
      LookupResultField = 'H150_003'
      KeyFields = 'P510A_005'
      Lookup = True
    end
    object ADOQuery1P510A_005: TIntegerField
      FieldName = 'P510A_005'
      Visible = False
    end
    object ADOQuery1G100_002: TWideStringField
      DisplayLabel = #24065#21035#32534#21495
      FieldName = 'G100_002'
      Size = 10
    end
    object ADOQuery1G100_003: TWideStringField
      DisplayLabel = #24065#21035#21517#31216
      FieldName = 'G100_003'
      Size = 30
    end
    object ADOQuery1P510A_006: TSmallintField
      DisplayLabel = #26469#28304#31867#22411
      FieldName = 'P510A_006'
    end
    object ADOQuery1P510A_007: TIntegerField
      FieldName = 'P510A_007'
      Visible = False
    end
    object ADOQuery1P510A_008: TBCDField
      DisplayLabel = #24065#21035#27719#29575
      FieldName = 'P510A_008'
      Precision = 10
      Size = 6
    end
    object ADOQuery1G110_002: TWideStringField
      DisplayLabel = #20184#27454#31867#22411
      FieldName = 'G110_002'
      Size = 50
    end
    object ADOQuery1P510A_009: TIntegerField
      FieldName = 'P510A_009'
      Visible = False
    end
    object ADOQuery1P510A_010: TDateTimeField
      DisplayLabel = #23457#26680#26085#26399
      FieldName = 'P510A_010'
    end
    object ADOQuery1P510A_011: TWideStringField
      DisplayLabel = #23457#26680#20154#21592
      FieldName = 'P510A_011'
    end
    object ADOQuery1P510A_012: TFloatField
      DisplayLabel = #37329#39069#24635#35745
      FieldName = 'P510A_012'
    end
    object ADOQuery1P510A_013: TBCDField
      DisplayLabel = #25240#25187#27604#29575
      FieldName = 'P510A_013'
      Precision = 8
      Size = 2
    end
    object ADOQuery1P510A_014: TFloatField
      DisplayLabel = #25240#25187#37329#39069
      FieldName = 'P510A_014'
    end
    object ADOQuery1P510A_015: TFloatField
      DisplayLabel = #29305#27530#36153#29992
      FieldName = 'P510A_015'
    end
    object ADOQuery1P510A_016: TFloatField
      DisplayLabel = #24212#20184#37329#39069
      FieldName = 'P510A_016'
    end
    object ADOQuery1O150_002: TWideStringField
      DisplayLabel = #20379#24212#21830#21495
      FieldName = 'O150_002'
    end
    object ADOQuery1O150_003: TWideStringField
      DisplayLabel = #20379#24212#21830#21517
      FieldName = 'O150_003'
      Size = 60
    end
    object ADOQuery1O150_005: TWideStringField
      DisplayLabel = #30005#35805#21495#30721
      FieldName = 'O150_005'
      Size = 50
    end
    object ADOQuery1O150_006: TWideStringField
      DisplayLabel = #20256#30495#21495#30721
      FieldName = 'O150_006'
      Size = 50
    end
    object ADOQuery1O150_012: TWideStringField
      DisplayLabel = #21378#21830#22320#22336
      FieldName = 'O150_012'
      Size = 100
    end
    object ADOQuery1O151_002: TWideStringField
      DisplayLabel = #32852#31995#20154#21592
      FieldKind = fkLookup
      FieldName = 'O151_002'
      LookupDataSet = qryOrd150
      LookupKeyFields = 'O150_001'
      LookupResultField = 'O151_002'
      KeyFields = 'P510A_017'
      Lookup = True
    end
    object ADOQuery1O151_003: TWideStringField
      DisplayLabel = #37096#38376#21517#31216
      FieldKind = fkLookup
      FieldName = 'O151_003'
      LookupDataSet = qryOrd150
      Lo

⌨️ 快捷键说明

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