bas_enter_payterm.dfm

一个MRPII系统源代码版本

inherited Frm_Bas_Enter_PayTerm: TFrm_Bas_Enter_PayTerm
  Left = 118
  Top = 118
  Caption = #20184#27454#26465#27454
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = #20184#27454#26465#27454
  end
  inherited Pnl_Head: TPanel
    inherited Lbl_Condition: TLabel
      Width = 24
      Caption = #20840#37096
    end
    inherited Lbl_Order: TLabel
      Width = 72
      Caption = #20184#27454#26465#27454#20195#30721
    end
  end
  inherited Pnl_Body: TPanel
    inherited DBGridEh: TDBGridEh
      FrozenCols = 3
      Columns = <
        Item
          EditButtons = <>
          FieldName = 'PayTermCode'
          Footers = <>
          ReadOnly = False
          Width = 75
        end
        Item
          EditButtons = <>
          FieldName = 'PayTermName'
          Footers = <>
          ReadOnly = False
        end
        Item
          EditButtons = <>
          FieldName = 'PayCreDays'
          Footers = <>
          ReadOnly = False
          Width = 58
        end
        Item
          EditButtons = <>
          FieldName = 'PayFAdays1'
          Footers = <>
          ReadOnly = False
          Width = 59
        end
        Item
          EditButtons = <>
          FieldName = 'PayFArate1'
          Footers = <>
          ReadOnly = False
          Width = 48
        end
        Item
          EditButtons = <>
          FieldName = 'PayFAdays2'
          Footers = <>
          ReadOnly = False
        end
        Item
          EditButtons = <>
          FieldName = 'PayFArate2'
          Footers = <>
          ReadOnly = False
          Width = 48
        end
        Item
          EditButtons = <>
          FieldName = 'PayFAdays3'
          Footers = <>
          ReadOnly = False
        end
        Item
          EditButtons = <>
          FieldName = 'PayFArate3'
          Footers = <>
          ReadOnly = False
          Width = 48
        end
        Item
          EditButtons = <>
          FieldName = 'PayFAdays4'
          Footers = <>
          ReadOnly = False
          Width = 59
        end
        Item
          EditButtons = <>
          FieldName = 'PayFArate4'
          Footers = <>
          ReadOnly = False
          Width = 48
        end
        Item
          EditButtons = <>
          FieldName = 'RemArk'
          Footers = <>
          ReadOnly = False
          Width = 126
        end>
    end
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 133
    Top = 243
  end
  inherited ActionList: TActionList
    Left = 200
    Top = 152
  end
  inherited AdoQry_Main: TAdoQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=mdrcmrm_B_old;Data Source=192.16' +
      '8.0.151'
    CurSorType = ctStatic
    SQL.Strings = (
      'select * from PayTerm')
    Left = 208
    Top = 209
    object AdoQry_MainPayTermID: TAutoIncField
      FieldName = 'PayTermID'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayTermCode: TStringField
      DisplayLabel = #20184#27454#26465#27454#20195#30721
      FieldName = 'PayTermCode'
      Origin = 'PayTerm'
      Size = 3
    end
    object AdoQry_MainPayTermName: TStringField
      DisplayLabel = #20184#27454#26465#27454#21517#31216
      FieldName = 'PayTermName'
      Origin = 'PayTerm'
      Size = 30
    end
    object AdoQry_MainPayCreDays: TIntegerField
      DisplayLabel = #20449#29992#22825#25968
      FieldName = 'PayCreDays'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFAdays1: TIntegerField
      DisplayLabel = #20248#24800#22825#25968'1'
      FieldName = 'PayFAdays1'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFArate1: TFloatField
      DisplayLabel = #20248#24800#29575'1'
      FieldName = 'PayFArate1'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFAdays2: TIntegerField
      DisplayLabel = #20248#24800#22825#25968'2'
      FieldName = 'PayFAdays2'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFArate2: TFloatField
      DisplayLabel = #20248#24800#29575'2'
      FieldName = 'PayFArate2'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFAdays3: TIntegerField
      DisplayLabel = #20248#24800#22825#25968'3'
      FieldName = 'PayFAdays3'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFArate3: TFloatField
      DisplayLabel = #20248#24800#29575'3'
      FieldName = 'PayFArate3'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFAdays4: TIntegerField
      DisplayLabel = #20248#24800#22825#25968'4'
      FieldName = 'PayFAdays4'
      Origin = 'PayTerm'
    end
    object AdoQry_MainPayFArate4: TFloatField
      DisplayLabel = #20248#24800#29575'4'
      FieldName = 'PayFArate4'
      Origin = 'PayTerm'
    end
    object AdoQry_MainRemArk: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'RemArk'
      Origin = 'PayTerm'
      Size = 30
    end
  end
  inherited DataSource: TDataSource
    Top = 137
  end
end