⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ordertobarcode.dfm

📁 Barcode And LabelPrint
💻 DFM
📖 第 1 页 / 共 4 页
字号:
              end
              object LabelTodayOrderCount: TLabel
                Left = 168
                Top = 49
                Width = 8
                Height = 14
                Caption = '0'
                Font.Charset = GB2312_CHARSET
                Font.Color = clNavy
                Font.Height = -14
                Font.Name = #23435#20307
                Font.Style = [fsBold]
                ParentFont = False
              end
            end
          end
          object TabSheet2: TTabSheet
            Caption = #34917#25171#35774#32622
            ImageIndex = 1
            object GroupBoxRePrintSet: TGroupBox
              Left = 0
              Top = 0
              Width = 341
              Height = 411
              Align = alClient
              Caption = #34917#25171#35774#32622#19982#36873#25321
              Color = 15979953
              ParentColor = False
              TabOrder = 0
              object Panel3: TPanel
                Left = 2
                Top = 16
                Width = 337
                Height = 4
                Align = alTop
                BevelOuter = bvNone
                ParentColor = True
                TabOrder = 0
              end
              object Panel5: TPanel
                Left = 2
                Top = 20
                Width = 337
                Height = 198
                Align = alTop
                BevelOuter = bvNone
                Caption = 'Panel5'
                ParentColor = True
                TabOrder = 1
                object GroupBoxRePrintType: TGroupBox
                  Left = 102
                  Top = 0
                  Width = 235
                  Height = 198
                  Align = alRight
                  Caption = #35774#32622
                  TabOrder = 0
                  object Label18: TLabel
                    Left = 19
                    Top = 40
                    Width = 49
                    Height = 14
                    Caption = #35746#21333#21495':'
                  end
                  object Label19: TLabel
                    Left = 33
                    Top = 68
                    Width = 35
                    Height = 14
                    Caption = #26426#22411':'
                  end
                  object Label20: TLabel
                    Left = 3
                    Top = 96
                    Width = 77
                    Height = 14
                    Caption = #36215#22987#31995#21015#21495':'
                  end
                  object Label21: TLabel
                    Left = 3
                    Top = 121
                    Width = 77
                    Height = 14
                    Caption = #32456#27490#24207#21015#21495':'
                  end
                  object Label22: TLabel
                    Left = 45
                    Top = 146
                    Width = 35
                    Height = 14
                    Caption = #26465#30721':'
                  end
                  object Label23: TLabel
                    Left = 5
                    Top = 17
                    Width = 63
                    Height = 14
                    Caption = #29983#20135#26085#26399':'
                  end
                  object EdtRePOrderID: TEdit
                    Left = 70
                    Top = 34
                    Width = 161
                    Height = 22
                    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                    MaxLength = 13
                    TabOrder = 0
                    OnKeyPress = EdtOrderIDKeyPress
                  end
                  object EdtRePStartBarCode: TEdit
                    Left = 83
                    Top = 88
                    Width = 148
                    Height = 22
                    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                    TabOrder = 1
                    OnKeyPress = EdtOrderIDKeyPress
                  end
                  object EdtRePBarCode: TEdit
                    Left = 83
                    Top = 141
                    Width = 148
                    Height = 22
                    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                    TabOrder = 2
                    OnKeyPress = EdtOrderIDKeyPress
                  end
                  object EdtRePSEndBarCode: TEdit
                    Left = 83
                    Top = 114
                    Width = 148
                    Height = 22
                    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                    TabOrder = 3
                    OnKeyPress = EdtOrderIDKeyPress
                  end
                  object ComboBoxRePDevType: TComboBox
                    Left = 70
                    Top = 59
                    Width = 161
                    Height = 27
                    DropDownCount = 9
                    Font.Charset = GB2312_CHARSET
                    Font.Color = clNavy
                    Font.Height = -19
                    Font.Name = #23435#20307
                    Font.Style = []
                    ImeName = #32043#20809#25340#38899#36755#20837#27861
                    ItemHeight = 19
                    ItemIndex = 0
                    ParentFont = False
                    TabOrder = 4
                    Text = 'X618'
                    OnCloseUp = ComboBoxDevNameCloseUp
                    OnExit = ComboBoxDevNameExit
                    OnKeyPress = ComboBoxDevNameKeyPress
                    OnSelect = ComboBoxDevNameSelect
                    Items.Strings = (
                      'X618')
                  end
                  object BitBtn4: TBitBtn
                    Left = 149
                    Top = 169
                    Width = 80
                    Height = 25
                    Caption = #30830#23450
                    TabOrder = 5
                    OnClick = BitBtn4Click
                    Glyph.Data = {
                      76010000424D7601000000000000760000002800000020000000100000000100
                      04000000000000010000120B0000120B00001000000000000000000000000000
                      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
                      555555555555555555555555555555555555555555FF55555555555559055555
                      55555555577FF5555555555599905555555555557777F5555555555599905555
                      555555557777FF5555555559999905555555555777777F555555559999990555
                      5555557777777FF5555557990599905555555777757777F55555790555599055
                      55557775555777FF5555555555599905555555555557777F5555555555559905
                      555555555555777FF5555555555559905555555555555777FF55555555555579
                      05555555555555777FF5555555555557905555555555555777FF555555555555
                      5990555555555555577755555555555555555555555555555555}
                    NumGlyphs = 2
                  end
                  object DateTimePickerRepPostDate: TDateTimePicker
                    Left = 70
                    Top = 11
                    Width = 160
                    Height = 22
                    Date = 39332.391964513890000000
                    Time = 39332.391964513890000000
                    ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                    TabOrder = 6
                  end
                end
                object RadioGroupRePrintType: TRadioGroup
                  Left = 0
                  Top = 0
                  Width = 102
                  Height = 198
                  Align = alClient
                  Caption = #34917#25171#26041#24335#36873#25321
                  ItemIndex = 0
                  Items.Strings = (
                    #25353#35746#21333#21495
                    #25353#26426#22411
                    #25353#26465#30721#33539#22260
                    #21333#20010#26465#30721)
                  TabOrder = 1
                  OnClick = RadioGroupRePrintTypeClick
                end
              end
              object DBGridEh1: TDBGridEh
                Left = 2
                Top = 218
                Width = 337
                Height = 191
                Align = alClient
                Flat = True
                FooterColor = clInfoBk
                FooterFont.Charset = GB2312_CHARSET
                FooterFont.Color = clNavy
                FooterFont.Height = -14
                FooterFont.Name = #23435#20307
                FooterFont.Style = []
                FooterRowCount = 1
                FrozenCols = 2
                ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
                ReadOnly = True
                SumList.Active = True
                TabOrder = 2
                TitleFont.Charset = GB2312_CHARSET
                TitleFont.Color = clNavy
                TitleFont.Height = -14
                TitleFont.Name = #23435#20307
                TitleFont.Style = []
                Columns = <
                  item
                    Alignment = taCenter
                    Checkboxes = True
                    Color = clNavy
                    DropDownBox.ColumnDefValues.Title.Color = 16776176
                    EditButtons = <>
                    FieldName = 'IsInCome'
                    Footer.Alignment = taCenter
                    Footer.FieldName = 'BarCode'
                    Footer.Value = #35760#24405#25968
                    Footer.ValueType = fvtStaticText
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #26159#21542#35013#31665
                    Title.ImageIndex = 1
                    Width = 55
                  end
                  item
                    Color = clHighlight
                    EditButtons = <>
                    FieldName = 'IsPack'
                    Footers = <>
                    Title.Caption = #26159#21542#21253#35013
                    Width = 57
                  end
                  item
                    Alignment = taCenter
                    Color = 15387059
                    EditButtons = <>
                    FieldName = 'BarCode'
                    Footer.Alignment = taCenter
                    Footer.ValueType = fvtCount
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #26465#30721
                    Title.SortIndex = 1
                    Title.SortMarker = smUpEh
                    Width = 127
                  end
                  item
                    Color = 16776176
                    EditButtons = <>
                    FieldName = 'OrderID'
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #35746#21333#21495
                    Visible = False
                    Width = 78
                  end
                  item
                    Color = 16776176
                    EditButtons = <>
                    FieldName = 'DevName'
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #26426#22411
                    Visible = False
                    Width = 71
                  end
                  item
                    Alignment = taCenter
                    EditButtons = <>
                    FieldName = 'PostDate'
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #29983#20135#26085#26399
                    Width = 68
                  end
                  item
                    Alignment = taCenter
                    EditButtons = <>
                    FieldName = 'CustomerName'
                    Footers = <>
                    Title.Alignment = taCenter
                    Title.Caption = #23458#25143
                    Visible = False
                    Width = 73
                  end
                  item
                    EditButtons = <>
                    FieldName = 'PackDate'
                    Footers = <>
                    Title.Caption = #21253#35013#26085#26399
                  end
                  item
                    EditButtons = <>
                    FieldName = 'PackTime'
                    Footers = <>
                    Title.Caption = #21253#35013#26102#38388
                  end>
              end
            end
          end
        end
      end
    end
  end
  object RvDataSetConnectionBarCode: TRvDataSetConnection
    FieldAliasList.Strings = (
      '')
    RuntimeVisibility = rtDeveloper
    DataSet = StockDM.QSQLBarCode
    Left = 520
    Top = 389
  end
  object RvProjectBarCode: TRvProject
    Engine = RvSystemBarCode
    LoadDesigner = True
    Left = 696
    Top = 411
  end
  object RvSystemBarCode: TRvSystem
    TitleSetup = 'Output Options'
    TitleStatus = 'Report Status'
    TitlePreview = #26465#30721#39044#35272#19982#25171#21360
    SystemSetups = [ssAllowSetup, ssAllowCopies, ssAllowDestPreview, ssAllowDestPrinter, ssAllowPrinterSetup, ssAllowPreviewSetup]
    SystemFiler.StatusFormat = 'Generating page %p'
    SystemPreview.RulerType = rtBothCm
    SystemPreview.ZoomFactor = 100.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = 'Printing page %p'
    SystemPrinter.Title = 'ReportPrinter Report'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    Left = 775
    Top = 381
  end
  object QToday: TADOQuery
    Connection = StockDM.ADOConn
    Parameters = <
      item
        Name = 'packDate'
        Attributes = [paNullable]
        DataType = ftWideString
        NumericScale = 255
        Precision = 255
        Size = 10
        Value = Null
      end>
    SQL.Strings = (
      'select barcode,packDate from barcode where PackDate=:PackDate')
    Left = 789
    Top = 453
  end
  object RvDataSetConnectionGBarCode: TRvDataSetConnection
    FieldAliasList.Strings = (
      '')
    RuntimeVisibility = rtDeveloper
    DataSet = StockDM.QGBarCode
    Left = 519
    Top = 340
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -