storege.~dfm

学习程序,用于初学进销存的参考代码学习程序,用于初学进销存的参考代码

      Flat = True
      Glyph.Data = {
        F6060000424DF606000000000000360000002800000018000000180000000100
        180000000000C0060000C40E0000C40E00000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C03333CC0000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000FFC0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C03333CC0066FF0000FF000099C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C03333CC3399FF0066FF00
        00CC000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C00000FFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C03333CC3399FF0000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C00000FFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C00000CC3399FF0000CC000099C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C00000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0066FF000099
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000FF000099C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C00000CC0000FF000099C0C0C0C0C0C0C0C0C0C0C0C00000FF000099C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0000FF000099C0C0C0C0C0C00000FF00
        0099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0000FF0000
        990000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C00000CC0000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C00000CC0000FF0000990000CC000099C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0000FF000099C0C0C0C0C0C00000CC00
        0099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0000CC0000FF000099C0C0C0C0C0
        C0C0C0C0C0C0C00000CC000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC0000CC3399FF0000FF000099
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC000099C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC3399FF0066FF00
        00FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC
        000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C00000CC3399
        FF0066FF0000FF000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C00000CCC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C03333CC0000CC0000CC000099C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
    object SpeedButton41: TSpeedButton
      Left = 292
      Top = 1
      Width = 57
      Height = 28
      Caption = #23436#25104
      Enabled = False
      Flat = True
      Glyph.Data = {
        96010000424D9601000000000000760000002800000018000000180000000100
        04000000000020010000430B0000430B00001000000010000000000000008400
        0000C6000000007B000084840000C6C60000424242007B7B7B0084848400C0C0
        C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00999999999999
        9999999999999999999999999999999999999999988888888888888888999990
        000000000000000008999996AAAAAAAAAAAAAAAA08999996AAAAAAAAAAAAAAAA
        08999996AA559555555555AA08999996AA493344444444AA08999996AA93333A
        AAAAAAAA08999996A9333337555555AA08999996A3334733944444AA08999996
        AA3AAA7339AAAAAA08999996AA555553375555AA08999996AA444444339444AA
        08999996AAAAAAAAA33AAAAA08999996AA555555553955AA08999996AA444444
        444394AA08999996AAAAAAAAAAAA3AAA08999996AA222222222AA00009999996
        AA111111111AA0A099999996AAAAAAAAAAAAA009999999966666666666666099
        9999999999999999999999999999999999999999999999999999}
    end
    object SpeedButton42: TSpeedButton
      Left = 349
      Top = 1
      Width = 57
      Height = 28
      Caption = #24453#23450
      Enabled = False
      Flat = True
      Glyph.Data = {
        F6060000424DF606000000000000360000002800000018000000180000000100
        180000000000C0060000C40E0000C40E00000000000000000000C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0CC0000660033C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000CC0000660033C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF0000FF0000
        CC0000660033C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF
        0000FF0000FF0000FF0000CC0000660033666666000000000000000000000000
        000000000000000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0FF0000FF0000CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
        CCCCCCCCCCCCCCCCCCCCCCCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FFFFFFCCFFFFCCFF
        FFCCFFFF99FFFF99FFFF99FFFF99FFFF99FFFFCCCCCC000000C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000
        CCCCCC66666666666666666666666666666666666699FFFF99FFFFCCCCCC0000
        00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0FF0000FF0000FFFFFFCCFFFFCCFFFFCCFFFFCCFFFFCCFFFF99FFFF99FFFF
        99FFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0FF0000FF0000FFFFFF66666666666666666666666666666666
        666666666666666699FFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        FF0000C0C0C0C0C0C0C0C0C0FF0000FF0000666666FFFFFFFFFFFFFFFFFFCCFF
        FFFFFFFFCCFFFFCCFFFFCCFFFFCCFFFF99FFFFCCCCCC000000C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF0000FF0000C0C0C0666666FFFFFF
        666666666666666666666666666666666666CCFFFFCCFFFFCCFFFFCCCCCC0000
        00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0666666FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCFFFFCCFFFFCCFFFFCCFFFF
        CCFFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0666666FFFFFF66666666666666666666666666666666
        6666666666666666CCFFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0666666FFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFCCFFFFCCFFFFCCFFFFCCFFFFCCCCCC000000C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0666666FFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCCFFFFCCFFFFCCCCCC0000
        00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0666666FFFFFF666666666666666666666666FFFFFFFFFFFFFFFFFFFFFFFF
        CCFFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0666666FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFCCFFFFCCCCCC000000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C06666666666666666666666666666
        66666666666666666666666666666666666666666666000000C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
        C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
    end
    object SB_Refresh: TSpeedButton
      Left = 406
      Top = 1
      Width = 57
      Height = 28
      Caption = #21047#26032
      Enabled = False
      Flat = True
      Glyph.Data = {
        96010000424D9601000000000000760000002800000018000000180000000100
        04000000000020010000330B0000330B00001000000010000000000000008400
        0000C600000084840000C6C60000424242007B7B7B0084848400C0C0C0000000
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00888888888888
        8888888888888888888888888888888888888888877777777777777777888880
        000000000000000007888885AAAAAAAAAAAAAAAA07888885AAAAAAAAAAAAAAAA
        07888885AA444944444444AA07888885AA339983333333AA07888885AAA99966
        8AAAAAAA07888885AA999999998444AA07888885A9999999999933AA07888885
        AA99999999998AAA07888885AA499944449998AA07888885AA339933333998AA
        07888885AAAAA9AAAA6998AA07888885AA444444449994AA07888885AA333333
        399983AA07888885AAAAAAA89998AAAA07888885AA222299998AA00008888885
        AA111111111AA0A088888885AAAAAAAAAAAAA008888888855555555555555088
        8888888888888888888888888888888888888888888888888888}
    end
  end
  object DB_Storege: TDBGrid
    Left = 0
    Top = 33
    Width = 688
    Height = 420
    Align = alClient
    Color = clCream
    DataSource = DS_Storege
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        Title.Caption = #20135#21697#21517#31216
        Width = 150
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #20135#21697#31867#22411
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #24211#23384#25968#37327
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #20135#21697#21333#20301
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #38144#21806#21442#32771#20215#26684
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #36135#21697#24211#23384#37329#39069
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #24635#36827#36135#25968#37327
        Width = 80
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = #24635#38144#21806#25968#37327
        Width = 80
        Visible = True
      end>
  end
  object DS_Storege: TDataSource
    DataSet = ADO_Storege
    Left = 88
    Top = 88
  end
  object ADO_Storege: TADOQuery
    Connection = Main_DM.ADOConn
    Parameters = <>
    Left = 128
    Top = 88
  end
end