frmkndunit.dfm

根据客户对销售人员回款返利和业绩返利的功能需求所开发

inherited frmKND: TfrmKND
  Left = 564
  Top = 238
  Caption = #36153#29992#31867#21035
  OldCreateOrder = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    inherited btn_Insert: TBitBtn
      OnClick = btn_InsertClick
    end
    inherited btn_Search: TBitBtn
      Left = 447
      Visible = False
    end
    inherited btn_Edit: TBitBtn
      OnClick = btn_EditClick
    end
    inherited btn_Print: TBitBtn
      Left = 295
    end
    inherited btn_Save: TBitBtn
      Left = 221
      OnClick = btn_SaveClick
    end
    inherited btn_Close: TBitBtn
      Left = 369
    end
  end
  inherited Panel3: TPanel
    Height = 73
    object Label1: TLabel
      Left = 48
      Top = 25
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #36153#29992#31867#21035
    end
    object Label2: TLabel
      Left = 256
      Top = 25
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #36153#29992#21517#31216
    end
    object DBEdit1: TDBEdit
      Left = 112
      Top = 21
      Width = 121
      Height = 21
      DataField = 'FY_NO'
      DataSource = dsMaster
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 336
      Top = 21
      Width = 121
      Height = 21
      DataField = 'FY_NAME'
      DataSource = dsMaster
      TabOrder = 1
    end
  end
  object wwDBGrid1: TwwDBGrid [3]
    Left = 0
    Top = 73
    Width = 688
    Height = 307
    Selected.Strings = (
      'FY_NO'#9'30'#9#36153#29992#31867#21035#9'F'#9
      'FY_NAME'#9'50'#9#36153#29992#21517#31216#9'F')
    IniAttributes.Delimiter = ';;'
    ExportOptions.ExportType = wwgetSYLK
    TitleColor = clBtnFace
    FixedCols = 0
    ShowHorzScrollBar = True
    Align = alClient
    DataSource = dsMaster
    TabOrder = 3
    TitleAlignment = taLeftJustify
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = False
  end
  inherited dsMaster: TDataSource
    DataSet = qryKND
    Left = 352
    Top = 112
  end
  object qryKND: TADOQuery [5]
    Connection = dm.ADOConnection2
    Parameters = <>
    SQL.Strings = (
      'select * from fY')
    Left = 512
    Top = 128
    object qryKNDFY_NO: TStringField
      DisplayLabel = #36153#29992#31867#21035
      DisplayWidth = 30
      FieldName = 'FY_NO'
      Size = 30
    end
    object qryKNDFY_NAME: TStringField
      DisplayLabel = #36153#29992#21517#31216
      DisplayWidth = 50
      FieldName = 'FY_NAME'
      Size = 50
    end
  end
end