requisitionunit.~dfm

批发商品管理系统 目前我正在潜心研究

      OptionsView.Footer = True
      OptionsView.GroupByBox = False
      OptionsView.GroupFooters = gfVisibleWhenExpanded
      OptionsView.HeaderEndEllipsis = True
      OptionsView.Indicator = True
      object DetailsDBColumn: TcxGridDBColumn
        DataBinding.FieldName = #21830#21697#20195#30721
        PropertiesClassName = 'TcxLookupComboBoxProperties'
        Properties.DropDownWidth = 300
        Properties.KeyFieldNames = #21830#21697#20195#30721
        Properties.ListColumns = <
          item
            MinWidth = 100
            Width = 100
            FieldName = #21830#21697#20195#30721
          end
          item
            MinWidth = 200
            Width = 200
            FieldName = #21830#21697#21517#31216
          end>
        Properties.ListSource = DataForm.DS_INV
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 100
      end
      object DetailsDBColumn1: TcxGridDBColumn
        DataBinding.FieldName = #21830#21697#21517#31216
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Content = cxStyle3
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 200
      end
      object DetailsDBColumn2: TcxGridDBColumn
        DataBinding.FieldName = #35268#26684
        FooterAlignmentHorz = taCenter
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Content = cxStyle3
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 48
      end
      object DetailsDBColumn3: TcxGridDBColumn
        DataBinding.FieldName = #21333#20301
        FooterAlignmentHorz = taCenter
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Content = cxStyle3
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 48
      end
      object DetailsDBColumn4: TcxGridDBColumn
        DataBinding.FieldName = #25968#37327
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 70
      end
      object DetailsDBColumn5: TcxGridDBColumn
        DataBinding.FieldName = #21333#20215
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 70
      end
      object DetailsDBColumn6: TcxGridDBColumn
        DataBinding.FieldName = #37329#39069
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 70
      end
      object DetailsDBColumn7: TcxGridDBColumn
        DataBinding.FieldName = #35745#21010#21040#36135
        HeaderAlignmentHorz = taCenter
        HeaderAlignmentVert = vaCenter
        HeaderGlyphAlignmentHorz = taCenter
        Styles.Footer = cxStyle1
        Styles.Header = cxStyle2
        Width = 120
      end
    end
    object GridTableView1: TcxGridTableView
      NavigatorButtons.ConfirmDelete = False
      NavigatorButtons.First.Visible = True
      NavigatorButtons.PriorPage.Visible = True
      NavigatorButtons.Prior.Visible = True
      NavigatorButtons.Next.Visible = True
      NavigatorButtons.NextPage.Visible = True
      NavigatorButtons.Last.Visible = True
      NavigatorButtons.Insert.Visible = True
      NavigatorButtons.Delete.Visible = True
      NavigatorButtons.Edit.Visible = True
      NavigatorButtons.Post.Visible = True
      NavigatorButtons.Cancel.Visible = True
      NavigatorButtons.Refresh.Visible = True
      NavigatorButtons.SaveBookmark.Visible = True
      NavigatorButtons.GotoBookmark.Visible = True
      NavigatorButtons.Filter.Visible = True
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <
        item
          Kind = skSum
          Column = GridTableView1Column6
        end>
      DataController.Summary.SummaryGroups = <>
      OptionsView.GroupByBox = False
      object GridTableView1Column1: TcxGridColumn
      end
      object GridTableView1Column2: TcxGridColumn
      end
      object GridTableView1Column3: TcxGridColumn
      end
      object GridTableView1Column4: TcxGridColumn
      end
      object GridTableView1Column5: TcxGridColumn
      end
      object GridTableView1Column6: TcxGridColumn
      end
      object GridTableView1Column7: TcxGridColumn
      end
    end
    object GridCardView1: TcxGridCardView
      NavigatorButtons.ConfirmDelete = False
      DataController.Summary.DefaultGroupSummaryItems = <>
      DataController.Summary.FooterSummaryItems = <>
      DataController.Summary.SummaryGroups = <>
      object GridCardView1Row1: TcxGridCardViewRow
      end
      object GridCardView1Row2: TcxGridCardViewRow
      end
      object GridCardView1Row3: TcxGridCardViewRow
      end
      object GridCardView1Row4: TcxGridCardViewRow
      end
      object GridCardView1Row5: TcxGridCardViewRow
      end
      object GridCardView1Row6: TcxGridCardViewRow
      end
    end
    object GridLevel1: TcxGridLevel
      GridView = GridCardView1
      Options.DetailTabsPosition = dtpTop
    end
  end
  object DetailsR: TADOQuery
    Active = True
    Connection = DataForm.Conn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT  tPO_Details.cInvCode AS '#21830#21697#20195#30721','
      'tInventory.cInvName AS '#21830#21697#21517#31216', tInventory.cInvStd AS '#35268#26684','
      'tUnit.cComUnitName AS '#21333#20301', tPO_Details.iQuantity AS '#25968#37327','
      'tPO_Details.iUnitPrice AS '#21333#20215', tPO_Details.iMoney AS '#37329#39069','
      'tPO_Details.dArriveDate AS '#35745#21010#21040#36135
      'FROM tInventory INNER JOIN'
      
        'tPO_Details ON tInventory.cInvCode = tPO_Details.cInvCode INNER ' +
        'JOIN'
      'tUnit ON tInventory.cComUnitCode = tUnit.cComunitCode INNER JOIN'
      'tPO_Main ON tPO_Details.POID = tPO_Main.POID')
    Left = 568
    Top = 30
    object DetailsRDSDesigner: TWideStringField
      FieldName = #21830#21697#20195#30721
    end
    object DetailsRDSDesigner2: TWideStringField
      FieldName = #21830#21697#21517#31216
      ReadOnly = True
      Size = 60
    end
    object DetailsRDSDesigner3: TWideStringField
      FieldName = #35268#26684
      ReadOnly = True
      Size = 60
    end
    object DetailsRDSDesigner4: TWideStringField
      FieldName = #21333#20301
      ReadOnly = True
    end
    object DetailsRDSDesigner5: TFloatField
      FieldName = #25968#37327
    end
    object DetailsRDSDesigner6: TFloatField
      FieldName = #21333#20215
      DisplayFormat = '#0.000'
    end
    object DetailsRDSDesigner7: TBCDField
      FieldName = #37329#39069
      DisplayFormat = '#0.00'
      Precision = 19
    end
    object DetailsRDSDesigner8: TDateTimeField
      FieldName = #35745#21010#21040#36135
    end
  end
  object MainR: TADOQuery
    Connection = DataForm.Conn
    CursorType = ctStatic
    Parameters = <>
    Left = 600
    Top = 30
  end
  object ExeSQL: TADOCommand
    Connection = DataForm.Conn
    Parameters = <>
    Left = 632
    Top = 28
  end
  object TranList: TActionList
    Left = 661
    Top = 27
    object Query: TAction
      Caption = #26597#35810
    end
    object Add: TAction
      Caption = #26032#22686
    end
    object Edit: TAction
      Caption = #20462#25913
      OnExecute = EditExecute
    end
    object Save: TAction
      Caption = #20445#23384
    end
    object Refresh: TAction
      Caption = #25918#24323
    end
    object Delete: TAction
      Caption = #21024#38500
    end
    object First: TAction
      Caption = #26368#21069
      OnExecute = FirstExecute
    end
    object Prior: TAction
      Caption = #21069#19968
      OnExecute = PriorExecute
    end
    object Next: TAction
      Caption = #21518#19968
      OnExecute = NextExecute
    end
    object Last: TAction
      Caption = #26368#21518
      OnExecute = LastExecute
    end
    object Update: TAction
      Caption = 'Update'
      OnExecute = UpdateExecute
    end
    object ShowForm: TAction
      Caption = 'ShowForm'
      OnExecute = ShowFormExecute
    end
    object AddINV: TAction
      Caption = 'AddINV'
    end
  end
  object ImageList: TImageList
    Left = 693
    Top = 27
    Bitmap = {
      494C010168006D00040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
      000000000000360000002800000040000000C0010000010020000000000000C0
      0100000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000000000000000000000000000000000000000000000000000