untadjustattrdispose.dfm

是分布式粮库程序,是采用Delphi实现的

object FrmAdjustAttrDispose: TFrmAdjustAttrDispose
  Left = 182
  Top = 155
  Width = 842
  Height = 613
  Anchors = []
  BorderIcons = []
  Caption = #31918#27833#24615#36136#35843#25972#36890#30693#21333#22788#29702
  Color = clBtnFace
  ParentFont = True
  FormStyle = fsMDIForm
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  WindowState = wsMaximized
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Splitter1: TSplitter
    Left = 252
    Top = 0
    Width = 9
    Height = 579
    Cursor = crHSplit
    Align = alRight
  end
  object Panel1: TPanel
    Left = 261
    Top = 0
    Width = 573
    Height = 579
    Align = alRight
    Caption = 'Panel1'
    TabOrder = 0
    object Splitter2: TSplitter
      Left = 1
      Top = 519
      Width = 571
      Height = 8
      Cursor = crVSplit
      Align = alBottom
    end
    object Panel3: TPanel
      Left = 1
      Top = 1
      Width = 571
      Height = 518
      Align = alClient
      Caption = 'Panel3'
      TabOrder = 0
      object Panel4: TPanel
        Left = 1
        Top = 1
        Width = 569
        Height = 516
        Align = alClient
        Caption = 'Panel4'
        TabOrder = 0
        object Splitter3: TSplitter
          Left = 1
          Top = 202
          Width = 567
          Height = 7
          Cursor = crVSplit
          Align = alTop
        end
        object DBText3: TDBText
          Left = 126
          Top = 52
          Width = 61
          Height = 16
        end
        object PnlBrowse: TPanel
          Left = 1
          Top = 1
          Width = 567
          Height = 201
          Align = alTop
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          object lblTitle: TLabel
            Left = 116
            Top = 10
            Width = 315
            Height = 22
            Alignment = taCenter
            AutoSize = False
            Caption = #31918' '#27833' '#24615' '#36136' '#35843' '#25972' '#36890' '#30693' '#21333
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -20
            Font.Name = #26999#20307'_GB2312'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object lblQianfa: TLabel
            Left = 9
            Top = 38
            Width = 74
            Height = 13
            Alignment = taCenter
            AutoSize = False
            Caption = #31614#21457#26085#26399#65306
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object LblManager: TLabel
            Left = 7
            Top = 159
            Width = 84
            Height = 12
            Caption = #21333#20301#39046#23548#31614#23383#65306
          end
          object LblClerk: TLabel
            Left = 193
            Top = 160
            Width = 72
            Height = 12
            Caption = #32463#21150#20154#31614#23383#65306
          end
          object Label1: TLabel
            Left = 356
            Top = 160
            Width = 72
            Height = 12
            Caption = #35843#25972#21592#31614#23383#65306
          end
          object Label13: TLabel
            Left = 288
            Top = 38
            Width = 137
            Height = 16
            Alignment = taCenter
            AutoSize = False
            Caption = #24615#36136#35843#25972#36890#30693#21333#32534#21495#65306
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -13
            Font.Name = #23435#20307
            Font.Style = []
            ParentFont = False
          end
          object DBTxtDatetime: TDBText
            Left = 86
            Top = 37
            Width = 93
            Height = 16
            DataField = 'DATETIME'
            DataSource = DataSourceMaster
          end
          object DBTxtAdjustID: TDBText
            Left = 435
            Top = 38
            Width = 109
            Height = 16
            DataField = 'ADJUST_ID'
            DataSource = DataSourceMaster
          end
          object DBTxtManager: TDBText
            Left = 104
            Top = 158
            Width = 83
            Height = 15
            DataField = 'MANAGER'
            DataSource = DataSourceMaster
          end
          object DBTxtClerk: TDBText
            Left = 277
            Top = 159
            Width = 61
            Height = 15
            DataField = 'CLERK'
            DataSource = DataSourceMaster
          end
          object Shape4: TShape
            Left = 7
            Top = 119
            Width = 554
            Height = 1
            Pen.Color = clNavy
          end
          object Shape2: TShape
            Left = 7
            Top = 89
            Width = 554
            Height = 1
            Pen.Color = clNavy
          end
          object Shape9: TShape
            Left = 6
            Top = 149
            Width = 554
            Height = 1
            Pen.Color = clNavy
          end
          object Shape5: TShape
            Left = 190
            Top = 57
            Width = 1
            Height = 93
            Pen.Color = clNavy
          end
          object Shape6: TShape
            Left = 374
            Top = 58
            Width = 1
            Height = 92
            Pen.Color = clNavy
          end
          object DBTxtUnitName: TDBText
            Left = 86
            Top = 67
            Width = 75
            Height = 16
            DataField = 'UnitName'
            DataSource = DataSourceMaster
          end
          object LblUnitName: TLabel
            Left = 13
            Top = 68
            Width = 72
            Height = 12
            Caption = #20998#20844#21496#21517#31216#65306
          end
          object Label2: TLabel
            Left = 200
            Top = 97
            Width = 72
            Height = 12
            Caption = #21697'      '#21517#65306
          end
          object Label3: TLabel
            Left = 200
            Top = 130
            Width = 72
            Height = 12
            Caption = #25968'      '#37327#65306
          end
          object Label4: TLabel
            Left = 202
            Top = 68
            Width = 72
            Height = 12
            Caption = #20837#24211#21333#32534#21495#65306
          end
          object DBTxtInStackID: TDBText
            Left = 276
            Top = 67
            Width = 65
            Height = 17
            DataField = 'INSTACK_ID'
            DataSource = DataSourceMaster
          end
          object Label5: TLabel
            Left = 12
            Top = 98
            Width = 72
            Height = 12
            Caption = #26087'  '#24615'  '#36136#65306
          end
          object Label6: TLabel
            Left = 16
            Top = 129
            Width = 72
            Height = 12
            Caption = #26032'  '#24615'  '#36136#65306
          end
          object DBTxtNewAttr: TDBText
            Left = 88
            Top = 126
            Width = 65
            Height = 17
            DataField = 'NEW_ATTR'
            DataSource = DataSourceMaster
          end
          object DBTxtAttr: TDBText
            Left = 87
            Top = 95
            Width = 65
            Height = 17
            DataField = 'ATTR'
            DataSource = DataSourceMaster
          end
          object DBTxtQuantity: TDBText
            Left = 275
            Top = 128
            Width = 65
            Height = 17
            DataField = 'QUANTITY'
            DataSource = DataSourceMaster
          end
          object DBTxtfoodType: TDBText
            Left = 276
            Top = 96
            Width = 65
            Height = 17
            DataField = 'FOODTYPE'
            DataSource = DataSourceMaster
          end
          object Shape1: TShape
            Left = 559
            Top = 57
            Width = 1
            Height = 93
            Pen.Color = clNavy
          end
          object Shape3: TShape
            Left = 6
            Top = 58
            Width = 1
            Height = 92
            Pen.Color = clNavy
          end
          object TLabel
            Left = 384
            Top = 69
            Width = 66
            Height = 12
            Caption = #24211'     '#28857#65306
          end
          object Label8: TLabel
            Left = 384
            Top = 98
            Width = 66
            Height = 12
            Caption = #20179'     '#24211#65306
          end
          object Label9: TLabel
            Left = 384
            Top = 129
            Width = 66
            Height = 12
            Caption = #36135'     '#20301#65306
          end
          object Shape7: TShape
            Left = 6
            Top = 57
            Width = 554
            Height = 1
            Pen.Color = clNavy
          end
          object DBText1: TDBText
            Left = 456
            Top = 67
            Width = 65
            Height = 17
            DataField = 'SITE_ID'
            DataSource = DataSourceMaster
          end
          object DBText2: TDBText
            Left = 456
            Top = 97
            Width = 65
            Height = 17
            DataField = 'DEPOT_ID'
            DataSource = DataSourceMaster
          end
          object DBText4: TDBText
            Left = 456
            Top = 129
            Width = 65
            Height = 17
            DataField = 'FOODPOSITION_ID'
            DataSource = DataSourceMaster
          end
          object DBText5: TDBText
            Left = 440
            Top = 160
            Width = 65
            Height = 17
            DataField = 'Adjustor'
            DataSource = DataSourceMaster
          end
        end
        object PnlItemGrid: TPanel
          Left = 1
          Top = 209
          Width = 567
          Height = 306
          Align = alClient
          Caption = 'PnlItemGrid'
          TabOrder = 1
          object DBGridItem: TDBGrid
            Left = 1
            Top = 1
            Width = 565
            Height = 304
            Align = alClient
            DataSource = DataSourceInStack
            Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
            TabOrder = 0
            TitleFont.Charset = DEFAULT_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -11
            TitleFont.Name = 'MS Sans Serif'
            TitleFont.Style = []
            OnDrawColumnCell = DBGridItemDrawColumnCell
          end
        end
      end
    end
    object PnlBotn: TPanel
      Left = 1
      Top = 527
      Width = 571
      Height = 51
      Align = alBottom
      TabOrder = 1
      object btnExit: TBitBtn
        Left = 438
        Top = 10
        Width = 95
        Height = 29
        Caption = #36864#20986' &X'
        TabOrder = 0
        OnClick = btnExitClick
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000C40E0000C40E00000000000000000000BFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBF
          BFBFBFBFBFBFBFBFBFBFBFBFBF0000007F7F7F0000007F7F7F0000007F7F7FFF
          FF007F7F7FFFFF00000000BFBFBF7F7F000000000000007F7F7FBFBFBF000000
          000000000000000000000000000000000000FFFF007F7F7F000000FFFFFF7F7F
          7F7F7F00000000000000BFBFBFBFBFBFBFBFBFBFBFBF00000000000000000000
          0000000000000000000000FFFFFF7F7F007F7F007F7F00000000BFBFBFBFBFBF
          BFBFBFBFBFBF0000000000FF000000FFFF00FFFFFF00007F000000FFFFFF7F7F
          7F7F7F007F7F7F0000000000000000000000000000000000000000FF0000FF00