unit1.dfm

一个小的冰酒公司的销售系统。可以进行数据插入

        FocusControl = DBEdit22
      end
      object Label53: TLabel
        Left = 16
        Top = 88
        Width = 40
        Height = 19
        Caption = 'Name'
        FocusControl = DBEdit37
      end
      object Label54: TLabel
        Left = 280
        Top = 88
        Width = 55
        Height = 19
        Caption = 'Address'
        FocusControl = DBEdit38
      end
      object Label55: TLabel
        Left = 16
        Top = 200
        Width = 66
        Height = 19
        Caption = 'Unit Price'
        FocusControl = DBEdit39
      end
      object Label56: TLabel
        Left = 280
        Top = 200
        Width = 70
        Height = 19
        Caption = 'Total Cost'
        FocusControl = DBEdit40
      end
      object Label57: TLabel
        Left = 16
        Top = 256
        Width = 96
        Height = 19
        Caption = 'DownPayment'
        FocusControl = DBEdit41
      end
      object DBEdit4: TDBEdit
        Left = 120
        Top = 32
        Width = 121
        Height = 27
        DataField = 'QNo'
        DataSource = DataSource5
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 368
        Top = 32
        Width = 161
        Height = 27
        DataField = 'ONo'
        DataSource = DataSource12
        TabOrder = 1
      end
      object DBEdit21: TDBEdit
        Left = 120
        Top = 144
        Width = 121
        Height = 27
        DataField = 'IWNo'
        DataSource = DataSource12
        TabOrder = 2
      end
      object DBEdit22: TDBEdit
        Left = 368
        Top = 144
        Width = 161
        Height = 27
        DataField = 'Qty'
        DataSource = DataSource12
        TabOrder = 3
      end
      object DBEdit37: TDBEdit
        Left = 120
        Top = 88
        Width = 121
        Height = 27
        DataField = 'CName'
        DataSource = DataSource10
        TabOrder = 4
      end
      object DBEdit38: TDBEdit
        Left = 368
        Top = 88
        Width = 161
        Height = 27
        DataField = 'CAddress'
        DataSource = DataSource10
        TabOrder = 5
      end
      object DBNavigator4: TDBNavigator
        Left = 288
        Top = 304
        Width = 240
        Height = 25
        DataSource = DataSource12
        TabOrder = 6
      end
      object DBEdit39: TDBEdit
        Left = 120
        Top = 200
        Width = 121
        Height = 27
        DataField = 'IWPrice'
        DataSource = DataSource12
        TabOrder = 7
      end
      object DBEdit40: TDBEdit
        Left = 368
        Top = 200
        Width = 161
        Height = 27
        DataField = 'IW Cost'
        DataSource = DataSource12
        TabOrder = 8
      end
      object DBEdit41: TDBEdit
        Left = 120
        Top = 256
        Width = 121
        Height = 27
        DataField = 'DownPayment'
        DataSource = DataSource12
        TabOrder = 9
      end
      object BitBtn3: TBitBtn
        Left = 552
        Top = 296
        Width = 41
        Height = 41
        Hint = 'Exit'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 10
        OnClick = BitBtn3Click
        Glyph.Data = {
          6A080000424D6A0800000000000036000000280000001B000000190000000100
          18000000000034080000120B0000120B00000000000000000000FFFFFFFFFFFF
          F8F7FBCCC4DFFBF9FBFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE3E3FA55
          53DBCAD4F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8CBBE80719988C7CB6FEF8F9
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFE4E2F83431D40011D21531D4C8D6F3FFFFFFFF
          FFFFFAFCFE7895E2499EE42C83D60012927766AAFAF7F7FFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEEAEC
          F4272BC5001ED00024CE174DCC59ADE9C3DAF2FFFFFF606BE2011AD2092EC765
          AFE73B8EDF031160ABA09DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1ECEEB1BDCB74ACE70525BA1F51C76EC2
          F01051C02C36A1FFFFFF8B89E70611D2002AD30421B966A2D5B6CACAD5D7D8F0
          ECEDFCFCFCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          F5F2F5CFCCD7E0DBE0C8D4D54D698769B8F11253BD19198EC3B2D2FFFFFFFFFF
          FF938FE60410C72B60D2637381EBEAE6FFFEFEF7F8F8F7F4F5FEFDFDFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEDEFCEC9D4E2E6ECA2B6CAD2D2D8
          FFFFFF59768D151473C1AECEFFFFFFFFFFFFFFFFFFFFFFFFAAB4E39FCBE1ECEE
          EC98A5B9A5BBD1FFFFFFEDECECEAE7E8FFFEFEFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFF4F0F3C5C0CCCDCDD2E8EAEBABBECEEBF1F5F4F4F5C0BFBECEC3C0FFFEFF
          FFFFFFFFFFFFFFFFFFFFFFFFFEFFFEE1DEE2D3D1D9CBD9E6CDD3DAF3F4F4E7EA
          EEF5F5F5F7F5F5FFFFFFFFFFFFFFFFFFFFFEFDF6EAE6D5CED6E0E0E7C9CACBDD
          DFE1FEFEFFFCFDFDF2F0F0FAF7F7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFE9E9EFDAD6E0E3E1E5CCCDCED7DCDCFEFFFFFFFDFAABB3C5E8E9
          E9FFFFFFCDC1D04C5A94D6D7E8F2F1EDDDDEDFE4E9EDE5E7E8F1EFF1FAF9F9FF
          FEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7EB
          BBBCC4D7D7DBE6E6E7F0EBE5B8CDED0846B3578AAECBB7BE2044880045C34183
          DFDADFDDFDFCFBFEFDFEF1EEEEF7F6F6FFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEEEDF1D6D5E0F8F4F5A0BFDE
          0E76E51175EA094DCA245FA01748AC0637DA0066E54789E8D6DCEAF9F6F5FBFA
          FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFF3EEEE8490B60C48D20445DD0935DB1079E70494F2
          3B49A21C24C30F67EB0254CC3B5E9AF0F0F0FFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFBBBCC9225EA1094DC00616CA0089E833D5EE2455B01A31A41841C33B7DAF
          DFE0DCFFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFA39BCD071A870A
          77E42C8AD41D38A40359D2003CBC152CA0C1C5D3FFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFD9D7F10F10CC0600AF2C37892B33CA0100BD0012B901
          51CC0137BB2430ABDAD7E9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9897
          D30000B90000C50710B5000FC30000C90100BF010DBA0244C9002DB5605CAAF9
          F8FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF9492B80006A2010BB40042CA002E
          B70A0CBE0000CC0000C3010AB9001AAB565196F7F3F4FFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFD7CCCD287DB20048A8001A94001B9C434BAFBFBEE72B2ED20000C00000
          AE00189F1D72AFC5BBC1FFFEFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFAF8A6A2BB1D6DBF0888C4508FB5
          BAAABDC9BDD6EFECF2FFFFFFE4E5F68585D17871B64374A8007FC0358BB79A99
          B0FDFBFAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFB0A4A55B688C2864C64779ABECD4D1FFFFFEFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFF0E6E3598CB30360CC4B71B6A4BCC7F7F7F8FFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDC5A6A2506B9A92B2CA73
          92B4CBC4CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          ECE3EC5C63927F98B481ADCB9EA4B7FFF7F5FFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFDFBCEABA5697D96449BCB668DB4D3DCE4FFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDDD5CE6E708A3A80B7
          69AFD9B7AEB9F6ECE9FFFFFFFFFFFFFFFFFFFFFFFFFFFEFCCFADA6697A9364B9
          E795B2CEE1D6D7FFFFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFECE1DF8B70765E9FC56DB5DFA6A2B1F5E8E4
          FFFFFFFFFFFFFFFFFFCEBDBC6B798D70BBE486A0BDD9C4C4FFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFAEDE997797E6098BB80BEE59BA6C4F1EFF5FFFFFFFFFFFFE2E3EA
          669ED194AFCDE0CCCBFFFEFDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF8EDEAA5
          8482618FB3B4D3F1FEFDFFFFFFFF}
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'Invoice(CreditCard)'
      ImageIndex = 5
      object Label25: TLabel
        Left = 16
        Top = 96
        Width = 40
        Height = 19
        Caption = 'Name'
        FocusControl = DBEdit8
      end
      object Label26: TLabel
        Left = 280
        Top = 96
        Width = 55
        Height = 19
        Caption = 'Address'
        FocusControl = DBEdit15
      end
      object Label35: TLabel
        Left = 280
        Top = 40
        Width = 65
        Height = 19
        Caption = 'Quote No'
        FocusControl = DBEdit16
      end
      object Label36: TLabel
        Left = 16
        Top = 152
        Width = 80
        Height = 19
        Caption = 'Ice-wine No'
        FocusControl = DBEdit17
      end
      object Label37: TLabel
        Left = 280
        Top = 152
        Width = 58
        Height = 19
        Caption = 'Quantity'
        FocusControl = DBEdit18
      end
      object Label48: TLabel
        Left = 16
        Top = 208
        Width = 55
        Height = 19
        Caption = 'Supplier'
        FocusControl = DBEdit32
      end
      object Label42: TLabel
        Left = 16
        Top = 40
        Width = 73
        Height = 19
        Caption = 'Invoice No'
        FocusControl = DBEdit26
      end
      object Label58: TLabel
        Left = 280
        Top = 208
        Width = 70
        Height = 19
        Caption = 'Total Cost'
        FocusControl = DBEdit42
      end
      object Label59: TLabel
        Left = 280
        Top = 264
        Width = 96
        Height = 19
        Caption = 'DownPayment'
        FocusControl = DBEdit43
      end
      object Label60: TLabel
        Left = 16
        Top = 264
        Width = 26
        Height = 19
        Caption = 'Tax'
        FocusControl = DBEdit44
      end
      object DBEdit8: TDBEdit
        Left = 104
        Top = 96
        Width = 129
        Height = 27
        DataField = 'CName'
        DataSource = DataSource10
        TabOrder = 0
      end
      object DBEdit15: TDBEdit
        Left = 384
        Top = 96
        Width = 161
        Height = 27
        DataField = 'CAddress'
        DataSource = DataSource10
        TabOrder = 1
      end
      object DBEdit16: TDBEdit
        Left = 384
        Top = 40
        Width = 161
        Height = 27
        DataField = 'QNo'
        DataSource = DataSource5
        TabOrder = 2
      end