spda1.dfm

思微POS连锁超市管理系统 (商业代码),几年前的东西了

object spdawh: Tspdawh
  Left = 259
  Top = 201
  Width = 595
  Height = 360
  Caption = '货品档案'
  Color = clBtnFace
  DefaultMonitor = dmMainForm
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 587
    Height = 41
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object Label1: TLabel
      Left = 4
      Top = 15
      Width = 85
      Height = 19
      Caption = '货品档案'
      Font.Charset = GB2312_CHARSET
      Font.Color = 10642477
      Font.Height = -19
      Font.Name = '楷体_GB2312'
      Font.Style = [fsBold]
      ParentFont = False
      Transparent = True
    end
  end
  object BitBtn3: TBitBtn
    Left = 197
    Top = 14
    Width = 75
    Height = 25
    Caption = '删除&D'
    TabOrder = 1
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF33333333333330003333333333333777333333333333
      300033FFFFFF3333377739999993333333333777777F3333333F399999933333
      3300377777733333337733333333333333003333333333333377333333333333
      3333333333333333333F333333333333330033333F33333333773333C3333333
      330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
      993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
      333333377F33333333FF3333C333333330003333733333333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
  end
  object BitBtn1: TBitBtn
    Left = 272
    Top = 14
    Width = 75
    Height = 25
    Caption = '编辑&E'
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
      000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
      00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
      F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
      0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
      FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
      FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
      0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
      00333377737FFFFF773333303300000003333337337777777333}
    NumGlyphs = 2
  end
  object BitBtn4: TBitBtn
    Left = 347
    Top = 14
    Width = 75
    Height = 25
    Caption = '打印&P'
    TabOrder = 3
    OnClick = BitBtn4Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 422
    Top = 14
    Width = 75
    Height = 25
    Caption = '退出&X'
    TabOrder = 4
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
      0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
      0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
      0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
      0333337F777FFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object dxDBGrid2: TdxDBGrid
    Left = 0
    Top = 41
    Width = 587
    Height = 292
    Bands = <
      item
      end>
    DefaultLayout = True
    HeaderPanelRowCount = 1
    KeyField = 'code'
    SummaryGroups = <>
    SummarySeparator = ', '
    Align = alClient
    Color = 15524050
    Font.Charset = GB2312_CHARSET
    Font.Color = 7479077
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnDblClick = BitBtn1Click
    AutoSearchTextColor = clNavy
    BandFont.Charset = GB2312_CHARSET
    BandFont.Color = clWindowText
    BandFont.Height = -12
    BandFont.Name = '宋体'
    BandFont.Style = []
    DataSource = DataSource1
    Filter.Active = True
    Filter.Criteria = {00000000}
    GridLineColor = clNavy
    HeaderFont.Charset = GB2312_CHARSET
    HeaderFont.Color = clWindowText
    HeaderFont.Height = -12
    HeaderFont.Name = '宋体'
    HeaderFont.Style = []
    HideSelectionColor = clNavy
    HideSelectionTextColor = clWhite
    HighlightColor = clNavy
    HighlightTextColor = clWhite
    LookAndFeel = lfFlat
    OptionsBehavior = [edgoAutoSort, edgoDragScroll, edgoEditing, edgoEnterShowEditor, edgoImmediateEditor, edgoMultiSort, edgoStoreToRegistry, edgoTabThrough, edgoVertThrough]
    OptionsDB = [edgoCancelOnExit, edgoCanDelete, edgoCanInsert, edgoCanNavigation, edgoConfirmDelete, edgoLoadAllRecords, edgoSmartRefresh, edgoSmartReload, edgoUseBookmarks]
    OptionsView = [edgoBandHeaderWidth, edgoIndicator, edgoRowSelect, edgoUseBitmap]
    PreviewFont.Charset = DEFAULT_CHARSET
    PreviewFont.Color = clBlue
    PreviewFont.Height = -12
    PreviewFont.Name = '宋体'
    PreviewFont.Style = []
    RegistryPath = '\Software\server\spdawh'
    object dxDBGrid2code: TdxDBGridMaskColumn
      Width = 76
      BandIndex = 0
      RowIndex = 0
      FieldName = 'code'
    end
    object dxDBGrid2name: TdxDBGridMaskColumn
      Width = 189
      BandIndex = 0
      RowIndex = 0
      FieldName = 'name'
    end
    object dxDBGrid2lb: TdxDBGridMaskColumn
      Width = 84
      BandIndex = 0
      RowIndex = 0
      FieldName = 'lb'
    end
    object dxDBGrid2jldw: TdxDBGridMaskColumn
      Width = 76
      BandIndex = 0
      RowIndex = 0
      FieldName = 'jldw'
    end
    object dxDBGrid2bzgg: TdxDBGridMaskColumn
      Width = 81
      BandIndex = 0
      RowIndex = 0
      FieldName = 'bzgg'
    end
    object dxDBGrid2barcode: TdxDBGridMaskColumn
      Width = 78
      BandIndex = 0
      RowIndex = 0
      FieldName = 'barcode'
    end
    object dxDBGrid2cd: TdxDBGridMaskColumn
      Width = 86
      BandIndex = 0
      RowIndex = 0
      FieldName = 'cd'
    end
    object dxDBGrid2mainghs: TdxDBGridMaskColumn
      Width = 89
      BandIndex = 0
      RowIndex = 0
      FieldName = 'mainghs'
    end
    object dxDBGrid2ghsname: TdxDBGridMaskColumn
      Width = 124
      BandIndex = 0
      RowIndex = 0
      FieldName = 'ghsname'
    end
    object dxDBGrid2jhj: TdxDBGridMaskColumn
      Width = 76
      BandIndex = 0
      RowIndex = 0
      FieldName = 'jhj'
    end
    object dxDBGrid2suilu: TdxDBGridMaskColumn
      Width = 84
      BandIndex = 0
      RowIndex = 0
      FieldName = 'suilu'
    end
    object dxDBGrid2hsjj: TdxDBGridMaskColumn
      Width = 77
      BandIndex = 0
      RowIndex = 0
      FieldName = 'wsjj'
    end
    object dxDBGrid2lsj: TdxDBGridMaskColumn
      Width = 74
      BandIndex = 0
      RowIndex = 0
      FieldName = 'lsj'
    end
    object dxDBGrid2hyj: TdxDBGridMaskColumn
      Width = 72
      BandIndex = 0
      RowIndex = 0
      FieldName = 'hyj'
    end
    object dxDBGrid2pfj: TdxDBGridMaskColumn
      Width = 79
      BandIndex = 0
      RowIndex = 0
      FieldName = 'pfj'
    end
    object dxDBGrid2jqj: TdxDBGridMaskColumn
      Width = 83
      BandIndex = 0
      RowIndex = 0
      FieldName = 'jqj'
    end
    object dxDBGrid2cxj: TdxDBGridMaskColumn
      Width = 72
      BandIndex = 0
      RowIndex = 0
      FieldName = 'cxj'
    end
    object dxDBGrid2cxbz: TdxDBGridCheckColumn
      Width = 72
      BandIndex = 0
      RowIndex = 0
      FieldName = 'cxbz'
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object dxDBGrid2sybz: TdxDBGridCheckColumn
      Width = 69
      BandIndex = 0
      RowIndex = 0
      FieldName = 'sybz'
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object dxDBGrid2zhsp: TdxDBGridCheckColumn
      Width = 69
      BandIndex = 0
      RowIndex = 0
      FieldName = 'zhsp'
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object dxDBGrid2kcsx: TdxDBGridMaskColumn
      Width = 73
      BandIndex = 0
      RowIndex = 0
      FieldName = 'kcsx'
    end
    object dxDBGrid2kcxx: TdxDBGridMaskColumn
      Width = 73
      BandIndex = 0
      RowIndex = 0
      FieldName = 'kcxx'
    end
    object dxDBGrid2bz: TdxDBGridMaskColumn
      Width = 189
      BandIndex = 0
      RowIndex = 0
      FieldName = 'bz'
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 112
    Top = 104
  end
  object dxComponentPrinter1: TdxComponentPrinter
    CurrentLink = dxComponentPrinter1Link1
    DateFormat = 2
    PreviewOptions.Caption = '货品档案表'
    PreviewOptions.RegistryPath = 'Software\Developer Express\PrintingSystem\DesignTime'
    PreviewOptions.WindowState = wsMaximized
    PrintTitle = '货品档案表'
    Left = 200
    Top = 176
    object dxComponentPrinter1Link1: TdxDBGridReportLink
      Component = dxDBGrid2
      DateTime = 37567.591609838
      DesignerHelpContext = 0
      PrinterPage.CenterOnPageH = True
      PrinterPage.DMPaper = 256
      PrinterPage.Footer = 6350
      PrinterPage.Header = 6350
      PrinterPage.Margins.Bottom = 12700
      PrinterPage.Margins.Left = 12700
      PrinterPage.Margins.Right = 12700
      PrinterPage.Margins.Top = 12700
      PrinterPage.PageFooter.Font.Charset = DEFAULT_CHARSET
      PrinterPage.PageFooter.Font.Color = clWindowText
      PrinterPage.PageFooter.Font.Height = -11
      PrinterPage.PageFooter.Font.Name = 'Tahoma'
      PrinterPage.PageFooter.Font.Style = []
      PrinterPage.PageHeader.Font.Charset = DEFAULT_CHARSET
      PrinterPage.PageHeader.Font.Color = clWindowText
      PrinterPage.PageHeader.Font.Height = -11
      PrinterPage.PageHeader.Font.Name = 'Tahoma'
      PrinterPage.PageHeader.Font.Style = []
      PrinterPage.PageHeader.LeftTitle.Strings = (
        '【思微软件】')
      PrinterPage.PageHeader.RightTitle.Strings = (
        '第[Page #]页共[Total Pages]页')
      PrinterPage.PageSize.X = 215900
      PrinterPage.PageSize.Y = 279400
      PrinterPage.ScaleMode = smFit
      PrinterPage._dxMeasurementUnits_ = 0
      PrinterPage._dxLastMU_ = 2
      ReportTitle.Font.Charset = GB2312_CHARSET
      ReportTitle.Font.Color = clWindowText
      ReportTitle.Font.Height = -19
      ReportTitle.Font.Name = '宋体'
      ReportTitle.Font.Style = [fsBold, fsUnderline]
      ReportTitle.Text = '货品档案表'
      ShrinkToPageWidth = True
      BandFont.Charset = DEFAULT_CHARSET
      BandFont.Color = clWindowText
      BandFont.Height = -11
      BandFont.Name = 'Times New Roman'
      BandFont.Style = []
      Color = 12639424
      EvenColor = 10930928
      EvenFont.Charset = DEFAULT_CHARSET
      EvenFont.Color = clWindowText
      EvenFont.Height = -11
      EvenFont.Name = 'Times New Roman'
      EvenFont.Style = []
      FixedTransparent = True
      Font.Charset = DEFAULT_CHARSET