productmsunit.~dfm

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

object ProductMSForm: TProductMSForm
  Left = 195
  Top = 134
  Width = 811
  Height = 562
  BorderStyle = bsSizeToolWin
  Caption = #21830#21697#31649#29702#22522#26412#35774#32622
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object MainPC: TcxPageControl
    Left = 0
    Top = 0
    Width = 803
    Height = 535
    Cursor = crHandPoint
    ActivePage = MainTS
    Align = alClient
    Style = 9
    TabOrder = 0
    TabSlants.Positions = [spLeft, spRight]
    ClientRectBottom = 535
    ClientRectRight = 803
    ClientRectTop = 20
    object MainTS: TcxTabSheet
      Cursor = crHandPoint
      Caption = #27969#31243#31649#29702
      ImageIndex = 0
      object Toolbar: TRzToolbar
        Left = 0
        Top = 0
        Width = 803
        Height = 29
        Cursor = crHandPoint
        Images = ImageList
        ButtonWidth = 50
        ShowButtonCaptions = True
        TextOptions = ttoCustom
        BorderInner = fsNone
        BorderOuter = fsGroove
        BorderSides = [sdTop]
        BorderWidth = 0
        TabOrder = 0
        ToolbarControls = (
          BtnAdd
          BtnEdit
          BtnSave
          BtnRefresh
          BtnDelete)
        object BtnAdd: TRzToolButton
          Left = 4
          Top = 2
          Width = 50
          Cursor = crHandPoint
          DisabledIndex = 47
          ImageIndex = 46
          UseToolbarButtonSize = False
          Caption = #26032#22686
          OnClick = AddExecute
        end
        object BtnEdit: TRzToolButton
          Left = 54
          Top = 2
          Width = 50
          Cursor = crHandPoint
          DisabledIndex = 67
          ImageIndex = 66
          UseToolbarButtonSize = False
          Caption = #20462#25913
        end
        object BtnSave: TRzToolButton
          Left = 104
          Top = 2
          Width = 50
          Cursor = crHandPoint
          DisabledIndex = 71
          ImageIndex = 70
          UseToolbarButtonSize = False
          Caption = #20445#23384
          Enabled = False
          OnClick = SaveExecute
        end
        object BtnDelete: TRzToolButton
          Left = 204
          Top = 2
          Width = 50
          Cursor = crHandPoint
          DisabledIndex = 73
          ImageIndex = 72
          UseToolbarButtonSize = False
          Caption = #21024#38500
        end
        object BtnRefresh: TRzToolButton
          Left = 154
          Top = 2
          Width = 50
          Cursor = crHandPoint
          DisabledIndex = 75
          ImageIndex = 74
          UseToolbarButtonSize = False
          Caption = #25918#24323
          Enabled = False
          OnClick = NextExecute
        end
      end
      object Panel1: TPanel
        Left = 0
        Top = 129
        Width = 803
        Height = 386
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BevelWidth = 2
        Ctl3D = False
        ParentCtl3D = False
        TabOrder = 1
        object dxDBGrid1: TdxDBGrid
          Left = 2
          Top = 2
          Width = 350
          Height = 382
          Bands = <
            item
            end>
          DefaultLayout = False
          HeaderPanelRowCount = 1
          SummaryGroups = <>
          SummarySeparator = ', '
          Align = alLeft
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 0
          OnClick = dxDBGrid1Click
          DataSource = DS_FlowData
          Filter.Criteria = {00000000}
          OptionsView = [edgoBandHeaderWidth, edgoRowSelect, edgoUseBitmap]
          object dxDBGrid1cFlowName: TdxDBGridColumn
            Alignment = taLeftJustify
            Caption = #27969#31243#21517#31216
            HeaderAlignment = taCenter
            Width = 120
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cFlowName'
          end
          object dxDBGrid1cFlowMemo: TdxDBGridColumn
            Caption = #27969#31243#35828#26126
            Width = 220
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cFlowMemo'
          end
        end
        object dxDBGrid2: TdxDBGrid
          Left = 358
          Top = 2
          Width = 443
          Height = 382
          Bands = <
            item
            end>
          DefaultLayout = False
          HeaderPanelRowCount = 1
          SummaryGroups = <>
          SummarySeparator = ', '
          Align = alClient
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 1
          OnClick = dxDBGrid2Click
          DataSource = DS_FlowCourseItem
          Filter.Criteria = {00000000}
          OptionsView = [edgoBandHeaderWidth, edgoRowSelect, edgoUseBitmap]
          object dxDBGrid2ID: TdxDBGridMaskColumn
            Visible = False
            BandIndex = 0
            RowIndex = 0
            FieldName = 'ID'
          end
          object dxDBGrid2CourseID: TdxDBGridMaskColumn
            Caption = #36827#31243#24207#21495
            HeaderAlignment = taCenter
            Width = 54
            BandIndex = 0
            RowIndex = 0
            FieldName = 'CourseID'
          end
          object dxDBGrid2cCourseName: TdxDBGridColumn
            Caption = #36827#31243#21517#31216
            HeaderAlignment = taCenter
            Width = 96
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cCourseName'
          end
          object dxDBGrid2cDeptNo: TdxDBGridColumn
            Caption = #22788#29702#37096#38376
            HeaderAlignment = taCenter
            Width = 74
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cDeptNo'
          end
          object dxDBGrid2cPerson: TdxDBGridColumn
            Caption = #32463#21150#20154
            HeaderAlignment = taCenter
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cPerson'
          end
          object dxDBGrid2cCourseMemo: TdxDBGridColumn
            Caption = #36827#31243#35828#26126
            Width = 160
            BandIndex = 0
            RowIndex = 0
            FieldName = 'cCourseMemo'
          end
        end
        object Panel3: TPanel
          Left = 352
          Top = 2
          Width = 6
          Height = 382
          Align = alLeft
          BevelInner = bvLowered