hrxx_un.dfm

手机进销存系统Delphi源码,管理手机的进货还有销售方面的功能

inherited hrxx_frm: Thrxx_frm
  Left = 139
  Top = 22
  Caption = #25163#26426#20018#21495#34917#24405
  ClientHeight = 414
  ClientWidth = 519
  PixelsPerInch = 96
  TextHeight = 13
  inherited bsSkinPanel2: TbsSkinPanel
    Width = 519
    Height = 414
    inherited bsSkinToolBar2: TbsSkinToolBar
      Width = 517
    end
    inherited bsSkinGroupBox1: TbsSkinGroupBox
      Width = 517
      object bsSkinStdLabel7: TbsSkinStdLabel
        Left = 74
        Top = 54
        Width = 72
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Caption = #36827#36135#27969#27700#21495#65306
        Visible = False
      end
      object bsSkinStdLabel6: TbsSkinStdLabel
        Left = 146
        Top = 70
        Width = 60
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Caption = #25163#26426#20018#21495#65306
      end
      object bsSkinStdLabel3: TbsSkinStdLabel
        Left = 146
        Top = 102
        Width = 60
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Caption = #25163#26426#39068#33394#65306
      end
      object bsSkinStdLabel4: TbsSkinStdLabel
        Left = 130
        Top = 46
        Width = 72
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Caption = #20837#24211#27969#27700#21495#65306
      end
      object bsSkinDBText2: TbsSkinDBText
        Tag = 5
        Left = 226
        Top = 42
        Width = 97
        Height = 17
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clRed
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        Caption = 'bsSkinDBText2'
        ParentFont = False
        ShowAccelChar = False
        DataField = 'fid'
        DataSource = ds_disp
        Transparent = True
      end
      object bsSkinStdLabel5: TbsSkinStdLabel
        Tag = 6
        Left = 226
        Top = 46
        Width = 78
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = []
        Caption = #36827#36135#27969#27700#21495#65306
        ParentFont = False
      end
      object bsSkinDBText1: TbsSkinStdLabel
        Left = 74
        Top = 38
        Width = 72
        Height = 13
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -11
        DefaultFont.Name = 'MS Sans Serif'
        DefaultFont.Style = []
        SkinData = bsSkinData1
        SkinDataName = 'stdlabel'
        Caption = #36827#36135#27969#27700#21495#65306
        Visible = False
      end
      object bsSkinDBEdit1: TbsSkinDBEdit
        Tag = 5
        Left = 226
        Top = 63
        Width = 127
        Height = 20
        Text = 'bsSkinDBEdit1'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        UseSkinFont = True
        DefaultWidth = 0
        DefaultHeight = 20
        ButtonMode = False
        SkinData = bsSkinData1
        SkinDataName = 'edit'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = 14
        Font.Name = 'Arial'
        Font.Style = []
        MaxLength = 16
        ParentFont = False
        TabOrder = 0
        AutoSize = False
        DataField = 'fno'
        DataSource = ds_disp
      end
      object bsSkinDBLookupComboBox2: TbsSkinDBLookupComboBox
        Tag = 5
        Left = 226
        Top = 95
        Width = 79
        Height = 20
        TabOrder = 1
        SkinData = bsSkinData1
        SkinDataName = 'combobox'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 20
        UseSkinFont = True
        DataField = 'fcolorid'
        DataSource = ds_disp
        ListBoxDefaultItemHeight = 20
        ListBoxUseSkinFont = True
        ListBoxUseSkinItemHeight = True
        KeyField = 'fid'
        ListField = 'fcolor'
        ListSource = ds_color
      end
      object bsSkinDBLookupComboBox1: TbsSkinDBLookupComboBox
        Tag = 6
        Left = 226
        Top = 95
        Width = 79
        Height = 20
        TabOrder = 2
        SkinData = bsSkinData1
        SkinDataName = 'combobox'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        DefaultWidth = 0
        DefaultHeight = 20
        UseSkinFont = True
        ListBoxDefaultItemHeight = 20
        ListBoxUseSkinFont = True
        ListBoxUseSkinItemHeight = True
        KeyField = 'fid'
        ListField = 'fcolor'
        ListSource = ds_color
      end
      object bsSkinEdit2: TbsSkinEdit
        Tag = 6
        Left = 226
        Top = 63
        Width = 129
        Height = 20
        Text = 'bsSkinEdit2'
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = 14
        DefaultFont.Name = 'Arial'
        DefaultFont.Style = []
        UseSkinFont = True
        DefaultWidth = 0
        DefaultHeight = 20
        ButtonMode = False
        SkinDataName = 'edit'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = 14
        Font.Name = 'Arial'
        Font.Style = []
        MaxLength = 16
        ParentFont = False
        TabOrder = 3
      end
    end
    inherited bsSkinGroupBox2: TbsSkinGroupBox
      Width = 517
      Height = 237
      inherited bsSkinDBGrid2: TbsSkinDBGrid
        Width = 496
        Height = 194
        DataSource = ds_disp
        Columns = <
          item
            Expanded = False
            FieldName = 'fid'
            Title.Caption = #20837#24211#27969#27700#21495
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fno'
            Title.Caption = #25163#26426#20018#21495
            Width = 80
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fsjxh'
            Title.Caption = #25163#26426#22411#21495
            Width = 55
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fcolor'
            Title.Caption = #39068#33394
            Width = 30
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fjbpz'
            Title.Caption = #22522#26412#37197#32622
            Width = 55
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fhylx'
            Title.Caption = #36135#28304#31867#22411
            Width = 55
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fhyd'
            Title.Caption = #36135#28304#22320
            Width = 50
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'fdate'
            Title.Caption = #36827#36135#26085#26399
            Width = 50
            Visible = True
          end>
      end
      inherited bsSkinScrollBar4: TbsSkinScrollBar
        Top = 217
        Width = 515
      end
      inherited bsSkinScrollBar3: TbsSkinScrollBar
        Left = 497
        Height = 194
      end
    end
  end
  inherited bsBusinessSkinForm1: TbsBusinessSkinForm
    Left = 376
  end
  inherited bsBusinessSkinForm2: TbsBusinessSkinForm
    Left = 248
    Top = 24
  end
  inherited bsSkinData2: TbsSkinData
    Left = 296
    Top = 16
  end
  inherited ALToolbar: TActionList
    Left = 56
    Top = 16
  end
  inherited spsave: TADOStoredProc
    ProcedureName = 'pSJNobl;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@act'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@vhrcid'
        Attributes = [paNullable]
        DataType = ftString
        Size = 12
        Value = Null
      end
      item
        Name = '@vid'
        Attributes = [paNullable]
        DataType = ftString
        Size = 12
        Value = Null
      end
      item
        Name = '@no'
        Attributes = [paNullable]
        DataType = ftString
        Size = 16
        Value = Null
      end
      item
        Name = '@color'
        Attributes = [paNullable]
        DataType = ftString
        Size = 4
        Value = Null
      end
      item
        Name = '@mon'
        Attributes = [paNullable]
        DataType = ftBCD
        Precision = 19
        Value = Null
      end>
    Left = 200
    Top = 24
  end
  inherited spdisp: TADOStoredProc
    ProcedureName = 'pViewAllNoSaleSjhrxxid;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@hrcid'
        Attributes = [paNullable]
        DataType = ftString
        Size = 12
        Value = Null
      end>
  end
  object sp_count: TADOStoredProc
    Connection = dm.ADOConnection1
    ProcedureName = 'pSjchrcDetail;1'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@hrcid'
        Attributes = [paNullable]
        DataType = ftString
        Size = 12
        Value = Null
      end
      item
        Name = '@an'
        Attributes = [paNullable]
        DataType = ftInteger
        Direction = pdInputOutput
        Precision = 10
        Value = Null
      end>
    Left = 336
    Top = 216
  end
  object tbl_color: TADOTable
    Connection = dm.ADOConnection1
    TableName = 'tcolor'
    Left = 481
    Top = 2
  end
  object ds_color: TDataSource
    DataSet = tbl_color
    Left = 513
    Top = 26
  end
end