ubuydevice.dfm

Delphi+SQL SEVER开发的电脑销售管理系统

object frmBuyDevice: TfrmBuyDevice
  Left = 158
  Top = 128
  Cursor = crArrow
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #21830#21697#36141#36135#30446#24405
  ClientHeight = 458
  ClientWidth = 813
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clTeal
  Font.Height = -19
  Font.Name = #23435#20307
  Font.Style = [fsBold]
  Icon.Data = {
    0000010001002020000001000800A80800001600000028000000200000004000
    0000010008000000000080040000000000000000000000010000000000000000
    0000000080000080000000808000800000008000800080800000C0C0C000C0DC
    C000F0CAA600CCFFFF0099FFFF0066FFFF0033FFFF00FFCCFF00CCCCFF0099CC
    FF0066CCFF0033CCFF0000CCFF00FF99FF00CC99FF009999FF006699FF003399
    FF000099FF00FF66FF00CC66FF009966FF006666FF003366FF000066FF00FF33
    FF00CC33FF009933FF006633FF003333FF000033FF00CC00FF009900FF006600
    FF003300FF00FFFFCC00CCFFCC0099FFCC0066FFCC0066FFCC0033FFCC0000FF
    CC00FFCCCC00CCCCCC0099CCCC0066CCCC0033CCCC0000CCCC00FF99CC00CC99
    CC009999CC006699CC003399CC000099CC00FF66CC00CC66CC009966CC006666
    CC003366CC000066CC00FF33CC00CC33CC009933CC006633CC003333CC000033
    CC00FF00CC00CC00CC009900CC006600CC003300CC000000CC00FFFF9900CCFF
    990099FF990066FF990033FF990000FF9900FFCC9900CCCC990099CC990066CC
    990033CC990000CC9900FF999900CC9999009999990066999900339999000099
    9900FF669900CC66990099669900666699003366990000669900FF339900CC33
    990099339900663399003333990000339900FF009900CC009900990099006600
    99003300990000009900FFFF6600CCFF660099FF660066FF660033FF660000FF
    6600FFCC6600CCCC660099CC660066CC660033CC660000CC6600FF996600CC99
    660099996600669966003399660000996600FF666600CC666600996666006666
    66003366660000666600FF336600CC3366009933660066336600333366000033
    6600FF006600CC00660099006600660066003300660000006600FFFF3300CCFF
    330099FF330066FF330033FF330000FF3300FFCC3300CCCC330099CC330066CC
    330033CC330000CC3300FF993300CC9933009999330066993300339933000099
    3300FF663300CC66330099663300666633003366330000663300FF333300CC33
    330099333300663333003333330000333300FF003300CC003300990033006600
    33003300330000003300CCFF000099FF000066FF000033FF0000FFCC0000CCCC
    000099CC000066CC000033CC000000CC0000FF990000CC990000999900006699
    00003399000000990000FF660000CC6600009966000066660000006600003366
    0000FF330000CC33000099330000663300003333000000330000CC0000009900
    000066000000330000000000DD000000BB000000AA0000008800000077000000
    5500000044000000220000DD000000BB000000AA000000880000007700000055
    00000044000000220000DDDDDD00555555007777770077777700444444002222
    22001111110077000000550000004400000022000000F0FBFF00A4A0A0008080
    80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
    0000000000000000000000000000000000000000000000000000000000000000
    00000000000000000000005D07F6F6075D000000EDED00000000000000000000
    00000000000000005D5D5D0000E91800005D5D5D0000EDEDED00000000000000
    00000000EDEFEFEF6C6C6C07F60000F607E9E9E9EFEF00EDEDED000000000000
    000000EDEDEFEF0000186C0000F6F6000018E90000EFEFEDEDEDED0000000000
    000000EDEDEF18EF5D000007F6E9E9F60700005D5D6CEFEDEDEDEDED00000000
    000000EDEDEF6C6C185D070000E9E90000075D186C00EFEDEDEDEDED00000000
    00000000EDEF0000005D1807F60000F6076C5D0000EFEFEDEDEDED0000000000
    00000000EF6CEF5D5D0018E900F6F6006CB2005D5DEF6CEFED00000000000000
    00000000EF6C005DB25D0000F6E918F600005DB25D0000EF0000000000000000
    00000000EF00EFB2B2B20707001818000707B2B2B2EFEFEF0000000000000000
    00000000EFEF0000B2000718F60000F6E95D00B20000EFEF0000000000000000
    000000EFEF855D5D005D181818F6F66C6CE95D005DEF6CEFEF00000000000000
    000000EF000085005D00001800F6F6006C00005D00180000EF00000000000000
    000000EFEFEF005DE95D5D00F6E9E9F6005D5D6C5D6CEFEFEF00000000000000
    000000EF85005D00AEAE000700E9E9000700186C005D0000EF00000000000000
    0000EFEF005DE9000000000000000000000000005D6CEF00EFEF000000000000
    0000EF85EFE900005D5D0707F6F6F6F607075D5D00006CEF6CEF000000000000
    0000000000005D5D5D0000D355555555F0F0F05D5D5D000000EF000000000000
    000000EFEF5D0058E90055D355D3ECF0F0EBEBEBF0EB5DEFEF00000000000000
    00EFEF00000058585800555500D300F0EDEDEBEDEBEBEFECEC00EF0000000000
    00EF0000E958585858E9E9E900D300EBEBEBF0EBF0EDEBEBEC00EF0000000000
    00EF000058585858585858E900D3D300EBEBEBEDEBEBEBEBEB00EF0000000000
    000000E958585858585858E90000D300EBEBEBEBEBEB0000EFEF000000000000
    000000E9585858585858E9E900005555EBEBEBD355555500EF00000000000000
    000000E9585858585858E9E90000555555555555555555000000000000000000
    00000058585858585858E9E90000555555555555555555000000000000000000
    00000000000058585858585800D3555555555555555555000000000000000000
    00000000000000000058585800D3555555555555555555000000000000000000
    00000000000000000000000000D3555555555555555555000000000000000000
    00000000000000000000000000D3555555555555555555000000000000000000
    000000000000000000000000000000000000000000000000000000000000FFF8
    1FFFFFC000FFFE00001FFC00000FF8000007F8000003F8000003FC000007FC00
    001FFC00003FFC00003FFC00003FF800001FF800001FF800001FF800001FF000
    000FF000000FF000000FE0000007E4000007E0000007E0000007F000000FF800
    001FF800007FF802007FFF02007FFFE2007FFFFE007FFFFE007FFFFFFFFF}
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 19
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 813
    Height = 113
    Align = alTop
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlack
    Font.Height = -19
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 62
      Height = 14
      Caption = #31867'    '#22411
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 40
      Width = 60
      Height = 14
      Caption = #20135#21697#21517#31216
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 248
      Top = 16
      Width = 60
      Height = 14
      Caption = #29983#20135#21378#21830
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 248
      Top = 40
      Width = 60
      Height = 14
      Caption = #20135#21697#22411#21495
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 248
      Top = 64
      Width = 62
      Height = 14
      Caption = #36827'    '#20215
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label6: TLabel
      Left = 248
      Top = 88
      Width = 61
      Height = 14
      Caption = #36827' '#36135' '#37327
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 8
      Top = 88
      Width = 60
      Height = 14
      Caption = #36827#36135#26085#26399
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label8: TLabel
      Left = 8
      Top = 64
      Width = 62
      Height = 14
      Caption = #36136'    '#20445
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label9: TLabel
      Left = 504
      Top = 8
      Width = 60
      Height = 14
      Caption = #20135#21697#31616#20171
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBNavigator1: TDBNavigator
      Left = 506
      Top = 75
      Width = 290
      Height = 25
      DataSource = DataSource1
      Flat = True
      Hints.Strings = (
        #31532#19968#26465#35760#24405
        #21069#19968#26465#35760#24405
        #21518#19968#26465#35760#24405
        #26368#21518#19968#26465#35760#24405
        #25554#20837#35760#24405
        #21024#38500#35760#24405
        #20462#25913#35760#24405
        #20445#23384#35760#24405
        #21462#28040#35760#24405
        #21047#26032#35760#24405)
      ParentShowHint = False
      ConfirmDelete = False
      ShowHint = True
      TabOrder = 10
    end
    object DBMemo1: TDBMemo
      Left = 504
      Top = 32
      Width = 297
      Height = 25
      DataField = 'Note'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 9
    end
    object DBComboBox1: TDBComboBox
      Left = 88
      Top = 8
      Width = 153
      Height = 22
      DataField = 'Type'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 14
      Items.Strings = (
        #25972#26426#31867
        #37197#20214#31867
        #22806#35774#31867
        #32593#32476#31867
        #25968#30721#31867
        #32791#26448#31867
        #36719#20214#31867
        #20854#23427)
      ParentFont = False
      TabOrder = 0
      OnChange = DBComboBox1Change
    end
    object DBComboBox2: TDBComboBox
      Left = 88
      Top = 32
      Width = 153
      Height = 22
      DataField = 'GoodsName'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 14
      ParentFont = False
      TabOrder = 1
    end
    object DBComboBox3: TDBComboBox
      Left = 88
      Top = 56
      Width = 153
      Height = 22
      DataField = 'ZhiBao'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 14
      Items.Strings = (
        #19968#20010#26376
        #20108#20010#26376
        #19977#20010#26376
        #22235#20010#26376
        #20116#20010#26376
        #20845#20010#26376
        #19971#20010#26376
        #20843#20010#26376
        #20061#20010#26376
        #21313#20010#26376
        #21313#19968#26376
        #19968#24180
        #20108#24180
        #19977#24180)
      ParentFont = False
      TabOrder = 2
    end
    object DBEdit1: TDBEdit
      Left = 320
      Top = 8
      Width = 169
      Height = 22
      DataField = 'Producer'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object DBEdit2: TDBEdit
      Left = 320
      Top = 32
      Width = 169
      Height = 22
      DataField = 'GoodsType'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object DBEdit3: TDBEdit
      Left = 320
      Top = 56
      Width = 169
      Height = 22
      DataField = 'BuyValue'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnKeyPress = DBEdit3KeyPress
    end
    object DBEdit4: TDBEdit
      Left = 320
      Top = 80
      Width = 169
      Height = 22
      DataField = 'BuyNumber'
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 8
    end
    object DBComboBox4: TDBComboBox
      Left = 88
      Top = 80
      Width = 153
      Height = 22