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

📄 unreciveunit.~dfm

📁 本软件专门用于管理餐饮行业的点菜单、加菜单酒水单等重要票据的领用及回收情况
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
      Width = 80
      Height = 23
      UIStyle = MacOS
      Caption = #20851#38381
      AutoSize = False
      TabStop = True
      TabOrder = 2
      Transparent = False
      ModalResult = 0
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      Layout = blGlyphLeft
      Spacing = 4
      ResHandle = 0
      MouseContinuouslyDownInterval = 100
      OnClick = suiButton2Click
    end
    object lyname: TsuiComboBox
      Left = 74
      Top = 76
      Width = 121
      Height = 21
      UIStyle = MacOS
      BorderColor = 8355711
      ArrowColor = 8355711
      ButtonColor = 15198183
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 3
      OnDropDown = lynameDropDown
    end
    object numberlb: TsuiComboBox
      Left = 274
      Top = 76
      Width = 121
      Height = 21
      UIStyle = MacOS
      BorderColor = 8355711
      ArrowColor = 8355711
      ButtonColor = 15198183
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 4
      OnDropDown = numberlbDropDown
    end
    object numberidedit: TsuiEdit
      Left = 440
      Top = 76
      Width = 121
      Height = 21
      BorderColor = 8355711
      TabOrder = 5
    end
    object wwDBGrid1: TwwDBGrid
      Left = 24
      Top = 113
      Width = 538
      Height = 217
      Selected.Strings = (
        'Numbertype'#9'10'#9#31080#25454#31181#31867#9#9
        'Lypername'#9'19'#9#39046#29992#20154#9#9
        'Numberid'#9'10'#9#31080#25454#32534#21495' '#9#9
        'Djdate'#9'10'#9#39046#29992#26085#26399#9#9
        'A'#9'5'#9'A'#32852#9#9
        'B'#9'5'#9'B'#32852#9'F'#9)
      IniAttributes.Delimiter = ';;'
      TitleColor = 12450301
      FixedCols = 0
      ShowHorzScrollBar = True
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 6
      TitleAlignment = taCenter
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -19
      TitleFont.Name = #23435#20307
      TitleFont.Style = [fsBold]
      TitleLines = 1
      TitleButtons = False
    end
    object wwDBNavigator1: TwwDBNavigator
      Left = 72
      Top = 344
      Width = 100
      Height = 25
      DataSource = DataSource1
      RepeatInterval.InitialDelay = 500
      RepeatInterval.Interval = 100
      object wwDBNavigator1First: TwwNavButton
        Left = 0
        Top = 0
        Width = 25
        Height = 25
        Hint = 'Move to first record'
        ImageIndex = -1
        NumGlyphs = 2
        Spacing = 4
        Transparent = False
        Caption = 'wwDBNavigator1First'
        Enabled = False
        DisabledTextColors.ShadeColor = clGray
        DisabledTextColors.HighlightColor = clBtnHighlight
        Index = 0
        Style = nbsFirst
      end
      object wwDBNavigator1Prior: TwwNavButton
        Left = 25
        Top = 0
        Width = 25
        Height = 25
        Hint = 'Move to prior record'
        ImageIndex = -1
        NumGlyphs = 2
        Spacing = 4
        Transparent = False
        Caption = 'wwDBNavigator1Prior'
        Enabled = False
        DisabledTextColors.ShadeColor = clGray
        DisabledTextColors.HighlightColor = clBtnHighlight
        Index = 1
        Style = nbsPrior
      end
      object wwDBNavigator1Next: TwwNavButton
        Left = 50
        Top = 0
        Width = 25
        Height = 25
        Hint = 'Move to next record'
        ImageIndex = -1
        NumGlyphs = 2
        Spacing = 4
        Transparent = False
        Caption = 'wwDBNavigator1Next'
        Enabled = False
        DisabledTextColors.ShadeColor = clGray
        DisabledTextColors.HighlightColor = clBtnHighlight
        Index = 2
        Style = nbsNext
      end
      object wwDBNavigator1NextPage: TwwNavButton
        Left = 75
        Top = 0
        Width = 25
        Height = 25
        Hint = 'Move forward 10 records'
        ImageIndex = -1
        NumGlyphs = 2
        Spacing = 4
        Transparent = False
        Caption = 'wwDBNavigator1NextPage'
        Enabled = False
        DisabledTextColors.ShadeColor = clGray
        DisabledTextColors.HighlightColor = clBtnHighlight
        Index = 3
        Style = nbsNextPage
      end
    end
  end
  object DataSource1: TDataSource
    AutoEdit = False
    DataSet = Query1
    Left = 32
    Top = 24
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'pj'
    SQL.Strings = (
      'select * from libnumber'
      'where numbertype='#39#39
      'and numberid='#39#39
      'and lypername='#39#39)
    Left = 64
    Top = 24
    object Query1Numbertype: TStringField
      DisplayLabel = #31080#25454#31181#31867
      DisplayWidth = 10
      FieldName = 'Numbertype'
      Origin = 'PJ."libnumber.DB".Numbertype'
      Size = 10
    end
    object Query1Lypername: TStringField
      DisplayLabel = #39046#29992#20154
      DisplayWidth = 19
      FieldName = 'Lypername'
      Origin = 'PJ."libnumber.DB".Lypername'
      Size = 30
    end
    object Query1Numberid: TStringField
      DisplayLabel = #31080#25454#32534#21495' '
      DisplayWidth = 10
      FieldName = 'Numberid'
      Origin = 'PJ."libnumber.DB".Numberid'
      Size = 10
    end
    object Query1Djdate: TDateField
      DisplayLabel = #39046#29992#26085#26399
      DisplayWidth = 10
      FieldName = 'Djdate'
      Origin = 'PJ."libnumber.DB".Djdate'
    end
    object Query1A: TBooleanField
      DisplayLabel = 'A'#32852
      DisplayWidth = 5
      FieldName = 'A'
      Origin = 'PJ."libnumber.DB".A'
    end
    object Query1B: TBooleanField
      DisplayLabel = 'B'#32852
      DisplayWidth = 5
      FieldName = 'B'
      Origin = 'PJ."libnumber.DB".B'
    end
    object Query1Lsid: TFloatField
      DisplayWidth = 10
      FieldName = 'Lsid'
      Origin = 'PJ."libnumber.DB".Lsid'
      Visible = False
    end
    object Query1Hxbz: TStringField
      DisplayWidth = 1
      FieldName = 'Hxbz'
      Origin = 'PJ."libnumber.DB".Hxbz'
      Visible = False
      Size = 1
    end
  end
end

⌨️ 快捷键说明

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