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

📄 qexport4dialog.dfm

📁 delphi中把数据输出为html excel等形式的控件
💻 DFM
📖 第 1 页 / 共 5 页
字号:
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = False
        Layout = tlCenter
      end
      object laFooter: TLabel
        Left = 9
        Top = 173
        Width = 439
        Height = 20
        Alignment = taCenter
        AutoSize = False
        Caption = 'Footer text:'
        Color = clBtnShadow
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clCaptionText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
        Transparent = False
        Layout = tlCenter
      end
      object memHeader: TMemo
        Left = 9
        Top = 34
        Width = 440
        Height = 135
        TabOrder = 0
      end
      object memFooter: TMemo
        Left = 9
        Top = 193
        Width = 440
        Height = 128
        TabOrder = 1
      end
    end
    object tshCaptions: TTabSheet
      Caption = '&Captions'
      object laCaptionRow: TLabel
        Left = 350
        Top = 5
        Width = 56
        Height = 13
        Alignment = taRightJustify
        Caption = 'Caption row'
      end
      object sgrCaptions: TStringGrid
        Left = 0
        Top = 25
        Width = 462
        Height = 320
        ColCount = 2
        DefaultRowHeight = 19
        RowCount = 2
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing]
        TabOrder = 0
        OnDrawCell = sgrCaptionsDrawCell
        OnGetEditText = sgrCaptionsGetEditText
        ColWidths = (
          231
          202)
      end
      object chAllowCaptions: TCheckBox
        Left = 1
        Top = 5
        Width = 177
        Height = 17
        Caption = 'Allow captions'
        Checked = True
        State = cbChecked
        TabOrder = 1
        OnClick = chAllowCaptionsClick
      end
      object cbxColumnAlign: TComboBox
        Left = 80
        Top = 87
        Width = 75
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 2
        Visible = False
        OnExit = cbxColumnAlignExit
      end
      object edColumnWidth: TEdit
        Left = 67
        Top = 119
        Width = 85
        Height = 21
        TabOrder = 3
        Text = '0'
        Visible = False
        OnExit = edColumnWidthExit
      end
      object udColumnWidth: TUpDown
        Left = 152
        Top = 119
        Width = 15
        Height = 21
        Associate = edColumnWidth
        Max = 1000
        TabOrder = 4
        Visible = False
      end
      object edCaptionRow: TEdit
        Left = 412
        Top = 1
        Width = 50
        Height = 21
        TabOrder = 5
        Text = '-1'
        OnExit = edCaptionRowExit
        OnKeyDown = edCaptionRowKeyDown
      end
    end
    object tshRTF: TTabSheet
      Caption = 'Word / RTF Options'
      object pcRTF: TPageControl
        Left = 1
        Top = 1
        Width = 460
        Height = 352
        ActivePage = tsRTFDataStyles
        TabOrder = 0
        object tsRTFDataStyles: TTabSheet
          Caption = 'Data Styles'
          object pcRTFStyles: TPageControl
            Left = 0
            Top = 0
            Width = 190
            Height = 324
            ActivePage = tsRTFBaseStyles
            Align = alLeft
            TabOrder = 0
            OnChange = pcRTFStylesChange
            object tsRTFBaseStyles: TTabSheet
              Caption = 'Base Styles'
              object lstRTFBaseStyles: TListView
                Left = 0
                Top = 0
                Width = 182
                Height = 296
                Align = alClient
                Columns = <
                  item
                    Width = 178
                  end>
                HideSelection = False
                MultiSelect = True
                ReadOnly = True
                ShowColumnHeaders = False
                SmallImages = imgFields
                TabOrder = 0
                ViewStyle = vsReport
                OnChange = lstRTFBaseStylesChange
                OnDeletion = lstRTFBaseStylesDeletion
              end
            end
            object tsRTFStripStyles: TTabSheet
              Caption = 'Strip Styles'
              object tbRTFStripStyles: TToolBar
                Left = 0
                Top = 0
                Width = 182
                Height = 24
                AutoSize = True
                ButtonHeight = 24
                ButtonWidth = 25
                Images = ilXLSStyles
                TabOrder = 0
                object tbtAddRTFStyle: TToolButton
                  Left = 0
                  Top = 0
                  Caption = 'tbtAddRTFStyle'
                  ImageIndex = 0
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtAddRTFStyleClick
                end
                object tbtDelRTFStyle: TToolButton
                  Left = 25
                  Top = 0
                  Caption = 'tbtDelRTFStyle'
                  ImageIndex = 1
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtDelRTFStyleClick
                end
                object tbtMoveRTFStyleUp: TToolButton
                  Left = 50
                  Top = 0
                  Caption = 'tbtMoveRTFStyleUp'
                  ImageIndex = 2
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtMoveRTFStyleUpClick
                end
                object tbtMoveRTFStyleDown: TToolButton
                  Left = 75
                  Top = 0
                  Caption = 'tbtMoveRTFStyleDown'
                  ImageIndex = 3
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtMoveRTFStyleDownClick
                end
                object ToolButton6: TToolButton
                  Left = 100
                  Top = 0
                  Width = 8
                  Caption = 'ToolButton6'
                  ImageIndex = 4
                  Style = tbsSeparator
                end
                object tbtLoadRTFStyle: TToolButton
                  Left = 108
                  Top = 0
                  Caption = 'tbtLoadRTFStyle'
                  ImageIndex = 4
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtLoadRTFStyleClick
                end
                object tbtSaveRTFStyle: TToolButton
                  Left = 133
                  Top = 0
                  Caption = 'tbtSaveRTFStyle'
                  ImageIndex = 5
                  ParentShowHint = False
                  ShowHint = True
                  OnClick = tbtSaveRTFStyleClick
                end
              end
              object lstRTFStripStyles: TListView
                Left = 0
                Top = 24
                Width = 182
                Height = 233
                Align = alClient
                Columns = <
                  item
                    Width = 178
                  end>
                HideSelection = False
                ReadOnly = True
                ShowColumnHeaders = False
                SmallImages = imgFields
                TabOrder = 1
                ViewStyle = vsReport
                OnChange = lstRTFBaseStylesChange
                OnDeletion = lstRTFBaseStylesDeletion
              end
              object rgRTFStripType: TRadioGroup
                Left = 0
                Top = 257
                Width = 182
                Height = 39
                Align = alBottom
                Caption = 'Strip Type'
                Columns = 3
                ItemIndex = 0
                Items.Strings = (
                  'None'
                  'Col'
                  'Row')
                TabOrder = 2
                OnClick = rgRTFStripTypeClick
              end
            end
          end
          object paRTFStyle: TPanel
            Left = 193
            Top = 0
            Width = 258
            Height = 323
            TabOrder = 1
            object Bevel17: TBevel
              Left = 5
              Top = 5
              Width = 248
              Height = 138
            end
            object Bevel20: TBevel
              Left = 12
              Top = 89
              Width = 52
              Height = 27
            end
            object Bevel19: TBevel
              Left = 143
              Top = 59
              Width = 102
              Height = 27
            end
            object Bevel18: TBevel
              Left = 12
              Top = 59
              Width = 127
              Height = 27
            end
            object laRTFSample: TLabel
              Left = 5
              Top = 146
              Width = 248
              Height = 15
              AutoSize = False
              Caption = 'Sample'
              Color = clBtnShadow
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clCaptionText
              Font.Height = -11
              Font.Name = 'MS Sans Serif'
              Font.Style = [fsBold]
              ParentColor = False
              ParentFont = False
              Transparent = False
              Layout = tlCenter
            end
            object pbRTFSample: TPaintBox
              Left = 5
              Top = 162
              Width = 248
              Height = 53
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clWindowText
              Font.Height = -20
              Font.Name = 'MS Sans Serif'
              Font.Style = []
              ParentFont = False
              OnPaint = pbRTFSamplePaint
            end
            object laRTFFont: TLabel
              Left = 40
              Top = 14
              Width = 21
              Height = 13
              Alignment = taRightJustify
              Caption = 'Font'
            end
            object laRTFFontSize: TLabel
              Left = 40
              Top = 38
              Width = 20
              Height = 13
              Alignment = taRightJustify
              Caption = 'Size'
            end
            object bRTFFontColor: TSpeedButton
              Left = 13
              Top = 60
              Width = 25
              Height = 25
              Hint = 'Font color'
              Flat = True
              Glyph.Data = {
                C6050000424DC605000000000000360400002800000014000000140000000100
                0800000000009001000000000000000000000001000000010000000000000000
                80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
                A6000020400000206000002080000020A0000020C0000020E000004000000040
                20000040400000406000004080000040A0000040C0000040E000006000000060
                20000060400000606000006080000060A0000060C0000060E000008000000080
                20000080400000806000008080000080A0000080C0000080E00000A0000000A0
                200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
                200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
                200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
                20004000400040006000400080004000A0004000C0004000E000402000004020
                20004020400040206000402080004020A0004020C0004020E000404000004040
                20004040400040406000404080004040A0004040C0004040E000406000004060
                20004060400040606000406080004060A0004060C0004060E000408000004080
                20004080400040806000408080004080A0004080C0004080E00040A0000040A0
                200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
                200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
                200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
                20008000400080006000800080008000A0008000C0008000E000802000008020
                20008020400080206000802080008020A0008020C0008020E000804000008040
                20008040400080406000804080008040A0008040C0008040E000806000008060
                20008060400080606000806080008060A0008060C0008060E000808000008080
                20008080400080806000808080008080A0008080C0008080E00080A0000080A0
                200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
                200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
                200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
                2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
                2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040

⌨️ 快捷键说明

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