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

📄 unit6.dfm

📁 进行图纸的资料归档及管理
💻 DFM
📖 第 1 页 / 共 2 页
字号:
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label12: TLabel
            Left = 26
            Top = 194
            Width = 60
            Height = 15
            Caption = '借出日期'
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label13: TLabel
            Left = 26
            Top = 230
            Width = 75
            Height = 15
            Caption = '图纸份数:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label15: TLabel
            Left = 26
            Top = 93
            Width = 75
            Height = 15
            Caption = '借用类型:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label16: TLabel
            Left = 26
            Top = 128
            Width = 90
            Height = 15
            Caption = '借阅人单位:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object Label17: TLabel
            Left = 26
            Top = 59
            Width = 75
            Height = 15
            Caption = '图纸类型:'
            Font.Charset = GB2312_CHARSET
            Font.Color = clNavy
            Font.Height = -15
            Font.Name = '宋体'
            Font.Style = []
            ParentFont = False
          end
          object RzDBButtonEdit1: TRzDBButtonEdit
            Left = 128
            Top = 159
            Width = 121
            Height = 23
            DataField = '借阅人'
            DataSource = mainData.outDataSource
            ImeName = '智能ABC输入法'
            TabOrder = 4
            OnButtonClick = RzDBButtonEdit1ButtonClick
          end
          object RzDBDateTimePicker2: TRzDBDateTimePicker
            Left = 128
            Top = 194
            Width = 121
            Height = 23
            CalAlignment = dtaLeft
            CalColors.TitleBackColor = clGray
            CalColors.TitleTextColor = clSilver
            Date = 37065.6812394676
            Time = 37065.6812394676
            DateFormat = dfShort
            DateMode = dmComboBox
            Kind = dtkDate
            ParseInput = False
            TabOrder = 5
            ShowToday = True
            ShowTodayCircle = True
            ShowWeekNumbers = True
            DataField = '借阅时间'
            DataSource = mainData.outDataSource
          end
          object RzDBSpinEdit1: TRzDBSpinEdit
            Left = 128
            Top = 231
            Width = 121
            Height = 23
            DataField = '数量'
            DataSource = mainData.outDataSource
            ImeName = '智能ABC输入法'
            TabOrder = 6
            Alignment = taRightJustify
            Increment = 1
            Max = 100
            PageSize = 10
            Value = 1
          end
          object RzDBEdit9: TRzDBEdit
            Left = 128
            Top = 24
            Width = 177
            Height = 23
            DataField = '图号'
            DataSource = mainData.outDataSource
            TabOrder = 0
          end
          object RzDBMemo2: TRzDBMemo
            Left = 320
            Top = 24
            Width = 225
            Height = 89
            Hint = '备注'
            DataField = '备注'
            DataSource = mainData.outDataSource
            ImeName = '智能ABC输入法'
            TabOrder = 7
          end
          object RzDBComboBox1: TRzDBComboBox
            Left = 128
            Top = 89
            Width = 121
            Height = 23
            DataField = '借阅类型'
            DataSource = mainData.outDataSource
            Style = csDropDownList
            ItemHeight = 15
            TabOrder = 2
            Items.Strings = (
              '检验图纸'
              '外协图纸')
          end
          object RzDBButtonEdit2: TRzDBButtonEdit
            Left = 128
            Top = 124
            Width = 177
            Height = 23
            DataField = '借阅人单位'
            DataSource = mainData.outDataSource
            TabOrder = 3
            OnButtonClick = RzDBButtonEdit2ButtonClick
          end
          object RzDBMemo3: TRzDBMemo
            Left = 320
            Top = 124
            Width = 225
            Height = 131
            Hint = '更改记录'
            DataField = '更改记录'
            DataSource = mainData.outDataSource
            ImeName = '智能ABC输入法'
            TabOrder = 8
          end
          object RzDBComboBox4: TRzDBComboBox
            Left = 128
            Top = 56
            Width = 121
            Height = 23
            DataField = '图纸类型'
            DataSource = mainData.outDataSource
            ItemHeight = 15
            TabOrder = 1
            Items.Strings = (
              '蓝图'
              '草图')
          end
        end
        object DBNavPlus2: TDBNavPlus
          Left = 0
          Top = 292
          Width = 567
          Height = 38
          DataSource = mainData.outDataSource
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
          Align = alBottom
          Hints.Strings = (
            '移动到第一条记录'
            '移动前一条记录'
            '移动到下一条记录'
            '移动到最后一条记录'
            '插入记录'
            '删除当前记录'
            '修改当前记录'
            '确定插入记录(修改)记录操作'
            '取消操作'
            '刷新数据')
          TabOrder = 1
          Captions.Strings = (
            '顶'
            '前'
            '后'
            '底'
            '插入'
            '删除'
            '修改'
            '保存'
            '取消'
            '刷新')
          Spacing = -1
          Margin = -1
        end
      end
      object TabSheet4: TTabSheet
        Caption = '浏览数据'
        ImageIndex = 3
        object Splitter1: TSplitter
          Left = 0
          Top = 173
          Width = 567
          Height = 3
          Cursor = crVSplit
          Align = alBottom
        end
        object Panel5: TPanel
          Left = 0
          Top = 176
          Width = 567
          Height = 116
          Align = alBottom
          BorderWidth = 5
          TabOrder = 0
          object DBGridEh2: TDBGridEh
            Left = 6
            Top = 6
            Width = 555
            Height = 104
            Align = alClient
            DataSource = mainData.outDataSource
            ImeName = '智能ABC输入法'
            ReadOnly = True
            TabOrder = 0
            TitleFont.Charset = GB2312_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -15
            TitleFont.Name = '宋体'
            TitleFont.Style = []
            FooterFont.Charset = GB2312_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -15
            FooterFont.Name = '宋体'
            FooterFont.Style = []
            FooterColor = clWindow
            TitleHeight = 18
            Flat = True
            Columns = <
              item
                FieldName = '借阅类型'
                Footers = <>
              end
              item
                FieldName = '借阅人'
                Footers = <>
              end
              item
                FieldName = '借阅人单位'
                Footers = <>
              end
              item
                FieldName = '数量'
                Footers = <>
              end
              item
                FieldName = '份数'
                Footers = <>
              end
              item
                FieldName = '借阅时间'
                Footers = <>
              end>
          end
        end
        object Panel6: TPanel
          Left = 0
          Top = 0
          Width = 567
          Height = 173
          Align = alClient
          BorderWidth = 5
          TabOrder = 1
          object DBGridEh1: TDBGridEh
            Left = 6
            Top = 6
            Width = 555
            Height = 161
            Align = alClient
            DataSource = mainData.tzDataSource
            ImeName = '智能ABC输入法'
            TabOrder = 0
            TitleFont.Charset = GB2312_CHARSET
            TitleFont.Color = clWindowText
            TitleFont.Height = -15
            TitleFont.Name = '宋体'
            TitleFont.Style = []
            FooterFont.Charset = GB2312_CHARSET
            FooterFont.Color = clWindowText
            FooterFont.Height = -15
            FooterFont.Name = '宋体'
            FooterFont.Style = []
            FooterColor = clWindow
            TitleHeight = 18
            Flat = True
            Columns = <
              item
                FieldName = '序号'
                Footers = <>
              end
              item
                FieldName = '袋号'
                Footers = <>
              end
              item
                FieldName = '图纸名称'
                Footers = <>
              end
              item
                FieldName = '图号'
                Footers = <>
              end
              item
                FieldName = '图纸类型'
                Footers = <>
              end
              item
                FieldName = '页数'
                Footers = <>
              end
              item
                FieldName = '所属单位'
                Footers = <>
              end
              item
                FieldName = '领用时间'
                Footers = <>
              end
              item
                FieldName = '整机代号'
                Footers = <>
              end
              item
                FieldName = '有效期'
                Footers = <>
              end>
          end
        end
        object DBNavPlus4: TDBNavPlus
          Left = 0
          Top = 292
          Width = 567
          Height = 38
          DataSource = mainData.tzDataSource
          VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
          Align = alBottom
          TabOrder = 2
          Captions.Strings = (
            '顶'
            '前'
            '后'
            '底'
            '插入'
            '删除'
            '修改'
            '保存'
            '取消'
            '刷新')
          Spacing = -1
          Margin = -1
        end
      end
    end
  end
end

⌨️ 快捷键说明

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