ygzl_un.dfm

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

      SkinData = bsSkinData1
      SkinDataName = 'groupbox'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      RealHeight = -1
      AutoEnabledControls = True
      CheckedMode = False
      Checked = False
      DefaultAlignment = taLeftJustify
      DefaultCaptionHeight = 22
      BorderStyle = bvLowered
      CaptionMode = True
      RollUpMode = False
      RollUpState = False
      NumGlyphs = 1
      Spacing = 2
      Caption = #26412#21592#24037#26159#21542#22312#32844':'
      Columns = 2
      DataField = 'fuse'
      DataSource = DataSource2
      Items.Strings = (
        #22312#32844
        #20572#32844)
      Values.Strings = (
        'T'
        'F')
    end
    object bsSkinDBLookupComboBox1: TbsSkinDBLookupComboBox
      Left = 278
      Top = 31
      Width = 121
      Height = 20
      TabOrder = 7
      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 = 'fsex'
      DataSource = DataSource2
      ListBoxDefaultItemHeight = 20
      ListBoxUseSkinFont = True
      ListBoxUseSkinItemHeight = True
      KeyField = 'fid'
      ListField = 'fname'
      ListSource = DataSource1
    end
    object bsSkinDBEdit1: TbsSkinDBEdit
      Left = 277
      Top = 85
      Width = 121
      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 = []
      ParentFont = False
      TabOrder = 8
      AutoSize = False
      DataField = 'fmemo'
      DataSource = DataSource2
    end
  end
  object bsSkinGroupBox4: TbsSkinGroupBox [2]
    Left = 0
    Top = 200
    Width = 633
    Height = 273
    TabOrder = 2
    SkinData = bsSkinData1
    SkinDataName = 'groupbox'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    RealHeight = -1
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = True
    RollUpMode = False
    RollUpState = False
    NumGlyphs = 1
    Spacing = 2
    Caption = #21592#24037#34920#21333#65306
    Align = alBottom
    object bsSkinDBGrid2: TbsSkinDBGrid
      Left = 1
      Top = 23
      Width = 612
      Height = 230
      TabOrder = 2
      SkinData = bsSkinData1
      SkinDataName = 'grid'
      UseSkinFont = True
      UseSkinCellHeight = True
      HScrollBar = bsSkinScrollBar4
      VScrollBar = bsSkinScrollBar3
      GridLineColor = clWindowText
      DefaultCellHeight = 20
      UseColumnsFont = False
      DefaultRowHeight = 17
      MouseWheelSupport = False
      SaveMultiSelection = False
      PickListBoxSkinDataName = 'listbox'
      PickListBoxCaptionMode = False
      Align = alClient
      DataSource = dstemp
      ReadOnly = True
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'fid'
          Title.Caption = #32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fname'
          Title.Caption = #22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fname_1'
          Title.Caption = #24615#21035
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fbir'
          Title.Caption = #21592#24037#29983#26085
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ftel'
          Title.Caption = #21592#24037#30005#35805
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fhandle'
          Title.Caption = #21592#24037#25163#26426
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fdate'
          Title.Caption = #24037#20316#26102#38388
          Width = 50
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'fadr'
          Title.Caption = #23478#24237#20303#22336
          Width = 50
          Visible = True
        end>
    end
    object bsSkinScrollBar3: TbsSkinScrollBar
      Left = 613
      Top = 23
      Width = 19
      Height = 230
      TabOrder = 0
      Visible = False
      SkinData = bsSkinData1
      SkinDataName = 'vscrollbar'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 19
      DefaultHeight = 0
      UseSkinFont = True
      Both = False
      BothMarkerWidth = 19
      BothSkinDataName = 'bothhscrollbar'
      CanFocused = False
      Align = alRight
      Kind = sbVertical
      PageSize = 11
      Min = 1
      Max = 21
      Position = 1
      SmallChange = 1
      LargeChange = 1
    end
    object bsSkinScrollBar4: TbsSkinScrollBar
      Left = 1
      Top = 253
      Width = 631
      Height = 19
      TabOrder = 1
      Visible = False
      SkinData = bsSkinData1
      SkinDataName = 'hscrollbar'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 19
      UseSkinFont = True
      Both = False
      BothMarkerWidth = 19
      BothSkinDataName = 'bothhscrollbar'
      CanFocused = False
      Align = alBottom
      Kind = sbHorizontal
      PageSize = 0
      Min = 0
      Max = 0
      Position = 0
      SmallChange = 127
      LargeChange = 127
    end
  end
  inherited bsSkinMessage1: TbsSkinMessage
    Left = 528
    Top = 16
  end
  inherited ALToolbar: TActionList
    Left = 432
    Top = 16
  end
  inherited QBaseInfo: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'select *'
      'from tygzl'
      'order by tygzl.fid')
    Left = 360
    Top = 16
  end
  inherited dsBaseInfo: TDataSource
    Left = 392
    Top = 16
  end
  inherited wwLookupDlg: TwwLookupDialog
    Selected.Strings = (
      'fid'#9'4'#9#21592#24037#32534#21495#9'F'
      'fname'#9'8'#9#21592#24037#22995#21517#9'F'
      'fbir'#9'18'#9#29983#26085#9'F'
      'fdate'#9'18'#9#21442#21152#26102#38388#9'F'
      'fhandle'#9'12'#9#25163#26426#9'F'
      'ftel'#9'12'#9#32852#31995#30005#35805#9'F'
      'fadr'#9'20'#9#20303#22336#9'F'
      'fuse'#9'1'#9#26159#21542#21487#29992#9'F')
    ControlType.Strings = (
      'fsex;CustomEdit;bsSkinDBLookupComboBox2;F')
    Left = 464
    Top = 16
  end
  inherited spgetid: TADOStoredProc
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@IDType'
        Attributes = [paNullable]
        DataType = ftWideString
        Size = 2
        Value = Null
      end
      item
        Name = '@numb'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@OutNumber'
        Attributes = [paNullable]
        DataType = ftString
        Direction = pdInputOutput
        Size = 13
        Value = Null
      end>
    Left = 496
    Top = 16
  end
  inherited qtemp: TADOQuery
    CursorType = ctStatic
    Left = 296
    Top = 16
  end
  inherited dstemp: TDataSource
    Left = 328
    Top = 16
  end
  object DataSource2: TDataSource
    DataSet = ADOTable1
    Left = 320
    Top = 153
  end
  object ADOTable1: TADOTable
    Connection = dm.ADOConnection1
    IndexFieldNames = 'fsex'
    MasterFields = 'fid_1'
    MasterSource = dstemp
    TableName = 'tygzl'
    Left = 360
    Top = 153
  end
  object ADOTable2: TADOTable
    Connection = dm.ADOConnection1
    TableName = 'tsex'
    Left = 400
    Top = 153
  end
  object DataSource1: TDataSource
    DataSet = ADOTable2
    Left = 448
    Top = 153
  end
end