gross_profit.dfm

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

        FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF00
        00FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF0000FF}
    end
    object SB_Add: TSpeedButton
      Left = 176
      Top = 1
      Width = 57
      Height = 28
      Caption = #22686#21152
      Enabled = False
      Flat = True
      Glyph.Data = {
        96010000424D9601000000000000760000002800000018000000180000000100
        04000000000020010000430B0000430B0000100000001000000000000000FF00
        0000C0C0C0000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
        FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00222222222222
        2222222222222222222222222222222222222222222222222222222222222222
        2222222222222222222222222222221222222222222222222222221122222222
        2222222222222211122222222222222111111111111233322222222111111111
        1112333222222222222222111222222222222222222222112222222002222222
        2222221222222220022222222222222222222222222222222333222222222220
        0222222223332222222222200222222333333322222222222222222333333322
        2222220002222223333333222222220002222222233322222222222222222222
        2333222222222200022222222222222222222200022222222222222222222222
        2222222222222222222222222222222222222222222222222222}
    end
    object SpeedButton40: TSpeedButton
      Left = 234
      Top = 1
      Width = 57
      Height = 28
      Caption = #21024#38500
      Enabled = False
      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 GroupBox1: TGroupBox
    Left = 0
    Top = 249
    Width = 835
    Height = 49
    Align = alTop
    Caption = #36873#25321#26465#20214
    TabOrder = 3
    object SpeedButton1: TSpeedButton
      Left = 548
      Top = 9
      Width = 77
      Height = 28
      Caption = #30830#23450
      Glyph.Data = {
        96010000424D9601000000000000760000002800000018000000180000000100
        04000000000020010000430B0000430B00001000000010000000000000008400
        0000C6000000007B000084840000C6C60000424242007B7B7B0084848400C0C0
        C000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00999999999999
        9999999999999999999999999999999999999999988888888888888888999990
        000000000000000008999996AAAAAAAAAAAAAAAA08999996AAAAAAAAAAAAAAAA
        08999996AA559555555555AA08999996AA493344444444AA08999996AA93333A
        AAAAAAAA08999996A9333337555555AA08999996A3334733944444AA08999996
        AA3AAA7339AAAAAA08999996AA555553375555AA08999996AA444444339444AA
        08999996AAAAAAAAA33AAAAA08999996AA555555553955AA08999996AA444444
        444394AA08999996AAAAAAAAAAAA3AAA08999996AA222222222AA00009999996
        AA111111111AA0A099999996AAAAAAAAAAAAA009999999966666666666666099
        9999999999999999999999999999999999999999999999999999}
      OnClick = SpeedButton1Click
    end
    object Label1: TLabel
      Left = 16
      Top = 24
      Width = 54
      Height = 12
      Caption = #24320#22987#26102#38388':'
    end
    object Label2: TLabel
      Left = 192
      Top = 24
      Width = 54
      Height = 12
      Caption = #32467#26463#26102#38388':'
    end
    object SellDatefr: TDateTimePicker
      Left = 72
      Top = 16
      Width = 113
      Height = 20
      CalAlignment = dtaLeft
      Date = 38442
      Time = 38442
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 0
    end
    object SellDateto: TDateTimePicker
      Left = 248
      Top = 16
      Width = 113
      Height = 20
      CalAlignment = dtaLeft
      Date = 38442
      Time = 38442
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 1
    end
    object CB3D: TCheckBox
      Left = 688
      Top = 16
      Width = 65
      Height = 17
      Caption = '3D'#25928#26524
      Checked = True
      State = cbChecked
      TabOrder = 2
      OnClick = CB3DClick
    end
  end
  object ADO_Gross_Profit: TADOQuery
    Connection = Main_DM.ADOConn
    Parameters = <>
    Left = 176
    Top = 152
  end
  object DataSource1: TDataSource
    DataSet = ADO_Gross_Profit
    Left = 136
    Top = 152
  end
end