kccxut.dfm

仓库的进销存,及查询,供应商的管理.和库存的查询及管理.

object kccxfm: Tkccxfm
  Left = 104
  Top = 196
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = #24211#23384#26597#35810
  ClientHeight = 487
  ClientWidth = 758
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 758
    Height = 487
    Align = alClient
    TabOrder = 0
    object lastbt: TSpeedButton
      Left = 192
      Top = 448
      Width = 81
      Height = 25
      Caption = #19978#19968#26465
      OnClick = lastbtClick
    end
    object nextbt: TSpeedButton
      Left = 336
      Top = 448
      Width = 81
      Height = 25
      Caption = #19979#19968#26465
      OnClick = nextbtClick
    end
    object closebt: TSpeedButton
      Left = 560
      Top = 448
      Width = 89
      Height = 25
      Caption = #20851#38381
      OnClick = closebtClick
    end
    object GroupBox1: TGroupBox
      Left = 0
      Top = 16
      Width = 737
      Height = 113
      Caption = #26597#35810#26465#20214
      TabOrder = 0
      object cxbt: TSpeedButton
        Left = 568
        Top = 24
        Width = 81
        Height = 25
        Caption = #26597#35810
        OnClick = cxbtClick
      end
      object qxbt: TSpeedButton
        Left = 568
        Top = 56
        Width = 81
        Height = 25
        Caption = #21462#28040
        OnClick = qxbtClick
      end
      object Label1: TLabel
        Left = 48
        Top = 24
        Width = 113
        Height = 25
        AutoSize = False
        Caption = #26597#35810#26465#20214#65306
      end
      object Label2: TLabel
        Left = 48
        Top = 56
        Width = 97
        Height = 25
        AutoSize = False
        Caption = #20851'  '#38190'  '#23383#65306
      end
      object cxtjbox: TComboBox
        Left = 176
        Top = 24
        Width = 193
        Height = 21
        ItemHeight = 13
        TabOrder = 0
        OnKeyDown = cxtjboxKeyDown
        Items.Strings = (
          #21517#31216
          #32534#21495
          #21697#31867
          #36135#20301
          #25968#37327'('#22823#20110')')
      end
      object gjzedit: TEdit
        Left = 176
        Top = 56
        Width = 185
        Height = 21
        TabOrder = 1
        OnKeyDown = gjzeditKeyDown
      end
    end
    object GroupBox2: TGroupBox
      Left = 1
      Top = 144
      Width = 735
      Height = 294
      TabOrder = 1
      object DBGrid1: TDBGrid
        Left = 2
        Top = 15
        Width = 731
        Height = 277
        Align = alClient
        DataSource = DataSource1
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
  end
  object ADOQuery: TADOQuery
    Parameters = <>
    SQL.Strings = (
      'select * from kcb')
    Left = 209
    Top = 248
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery
    Left = 97
    Top = 264
  end
end