fudao_setup.dfm

类似于安利公司的奖金制度下的会员层次关系、会员级别、会员奖金等

object Form4: TForm4
  Tag = 1
  Left = 319
  Top = 150
  Width = 447
  Height = 270
  Caption = #21021#22987#35774#32622'----'#36741#23548#27941#36148#27604#29575#35774#32622
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 288
    Top = 44
    Width = 91
    Height = 13
    Caption = #36741#23548#27941#36148#27604#29575#65306
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 288
    Top = 102
    Width = 144
    Height = 13
    Caption = #24405#20837#21518#65292#25353'"'#8730'"'#30830#35748#20462#25913
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Button2: TButton
    Left = 303
    Top = 184
    Width = 94
    Height = 25
    Caption = #36864'    '#20986
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    OnClick = Button2Click
  end
  object DBEdit1: TDBEdit
    Left = 287
    Top = 66
    Width = 128
    Height = 21
    DataField = 'fudao_ratio'
    DataSource = DataModule1.DataSource_fudao_ratio
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
  end
  object DBGrid1: TDBGrid
    Left = 15
    Top = 14
    Width = 251
    Height = 203
    DataSource = DataModule1.DataSource_fudao_ratio
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'class'
        ReadOnly = True
        Title.Caption = #32423#21035#30721
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 50
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'type'
        ReadOnly = True
        Title.Caption = #32423#21035#21517#31216
        Title.Font.Charset = DEFAULT_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -13
        Title.Font.Name = 'MS Sans Serif'
        Title.Font.Style = []
        Width = 157
        Visible = True
      end>
  end
  object DBNavigator1: TDBNavigator
    Left = 288
    Top = 128
    Width = 132
    Height = 25
    DataSource = DataModule1.DataSource_fudao_ratio
    VisibleButtons = [nbPrior, nbNext, nbPost]
    TabOrder = 3
  end
end