kcsxxcx.dfm

仓库管理系统的SQL源代码

object Form21: TForm21
  Left = 376
  Top = 218
  BorderStyle = bsDialog
  Caption = #24211#23384#19978#19979#38480#26597#35810
  ClientHeight = 237
  ClientWidth = 477
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clBlue
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 477
    Height = 237
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Panel2: TPanel
      Left = 7
      Top = 6
      Width = 465
      Height = 38
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 0
      object Label1: TLabel
        Left = 177
        Top = 11
        Width = 63
        Height = 13
        AutoSize = False
        Caption = #21830#21697#32534#21495
      end
      object Label5: TLabel
        Left = 9
        Top = 11
        Width = 63
        Height = 13
        AutoSize = False
        Caption = #21830#21697#21517#31216
      end
      object SpeedButton1: TSpeedButton
        Left = 349
        Top = 6
        Width = 73
        Height = 25
        Cursor = crHandPoint
        Caption = #26597#35810
        OnClick = SpeedButton1Click
      end
      object ComboBox1: TComboBox
        Left = 67
        Top = 7
        Width = 103
        Height = 21
        Color = 16777145
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 13
        ParentFont = False
        TabOrder = 0
        OnChange = ComboBox1Change
        OnKeyDown = ComboBox1KeyDown
      end
      object ComboBox2: TComboBox
        Left = 235
        Top = 7
        Width = 103
        Height = 21
        Color = 16777145
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 13
        ParentFont = False
        TabOrder = 1
        OnKeyDown = ComboBox2KeyDown
      end
    end
    object DBGrid1: TDBGrid
      Left = 7
      Top = 45
      Width = 465
      Height = 153
      Color = 16777145
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clBlue
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = #21830#21697#32534#21495
          Title.Alignment = taCenter
          Width = 120
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = #21830#21697#21517#31216
          Title.Alignment = taCenter
          Width = 120
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = #24211#23384#19978#38480
          Title.Alignment = taCenter
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = #24211#23384#19979#38480
          Title.Alignment = taCenter
          Width = 100
          Visible = True
        end>
    end
    object Panel3: TPanel
      Left = 7
      Top = 199
      Width = 466
      Height = 33
      BevelInner = bvRaised
      BevelOuter = bvLowered
      TabOrder = 2
      object Label2: TLabel
        Left = 8
        Top = 10
        Width = 68
        Height = 13
        AutoSize = False
        Caption = #24211#23384#19978#38480#65306
      end
      object Label3: TLabel
        Left = 109
        Top = 10
        Width = 68
        Height = 13
        AutoSize = False
        Caption = #24211#23384#19979#38480#65306
      end
      object Label4: TLabel
        Left = 210
        Top = 9
        Width = 68
        Height = 13
        AutoSize = False
        Caption = #29616#24211#23384#37327#65306
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 74
        Top = 10
        Width = 3
        Height = 13
      end
      object Label7: TLabel
        Left = 174
        Top = 11
        Width = 3
        Height = 13
      end
      object Label8: TLabel
        Left = 276
        Top = 9
        Width = 3
        Height = 13
      end
      object BitBtn3: TBitBtn
        Left = 373
        Top = 5
        Width = 71
        Height = 23
        Cursor = crHandPoint
        Caption = #36864#20986
        TabOrder = 0
        OnMouseDown = BitBtn3MouseDown
        OnMouseUp = BitBtn3MouseUp
        Kind = bkClose
      end
    end
  end
  object DataSource1: TDataSource
    Left = 125
    Top = 106
  end
end