unit321.dfm

本系统是SQL SERVER的管理系统

object Form321: TForm321
  Left = 262
  Top = 100
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsNone
  Caption = '销售管理---销售利润登记'
  ClientHeight = 180
  ClientWidth = 522
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  Icon.Data = {
    0000010001002020040000000000E80200001600000028000000200000004000
    0000010004000000000000020000000000000000000010000000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000077
    7777000000000000000000000000777777777777777700000000000000000000
    00000077777777700000000000000000FFFF77DDDDD777777000000000000FFF
    FFFF777DDDDDDD7777700000000000000000077DDDDDDDDDD777700000000000
    0000000777DDDDDDDDD77700000000000000000000777D777DD7777000000000
    000000000000077F777777770000007770000000000000007777787770000799
    9700000000000000777778C7770009999700000000000000007888CC77700F99
    98700000000000000007CCCCC77000FF9770000000000000000077CCCC777000
    0777000000000000000008CCCC77970000F9700000000000000078FCCCC79970
    707997700000000000007877FCC7F997979999977700000000078777FCC70F99
    9999999998877777777A88877FC700099999999987788887B7AAAAAA77C00009
    999999998877777BB7AAAAAAA7C0779999999999887777BBB7777AAAACC09999
    9999999988777777BBB7777AAC000099999999999877777BBBBB7777AA000000
    99999999987777BBBBBBB77AA0000000009999999877777BBBBBBAA000000000
    0000999998877777BB77F00000000000000000099887777777F000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFC0FFFFFF0000FFFFFFC01FFFF00007FF8000
    01FFFF80007FFFE0003FFFFC001FFFFF800FC7FFF00783FFF00383FFFC0181FF
    FE01C1FFFF0078FFFF803C7FFF00141FFF000003FE0080000000E0000001E000
    00010000000100000003C0000003F0000007FC00001FFF00007FFFE001FF}
  OldCreateOrder = False
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object epEfTrBtn1: TepEfTrBtn
    Left = 96
    Top = 152
    Width = 75
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn1Click
    Spacing = 0
    Noise = False
    FrameWidth = 2
    Caption = '保存'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object epEfTrBtn2: TepEfTrBtn
    Left = 360
    Top = 152
    Width = 75
    Height = 25
    Transparent = True
    ActiveTextColor = clBackground
    OnClick = epEfTrBtn2Click
    Spacing = 0
    Noise = False
    FrameWidth = 2
    Caption = '返回'
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 521
    Height = 145
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -16
    Font.Name = '楷体_GB2312'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 32
      Top = 16
      Width = 80
      Height = 19
      Caption = '合同号：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 48
      Width = 96
      Height = 16
      Caption = '销售总价格：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 24
      Top = 80
      Width = 80
      Height = 16
      Caption = '入户费用：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 256
      Top = 48
      Width = 112
      Height = 16
      Caption = '车辆装修费用：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 288
      Top = 80
      Width = 80
      Height = 16
      Caption = '其它费用：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 24
      Top = 112
      Width = 80
      Height = 16
      Caption = '汇款金额：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 288
      Top = 112
      Width = 80
      Height = 16
      Caption = '销售利润：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object epEfTrBtn3: TepEfTrBtn
      Left = 328
      Top = 16
      Width = 137
      Height = 25
      Transparent = True
      ActiveTextColor = clLime
      OnClick = epEfTrBtn3Click
      Spacing = 0
      Noise = False
      FrameWidth = 2
      Caption = '查看合同基本资料'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '楷体_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object FlatComboBox1: TFlatComboBox
      Left = 104
      Top = 16
      Width = 145
      Height = 24
      Style = csDropDownList
      Color = clWindow
      ItemHeight = 16
      TabOrder = 0
      ItemIndex = -1
      OnEnter = FlatComboBox1Enter
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit1: TsncCurrencyEdit
      Left = 104
      Top = 48
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 1
      TabStop = True
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit2: TsncCurrencyEdit
      Left = 368
      Top = 48
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 2
      TabStop = True
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit3: TsncCurrencyEdit
      Left = 104
      Top = 80
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 3
      TabStop = True
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit4: TsncCurrencyEdit
      Left = 368
      Top = 80
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 4
      TabStop = True
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit5: TsncCurrencyEdit
      Left = 104
      Top = 112
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 5
      TabStop = True
      OnKeyDown = FormKeyDown
    end
    object sncCurrencyEdit6: TsncCurrencyEdit
      Left = 368
      Top = 112
      Width = 145
      Height = 25
      CurrencySymbol = '￥'
      NegativeFont.Charset = DEFAULT_CHARSET
      NegativeFont.Color = clWindowText
      NegativeFont.Height = -11
      NegativeFont.Name = 'MS Sans Serif'
      NegativeFont.Style = []
      ParentColor = False
      TabOrder = 6
      TabStop = True
      OnKeyDown = FormKeyDown