ydedformula.dfm

详细的ERP设计资料

inherited YDEdFormulaForm: TYDEdFormulaForm
  Left = 0
  Top = -4
  Width = 812
  Height = 612
  Caption = #29289#26009#28165#21333
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label8: TLabel [0]
    Left = 124
    Top = 121
    Width = 36
    Height = 12
    Caption = #25240#25187#29575
  end
  inherited DBGrid: TQLDBGrid
    Top = 184
    Width = 804
    Height = 358
    Columns = <
      item
        Expanded = False
        FieldName = 'GoodsName'
        Title.Alignment = taCenter
        Width = 131
        Visible = True
        ControlType = ctCustomControl
        CustomControl = GoodsLookup
      end
      item
        Expanded = False
        FieldName = 'Quantity'
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PackUnitName'
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #21333#20301'A'
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'PriceBase'
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Amount'
        ReadOnly = True
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GoodsOut'
        Title.Alignment = taCenter
        Width = 130
        Visible = True
        ControlType = ctCustomControl
        CustomControl = LookGoodsOut
      end
      item
        Expanded = False
        FieldName = 'GoalQuantity'
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'GoalUnitName'
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #21333#20301'B'
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TaxAmount'
        Title.Alignment = taCenter
        Title.Caption = #25104#26412#31995#25968
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'SundryFee'
        ReadOnly = True
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'QuantityPcs'
        ReadOnly = True
        Title.Alignment = taCenter
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Memo'
        Title.Alignment = taCenter
        Width = 100
        Visible = True
      end>
  end
  inherited ToolBar: TToolBar
    Width = 804
  end
  inherited TopPanel: TPanel
    Width = 804
    Height = 155
    inherited RemarkLabel: TLabel
      Left = 12
      Top = 134
      Width = 24
      Caption = #22791#27880
    end
    inherited VoucherNoLabel: TLabel
      Left = 355
      Top = 5
      Width = 24
      Caption = #32534#21495
    end
    inherited VoucherDateLabel: TLabel
      Left = 510
      Top = 5
      Width = 24
      Caption = #26085#26399
    end
    object Label1: TLabel [3]
      Left = 355
      Top = 45
      Width = 36
      Height = 12
      Caption = #35774#35745#20154
    end
    object Label2: TLabel [4]
      Left = 510
      Top = 45
      Width = 36
      Height = 12
      Caption = #32463#25163#20154
    end
    object Label3: TLabel [5]
      Left = 14
      Top = 45
      Width = 48
      Height = 12
      Caption = #28165#21333#31867#21035
    end
    object Label6: TLabel [6]
      Left = 12
      Top = 88
      Width = 48
      Height = 12
      Caption = #35268#26684#22411#21495
    end
    object Label7: TLabel [7]
      Left = 510
      Top = 88
      Width = 48
      Height = 12
      Caption = #21551#29992#26085#26399
    end
    object Label9: TLabel [8]
      Left = 14
      Top = 5
      Width = 72
      Height = 12
      Caption = #37197#26009#28165#21333#21517#31216
    end
    object Label4: TLabel [9]
      Left = 260
      Top = 88
      Width = 48
      Height = 12
      Caption = #25216#26415#35828#26126
    end
    object SpeedButton1: TSpeedButton [10]
      Left = 722
      Top = 128
      Width = 75
      Height = 22
      Caption = #35745#31639#25104#26412
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton1Click
    end
    object SpeedButton2: TSpeedButton [11]
      Left = 420
      Top = 128
      Width = 75
      Height = 22
      Hint = #21462#24403#21069#24211#23384#21333#20215#27979#31639#20135#20986#21333#20301#25104#26412#12290
      Caption = #24403#21069#24211#23384#20215
      OnClick = SpeedButton2Click
    end
    object SpeedButton3: TSpeedButton [12]
      Left = 495
      Top = 128
      Width = 75
      Height = 22
      Hint = #21462#26368#26032#36827#36135#20215#27979#31639#20135#20986#21333#20301#25104#26412
      Caption = #26368#26032#36827#36135#20215
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton [13]
      Left = 646
      Top = 128
      Width = 75
      Height = 22
      Hint = #24403#21069#21830#21697#25104#26412#21333#20215#20026#38646#30340#29992#21442#32771#36827#20215#22635#20805#12290
      Caption = #22635#20805#21442#32771#36827#20215
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton4Click
    end
    object SpeedButton5: TSpeedButton [14]
      Left = 571
      Top = 128
      Width = 75
      Height = 22
      Hint = #24403#21069#21830#21697#25104#26412#21333#20215#20026#38646#30340#29992#21442#32771#36827#20215#22635#20805#12290
      Caption = #21442#32771#36827#20215
      ParentShowHint = False
      ShowHint = True
      OnClick = SpeedButton5Click
    end
    inherited RemarkDBEdit: TDBEdit
      Top = 130
      Width = 377
      DataField = 'Memo'
      TabOrder = 9
    end
    inherited VocherNoDBEdit: TDBEdit
      Left = 355
      Top = 20
      Width = 140
      DataField = 'Code'
    end
    inherited DateDBEdit: TDBEdit
      Left = 510
      Top = 20
      Width = 140
      DataField = 'Date'
    end
    object ClientQLDBLookup: TQLDBLookupComboBox
      Left = 355
      Top = 61
      Width = 140
      Height = 20
      BevelEdges = []
      BevelOuter = bvRaised
      Ctl3D = True
      DataField = 'ClientID'
      DataSource = MasterDataSource
      DropDownRows = 10
      KeyField = 'ID'
      ListField = 'Name'
      ListSource = DSClientName
      ParentCtl3D = False
      TabOrder = 4
      ButtonHeight = 22
      SearchMode = smLocate
      SearchType = stAuto
      VisibleButtons = [lbSetNull]
    end
    object LookupEmployee: TQLDBLookupComboBox
      Left = 510
      Top = 61
      Width = 140
      Height = 20
      BevelEdges = []
      BevelOuter = bvRaised
      Ctl3D = True
      DataField = 'EmployeeID'
      DataSource = MasterDataSource
      DropDownRows = 10
      KeyField = 'ID'
      ListField = 'Name'
      ListSource = DSEmployeeName
      ParentCtl3D = False
      TabOrder = 5
      ButtonHeight = 22
      SearchMode = smLocate
      SearchType = stAuto
      VisibleButtons = [lbSetNull]
    end
    object DbCBxBillMode: TDBComboBox
      Left = 12
      Top = 61
      Width = 328
      Height = 20
      DataField = 'BillMode'
      DataSource = MasterDataSource
      ItemHeight = 12
      TabOrder = 3
    end
    object DBEdit2: TDBEdit
      Left = 12
      Top = 103
      Width = 235
      Height = 20
      DataField = 'Deliver'
      DataSource = MasterDataSource
      TabOrder = 6
    end
    object DBEdit4: TDBEdit
      Left = 260
      Top = 103
      Width = 235
      Height = 20
      DataField = 'Apportion'
      DataSource = MasterDataSource
      TabOrder = 7
    end
    object DBEdit5: TDBEdit
      Left = 510
      Top = 104
      Width = 140
      Height = 20
      DataField = 'ClearDate'
      DataSource = MasterDataSource
      TabOrder = 8
    end
    object DBCBxBrief: TDBComboBox
      Left = 12
      Top = 20
      Width = 328
      Height = 20
      DataField = 'Brief'
      DataSource = MasterDataSource
      ItemHeight = 12
      TabOrder = 0
    end
  end
  inherited StatusBar1: TStatusBar
    Top = 542
    Width = 804
    Height = 24
  end
  object GoodsLookup: TQLDBLookupComboBox [5]
    Left = 16
    Top = 201
    Width = 129
    Height = 18
    Ctl3D = False
    DataField = 'GoodsID'
    DataSource = DetailDataSource
    KeyField = 'ID'
    ListField = 'Name'
    ListSource = dsGoodName
    ParentCtl3D = False
    TabOrder = 4
    Visible = False
    ButtonHeight = 22
    SearchMode = smLocate
    SearchType = stAuto
    VisibleButtons = [lbSetNull]
  end
  object LookGoodsOut: TQLDBLookupComboBox [6]
    Left = 484
    Top = 202
    Width = 109
    Height = 18
    BevelEdges = []
    BevelInner = bvNone
    BevelOuter = bvNone
    Ctl3D = False
    DataField = 'GoodsOutID'
    DataSource = DetailDataSource
    DropDownRows = 10
    KeyField = 'ID'
    ListField = 'Name'
    ListSource = dsGoodsOut
    ParentCtl3D = False
    TabOrder = 5
    Visible = False
    ButtonHeight = 22
    OnButtonClick = LookGoodsOutButtonClick
    SearchMode = smLocate
    SearchType = stAuto
    VisibleButtons = [lbSetNull]
  end
  object CALCosttipPanel: TPanel [7]
    Left = 280
    Top = 304
    Width = 225
    Height = 41
    Caption = #27491#22312#35745#31639#25104#26412'............'
    TabOrder = 6
    Visible = False
  end
  object FormulaAssemblePanel: TPanel [8]
    Left = 174
    Top = 112
    Width = 478
    Height = 294
    TabOrder = 7
    Visible = False
    object OKORCancelPanel: TPanel
      Left = 1
      Top = 252
      Width = 476
      Height = 41
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 0
      object OKBitBtn: TBitBtn
        Left = 192
        Top = 8
        Width = 75
        Height = 25
        Caption = #30830#23450
        TabOrder = 0
        OnClick = OKBitBtnClick
      end
      object CanelBitBtn: TBitBtn
        Left = 304
        Top = 8
        Width = 75
        Height = 25
        Caption = #21462#28040
        TabOrder = 1
        OnClick = CanelBitBtnClick
      end
    end
    object FormulaAssembleGrd: TQLDBGrid
      Left = 1
      Top = 1
      Width = 476
      Height = 251
      Align = alClient
      DataSource = FormulaAssembleDS
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      OnTitleClick = FormulaAssembleGrdTitleClick
      AlternateColor = 15399421
      CurrencyView.CurrencyTitle = False
      CurrencyView.DigitAlignment = taCenter
      CurrencyView.DigitWidth = 9
      CurrencyView.IntegerSeparateColor = clRed
      CurrencyView.SeparateColor = clSilver
      CurrencyView.ThousandSeparateColor = clGray
      CurrencyView.TitleLines = False
      FooterColor = clWindow
      FooterFont.Charset = GB2312_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -12
      FooterFont.Name = #23435#20307
      FooterFont.Style = []
      FooterRowCount = 1
      OptionsEx = [dgAllowDelete, dgAllowInsert]
      Columns = <
        item
          Expanded = False
          FieldName = #28165#21333#31867#21035
          Title.Alignment = taCenter
          Visible = True
        end
        item
          Expanded = False
          FieldName = #28165#21333#21517#31216
          Title.Alignment = taCenter
          Width = 160
          Visible = True
        end
        item
          Expanded = False
          FieldName = #32534#21495
          Title.Alignment = taCenter
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = #26085#26399
          Title.Alignment = taCenter
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25237#20837#26448#26009
          Title.Alignment = taCenter
          Width = 200
          Visible = True
        end
        item
          Expanded = False
          FieldName = #25237#20837#25968#37327
          Title.Alignment = taCenter
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = #21333#20301
          Title.Alignment = taCenter
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = #28165#21333#29366#24577
          Title.Alignment = taCenter
          Width = 60
          Visible = True
        end>
    end
  end
  inherited MasterDataSource: TDataSource
    DataSet = adsMaster
    Left = 101
    Top = 65
  end
  inherited DetailDataSource: TDataSource
    DataSet = adsDetail
    Left = 50