home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-12-14 | 61.5 KB | 2,045 lines |
- object HtmlRepDlg: THtmlRepDlg
- Left = 66
- Top = 141
- ActiveControl = OKBtn
- BorderStyle = bsDialog
- Caption = 'HTML Report Wizard'
- ClientHeight = 400
- ClientWidth = 635
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object ButtonPanel: TPanel
- Left = 536
- Top = 0
- Width = 99
- Height = 400
- Align = alRight
- BevelOuter = bvNone
- TabOrder = 0
- object OKBtn: TBitBtn
- Left = 11
- Top = 12
- Width = 77
- Height = 27
- Hint = 'Generate HTML Report'
- Caption = '&Go'
- Default = True
- TabOrder = 0
- OnClick = OKBtnClick
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000001000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 03030303030303030303030303030303030303030303FF030303030303030303
- 03030303030303040403030303030303030303030303030303F8F8FF03030303
- 03030303030303030303040202040303030303030303030303030303F80303F8
- FF030303030303030303030303040202020204030303030303030303030303F8
- 03030303F8FF0303030303030303030304020202020202040303030303030303
- 0303F8030303030303F8FF030303030303030304020202FA0202020204030303
- 0303030303F8FF0303F8FF030303F8FF03030303030303020202FA03FA020202
- 040303030303030303F8FF03F803F8FF0303F8FF03030303030303FA02FA0303
- 03FA0202020403030303030303F8FFF8030303F8FF0303F8FF03030303030303
- FA0303030303FA0202020403030303030303F80303030303F8FF0303F8FF0303
- 0303030303030303030303FA0202020403030303030303030303030303F8FF03
- 03F8FF03030303030303030303030303FA020202040303030303030303030303
- 0303F8FF0303F8FF03030303030303030303030303FA02020204030303030303
- 03030303030303F8FF0303F8FF03030303030303030303030303FA0202020403
- 030303030303030303030303F8FF0303F8FF03030303030303030303030303FA
- 0202040303030303030303030303030303F8FF03F8FF03030303030303030303
- 03030303FA0202030303030303030303030303030303F8FFF803030303030303
- 030303030303030303FA0303030303030303030303030303030303F803030303
- 0303030303030303030303030303030303030303030303030303030303030303
- 0303}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object CancelBtn: TBitBtn
- Left = 11
- Top = 42
- Width = 77
- Height = 27
- Hint = 'Cancel HTML Report'
- Caption = '&Close'
- TabOrder = 1
- Kind = bkCancel
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object HelpBtn: TBitBtn
- Left = 11
- Top = 192
- Width = 77
- Height = 27
- TabOrder = 6
- OnClick = HelpBtnClick
- Kind = bkHelp
- Margin = 2
- Spacing = -1
- IsControl = True
- end
- object Button1: TButton
- Left = 13
- Top = 318
- Width = 77
- Height = 25
- Caption = '<< &Previous'
- TabOrder = 8
- Visible = False
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 13
- Top = 345
- Width = 77
- Height = 25
- Caption = '&Next >>'
- TabOrder = 9
- OnClick = Button2Click
- end
- object LoadBtn: TBitBtn
- Left = 11
- Top = 72
- Width = 77
- Height = 27
- Hint = 'Load Report Template From Disk File'
- Caption = '&Load'
- Default = True
- TabOrder = 2
- OnClick = LoadBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
- 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
- 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
- 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
- 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
- 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
- 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
- B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
- 3BB33773333773333773B333333B3333333B7333333733333337}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object SaveBtn: TBitBtn
- Left = 11
- Top = 102
- Width = 77
- Height = 27
- Hint = 'Save Report Template To Disk File'
- Caption = '&Save'
- Default = True
- TabOrder = 3
- OnClick = SaveBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
- 7700333333337777777733333333008088003333333377F73377333333330088
- 88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
- 000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
- FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
- 99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
- 99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
- 99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
- 93337FFFF7737777733300000033333333337777773333333333}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object CheckBox1: TCheckBox
- Left = 2
- Top = 224
- Width = 94
- Height = 17
- Hint = 'Load HTML Report Into Web Browser - after Go'
- Caption = 'View in Browser'
- TabOrder = 7
- end
- object DeleteBtn: TBitBtn
- Left = 11
- Top = 132
- Width = 77
- Height = 27
- Hint = 'Delete All Files in HTML directory'
- Caption = '&Delete'
- Default = True
- TabOrder = 4
- OnClick = DeleteBtnClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
- 3333333777777777F3333330F77777703333333733F3F3F73F33330FF0808077
- 0333337F37F7F7F37F33330FF0807077033333733737F73F73F330FF77808707
- 703337F37F37F37F37F330FF08807807703037F37F37F37F37F700FF08808707
- 700377F37337F37F377330FF778078077033373F73F7F3733733330FF0808077
- 0333337F37F7F7F37F33330FF08070770333337FF7F7F7FF7F33330000000000
- 03333377777777777F33330F888777770333337FFFFFFFFF7F33330000000000
- 033333777777777773333333307770333333333337FFF7F33333333330000033
- 3333333337777733333333333333333333333333333333333333}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- object BitBtn1: TBitBtn
- Left = 11
- Top = 162
- Width = 77
- Height = 27
- Hint = 'Clear All Options'
- Caption = 'Cl&ear'
- Default = True
- TabOrder = 5
- OnClick = BitBtn1Click
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B5555555555555575}
- Margin = 2
- NumGlyphs = 2
- Spacing = -1
- IsControl = True
- end
- end
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 536
- Height = 400
- ActivePage = TabSheet1
- Align = alClient
- HotTrack = True
- TabOrder = 1
- OnChange = PageControl1Change
- object TabSheet1: TTabSheet
- Caption = 'General Settings'
- object GroupBox1: TGroupBox
- Left = 0
- Top = 0
- Width = 528
- Height = 372
- Align = alClient
- Caption = 'General Settings:'
- TabOrder = 0
- IsControl = True
- object Label14: TLabel
- Left = 8
- Top = 20
- Width = 188
- Height = 13
- Caption = 'Generate HTML Report in this directory:'
- end
- object Label10: TLabel
- Left = 8
- Top = 64
- Width = 289
- Height = 13
- Caption = 'Image Directory (optional) - relative to HTML Report directory:'
- end
- object ReportDirEd: TDirEdit
- Left = 8
- Top = 35
- Width = 505
- Height = 21
- AutoSelect = False
- TabOrder = 0
- end
- object ImgFormatRG: TRadioGroup
- Left = 7
- Top = 106
- Width = 178
- Height = 49
- Caption = 'Images Format:'
- ItemIndex = 0
- Items.Strings = (
- 'Convert To GIF'
- 'Convert To JPEG')
- TabOrder = 2
- end
- object ImageFilesRG: TRadioGroup
- Left = 8
- Top = 162
- Width = 177
- Height = 49
- Caption = 'Image Files:'
- ItemIndex = 0
- Items.Strings = (
- 'Generate Image Files'
- 'Do Not Generate Image Files')
- TabOrder = 3
- end
- object img1: TMultiImgControl
- Left = 304
- Top = 152
- Width = 210
- Height = 200
- Caption = 'img1'
- TabOrder = 4
- Visible = False
- SpeedBarHeight = 24
- end
- object ImageDirEd: TEdit
- Left = 8
- Top = 80
- Width = 505
- Height = 21
- Hint = 'Image Directory is relative to HTML Report Directory'
- TabOrder = 1
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Data'
- object GroupBox3: TGroupBox
- Left = 0
- Top = 0
- Width = 528
- Height = 372
- Align = alClient
- Caption = 'Data:'
- TabOrder = 0
- object Label22: TLabel
- Left = 5
- Top = 14
- Width = 70
- Height = 13
- Caption = 'All Data Fields:'
- end
- object Label23: TLabel
- Left = 149
- Top = 14
- Width = 75
- Height = 13
- Caption = 'Selected Fields:'
- end
- object IncludeBtn: TSpeedButton
- Left = 122
- Top = 52
- Width = 24
- Height = 24
- Hint = 'Include Selected Field'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 5A010000424D5A01000000000000760000002800000013000000130000000100
- 040000000000E400000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888
- 880088888888888000008888880A08888888888FFFFF8888880AA08888888880
- 00008888880AAA088888888FFFFF8888880AAAA08888888000008888880AAAAA
- 0888888131008888880AAAAAA088888095C08888880AAAAA0888888053028888
- 880AAAA088888887D5D58888880AAA0888888889091D8888880AA0888888888F
- CFD78888880A08888888888A7AE288888800888888888887CF57888888888888
- 88888881F9758888888888888888888AFBAF8888888888888888888E666C}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = IncludeBtnClick
- IsControl = True
- end
- object IncAllBtn: TSpeedButton
- Left = 121
- Top = 106
- Width = 24
- Height = 24
- Hint = 'Include All Fields'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 5A010000424D5A01000000000000760000002800000013000000130000000100
- 040000000000E400000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888FFFFF8888888888888888888000108888888888888888888FFFF58008
- 8888880088888880000080A08888880A0888888FFFFF80AA0888880AA0888880
- 000080AAA088880AAA08888FFFFF80AAAA08880AAAA08880000080AAAAA0880A
- AAAA0881310080AAAAAA080AAAAAA08095C080AAAAA0880AAAAA0880530280AA
- AA08880AAAA08887D5D580AAA088880AAA088889091D80AA0888880AA088888F
- CFD780A08888880A0888888A7AE280088888880088888887CF57888888888888
- 88888881F9758888888888888888888AFBAF8888888888888888888E666C}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = IncAllBtnClick
- IsControl = True
- end
- object ExcludeBtn: TSpeedButton
- Left = 121
- Top = 149
- Width = 24
- Height = 24
- Hint = 'Exclude Selected Field'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 5A010000424D5A01000000000000760000002800000013000000130000000100
- 040000000000E400000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888
- 888888800888888000008888888888090888888FFFFF88888888809908888880
- 00008888888809990888888FFFFF888888809999088888800000888888099999
- 0888888131008888809999990888888095C08888880999990888888053028888
- 8880999908888887D5D588888888099908888889091D8888888880990888888F
- CFD78888888888090888888A7AE288888888888008888887CF57888888888888
- 88888881F9758888888888888888888AFBAF8888888888888888888E666C}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = ExcludeBtnClick
- IsControl = True
- end
- object ExAllBtn: TSpeedButton
- Left = 121
- Top = 178
- Width = 24
- Height = 24
- Hint = 'Exclude All Fields'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 5A010000424D5A01000000000000760000002800000013000000130000000100
- 040000000000E400000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 8888888FFFFF8888888888888888888000108888888888888888888FFFF58888
- 888008888888008000008888880908888880908FFFFF88888099088888099080
- 00008888099908888099908FFFFF888099990888099990800000880999990880
- 9999908131008099999908099999908095C08809999908809999908053028880
- 9999088809999087D5D588880999088880999089091D8888809908888809908F
- CFD78888880908888880908A7AE288888880088888880087CF57888888888888
- 88888881F9758888888888888888888AFBAF8888888888888888888E666C}
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = ExAllBtnClick
- IsControl = True
- end
- object MoveUpBtn: TSpeedButton
- Left = 180
- Top = 228
- Width = 24
- Height = 24
- Hint = 'Move Up'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
- 3333333333777F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
- 3333333777737777F333333099999990333333373F3333373333333309999903
- 333333337F33337F33333333099999033333333373F333733333333330999033
- 3333333337F337F3333333333099903333333333373F37333333333333090333
- 33333333337F7F33333333333309033333333333337373333333333333303333
- 333333333337F333333333333330333333333333333733333333}
- NumGlyphs = 2
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = MoveUpBtnClick
- IsControl = True
- end
- object MoveDownBtn: TSpeedButton
- Left = 208
- Top = 228
- Width = 24
- Height = 24
- Hint = 'Move Down'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
- 333333333337F33333333333333033333333333333373F333333333333090333
- 33333333337F7F33333333333309033333333333337373F33333333330999033
- 3333333337F337F33333333330999033333333333733373F3333333309999903
- 333333337F33337F33333333099999033333333373333373F333333099999990
- 33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333300033333333333337773333333}
- NumGlyphs = 2
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- OnClick = MoveDownBtnClick
- IsControl = True
- end
- object Label34: TLabel
- Left = 4
- Top = 292
- Width = 99
- Height = 13
- Caption = 'Group By (1st Level):'
- end
- object Label8: TLabel
- Left = 4
- Top = 330
- Width = 103
- Height = 13
- Caption = 'Group By (2nd Level):'
- end
- object InLineBtn: TSpeedButton
- Left = 122
- Top = 79
- Width = 24
- Height = 24
- Hint = 'Include In The Same Line'
- Glyph.Data = {
- 66010000424D6601000000000000760000002800000014000000140000000100
- 040000000000F000000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
- 88888888C00C8888888888888888888828EB8888888888888888888880948888
- 8888888888888888EC88888888880000888888882312888888880AA088888888
- 6160888888880AA0888888880811888888880AA088888888C0C8888800000AA0
- 000088883AE388880AAAAAAAAAA0888894C488880AAAAAAAAAA08888D5DC8888
- 00000AA0000088880100888888880AA08888888896F0888888880AA088888888
- 49F8888888880AA088888888080588888888000088888888C111888888888888
- 8888888800888888888888888888888818738888888888888888888821208888
- 88888888888888884449}
- OnClick = InLineBtnClick
- end
- object Label11: TLabel
- Left = 160
- Top = 330
- Width = 83
- Height = 13
- Caption = '+ Field Separator:'
- end
- object Label12: TLabel
- Left = 5
- Top = 179
- Width = 95
- Height = 13
- Caption = 'User-Defined Fields:'
- end
- object Label13: TLabel
- Left = 126
- Top = 254
- Width = 113
- Height = 13
- Caption = 'URL Link for User Field:'
- end
- object ListBox1: TListBox
- Left = 5
- Top = 30
- Width = 113
- Height = 147
- Hint = 'List Of All Data Fields'
- ItemHeight = 13
- TabOrder = 0
- OnClick = ListBox1Click
- end
- object ListBox2: TListBox
- Left = 150
- Top = 30
- Width = 113
- Height = 195
- Hint = 'Data Fields Selected For Report'
- ItemHeight = 13
- TabOrder = 2
- OnClick = ListBox2Click
- end
- object FAttributesGB: TGroupBox
- Left = 268
- Top = 7
- Width = 254
- Height = 360
- Caption = 'Field Attributes:'
- TabOrder = 5
- Visible = False
- object Label4: TLabel
- Left = 8
- Top = 12
- Width = 31
- Height = 13
- Caption = 'Name:'
- end
- object Label5: TLabel
- Left = 8
- Top = 47
- Width = 176
- Height = 13
- Caption = 'Width in Pixels (0 - Browser Decides):'
- end
- object FNameEd: TEdit
- Left = 8
- Top = 25
- Width = 217
- Height = 21
- TabOrder = 0
- end
- object FIndividualFontColorCB: TCheckBox
- Left = 8
- Top = 87
- Width = 193
- Height = 17
- Caption = 'Use Individual Field Attributes'
- TabOrder = 2
- OnClick = FIndividualFontColorCBClick
- end
- object FFontColorGB: TGroupBox
- Left = 5
- Top = 102
- Width = 243
- Height = 199
- TabOrder = 3
- object Label45: TLabel
- Left = 6
- Top = 53
- Width = 27
- Height = 13
- Caption = 'Color:'
- end
- object Label46: TLabel
- Left = 6
- Top = 89
- Width = 26
- Height = 13
- Caption = 'Style:'
- end
- object Label47: TLabel
- Left = 6
- Top = 125
- Width = 47
- Height = 13
- Caption = 'Font Size:'
- end
- object Label9: TLabel
- Left = 6
- Top = 160
- Width = 55
- Height = 13
- Caption = 'Font Name:'
- end
- object TableBgndLbl: TLabel
- Left = 125
- Top = 159
- Width = 85
- Height = 13
- Caption = 'Table Bgnd Color:'
- end
- object FColorCB: TComboBox
- Left = 6
- Top = 66
- Width = 113
- Height = 22
- Style = csOwnerDrawFixed
- DropDownCount = 1
- ItemHeight = 16
- Items.Strings = (
- '')
- TabOrder = 1
- OnDrawItem = FColorCBDrawItem
- OnDropDown = FColorCBDropDown
- end
- object FStyleCB: TComboBox
- Left = 6
- Top = 103
- Width = 113
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Normal'
- 'Heading 1'
- 'Heading 2'
- 'Heading 3'
- 'Heading 4'
- 'Heading 5'
- 'Heading 6')
- TabOrder = 2
- OnChange = FStyleCBChange
- end
- object FSizeCB: TComboBox
- Left = 6
- Top = 138
- Width = 113
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- Items.Strings = (
- 'Normal'
- 'Size 1 (Smallest)'
- 'Size 2'
- 'Size 3'
- 'Size 4'
- 'Size 5'
- 'Size 6'
- 'Size 7 (Largest)')
- TabOrder = 3
- OnChange = FSizeCBChange
- end
- object FTextAttGB: TGroupBox
- Left = 124
- Top = 60
- Width = 113
- Height = 78
- Caption = 'Text Attributes:'
- TabOrder = 4
- object FBoldCB: TCheckBox
- Left = 8
- Top = 13
- Width = 97
- Height = 17
- Caption = 'Bold'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- end
- object FItalicCB: TCheckBox
- Left = 8
- Top = 28
- Width = 97
- Height = 17
- Caption = 'Italic'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsItalic]
- ParentFont = False
- TabOrder = 1
- end
- object FUnderlineCB: TCheckBox
- Left = 8
- Top = 43
- Width = 97
- Height = 17
- Caption = 'Underlined'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsUnderline]
- ParentFont = False
- TabOrder = 2
- end
- object FCenteredCB: TCheckBox
- Left = 8
- Top = 58
- Width = 97
- Height = 17
- Caption = ' <<Centered>>'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- end
- object FFontCB: TComboBox
- Left = 6
- Top = 173
- Width = 113
- Height = 21
- ItemHeight = 13
- Sorted = True
- TabOrder = 5
- end
- object LabelDataRG: TRadioGroup
- Left = 8
- Top = 7
- Width = 228
- Height = 45
- ItemIndex = 0
- Items.Strings = (
- 'Label Attributes'
- 'Data Attributes')
- TabOrder = 0
- OnClick = LabelDataRGClick
- end
- object TableBgndColorCB: TComboBox
- Left = 125
- Top = 173
- Width = 113
- Height = 22
- Style = csOwnerDrawFixed
- DropDownCount = 1
- ItemHeight = 16
- Items.Strings = (
- '')
- TabOrder = 6
- OnDrawItem = FColorCBDrawItem
- OnDropDown = FColorCBDropDown
- end
- end
- object FNumericGB: TGroupBox
- Left = 5
- Top = 301
- Width = 243
- Height = 55
- Caption = 'Numeric Field Attributes:'
- TabOrder = 4
- object Label6: TLabel
- Left = 8
- Top = 12
- Width = 122
- Height = 13
- Caption = 'Digits After Decimal Point:'
- end
- object FDecimalsEd: TSpinEdit
- Left = 8
- Top = 27
- Width = 121
- Height = 22
- MaxValue = 9
- MinValue = 0
- TabOrder = 0
- Value = 0
- end
- object FTotalCB: TCheckBox
- Left = 136
- Top = 29
- Width = 97
- Height = 17
- Caption = 'Calculate Total'
- TabOrder = 1
- end
- end
- object FWidthEd: TSpinEdit
- Left = 8
- Top = 61
- Width = 217
- Height = 22
- MaxValue = 0
- MinValue = 0
- TabOrder = 1
- Value = 0
- end
- end
- object GroupBy1CB: TComboBox
- Left = 5
- Top = 306
- Width = 140
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 6
- OnChange = GroupBy1CBChange
- end
- object GroupBy2CB: TComboBox
- Left = 5
- Top = 344
- Width = 140
- Height = 21
- Style = csDropDownList
- Enabled = False
- ItemHeight = 13
- TabOrder = 7
- OnChange = GroupBy2CBChange
- end
- object DbImg: TPMultiImage
- Left = 8
- Top = 40
- Width = 105
- Height = 105
- B_W_CopyFlags = [C_DEL]
- Color = clBtnFace
- Picture.Data = {07544269746D617000000000}
- ImageName = 'file not found'
- ImageReadRes = lAutoMatic
- BlitMode = sLight
- ImageWriteRes = sAutoMatic
- TifSaveCompress = sNONE
- TiffPage = 1
- TiffAppend = False
- JPegSaveQuality = 75
- JPegSaveSmooth = 0
- RubberBandBtn = mbLeft
- TextLeft = 0
- TextTop = 0
- TextRotate = 0
- TabOrder = 9
- TabStop = False
- Visible = False
- ZoomBy = 10
- end
- object FSeparatorEd: TEdit
- Left = 160
- Top = 344
- Width = 103
- Height = 21
- Hint = 'This text will separate fields joined by "+" operator'
- MaxLength = 20
- TabOrder = 8
- end
- object ListBox3: TListBox
- Tag = -1
- Left = 5
- Top = 191
- Width = 113
- Height = 74
- ItemHeight = 13
- Items.Strings = (
- 'User Field 1'
- 'User Field 2'
- 'User Field 3'
- 'User Field 4'
- 'User Field 5')
- TabOrder = 1
- OnClick = ListBox3Click
- end
- object UserEd: TEdit
- Left = 5
- Top = 267
- Width = 113
- Height = 21
- Hint = 'User Field Value; Right-Click for Menu'
- AutoSelect = False
- MaxLength = 80
- PopupMenu = PopupMenu1
- TabOrder = 3
- end
- object UserLinkEd: TEdit
- Left = 125
- Top = 267
- Width = 138
- Height = 21
- Hint = 'Type in URL address here'
- AutoSelect = False
- MaxLength = 250
- TabOrder = 4
- end
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Report Elements'
- object GroupBox2: TGroupBox
- Left = 0
- Top = 0
- Width = 528
- Height = 372
- Align = alClient
- Caption = 'Report Elements:'
- TabOrder = 0
- object Image2: TImage
- Left = 93
- Top = 11
- Width = 79
- Height = 67
- Picture.Data = {<image000.bmp>}
- end
- object Image3: TImage
- Left = 93
- Top = 11
- Width = 79
- Height = 67
- Picture.Data = {<image001.bmp>}
- end
- object Image1: TImage
- Left = 93
- Top = 11
- Width = 79
- Height = 67
- Picture.Data = {<image002.bmp>}
- end
- object L2PageGB: TGroupBox
- Left = 178
- Top = 79
- Width = 170
- Height = 287
- Caption = '2nd Level Pages:'
- TabOrder = 1
- object Label2: TLabel
- Left = 8
- Top = 216
- Width = 129
- Height = 13
- Caption = 'Insert into this HTML Page:'
- end
- object L2PageAttribGB: TGroupBox
- Left = 7
- Top = 13
- Width = 154
- Height = 49
- Caption = 'Page Attributes:'
- TabOrder = 0
- object L2PageAttribCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L2PageAttribBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L2PageAttribBtnClick
- end
- end
- object L2PageHeaderGB: TGroupBox
- Left = 7
- Top = 63
- Width = 154
- Height = 49
- Caption = 'Page Header:'
- TabOrder = 1
- object L2PageHeaderCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L2PageHeaderBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L2PageHeaderBtnClick
- end
- end
- object L2PageBodyGB: TGroupBox
- Left = 7
- Top = 113
- Width = 154
- Height = 49
- Caption = 'Page Body:'
- TabOrder = 2
- object L2PageBodyCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L2PageBodyBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L2PageBodyBtnClick
- end
- end
- object L2PageFooterGB: TGroupBox
- Left = 7
- Top = 163
- Width = 154
- Height = 49
- Caption = 'Page Footer:'
- TabOrder = 3
- object L2PageFooterCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L2PageFooterBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L2PageFooterBtnClick
- end
- end
- object L2PageTemplateEd: TEdit
- Left = 8
- Top = 232
- Width = 153
- Height = 21
- TabOrder = 4
- end
- object L2PageSelectBtn: TButton
- Tag = 1
- Left = 42
- Top = 256
- Width = 81
- Height = 25
- Caption = 'Select'
- TabOrder = 5
- OnClick = MPageSelectBtnClick
- end
- end
- object MPageGB: TGroupBox
- Left = 5
- Top = 79
- Width = 170
- Height = 287
- Caption = 'Main Page:'
- TabOrder = 0
- object Label1: TLabel
- Left = 8
- Top = 216
- Width = 129
- Height = 13
- Caption = 'Insert into this HTML Page:'
- end
- object MPageAttribGB: TGroupBox
- Left = 8
- Top = 13
- Width = 154
- Height = 49
- Caption = 'Page Attributes:'
- TabOrder = 0
- object MPageAttribCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object MPageAttribBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = MPageAttribBtnClick
- end
- end
- object MPageHeaderGB: TGroupBox
- Left = 8
- Top = 63
- Width = 154
- Height = 49
- Caption = 'Page Header:'
- TabOrder = 1
- object MPageHeaderCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object MPageHeaderBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = MPageHeaderBtnClick
- end
- end
- object MPageBodyGB: TGroupBox
- Left = 8
- Top = 113
- Width = 154
- Height = 49
- Caption = 'Page Body:'
- TabOrder = 2
- object MPageBodyCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object MPageBodyBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = MPageBodyBtnClick
- end
- end
- object MPageFooterGB: TGroupBox
- Left = 8
- Top = 163
- Width = 154
- Height = 49
- Caption = 'Page Footer:'
- TabOrder = 3
- object MPageFooterCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object MPageFooterBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = MPageFooterBtnClick
- end
- end
- object MPageTemplateEd: TEdit
- Left = 8
- Top = 232
- Width = 153
- Height = 21
- TabOrder = 4
- end
- object MPageSelectBtn: TButton
- Left = 42
- Top = 256
- Width = 81
- Height = 25
- Caption = 'Select'
- TabOrder = 5
- OnClick = MPageSelectBtnClick
- end
- end
- object L3PageGB: TGroupBox
- Left = 352
- Top = 79
- Width = 170
- Height = 287
- Caption = '3rd Level Pages:'
- TabOrder = 2
- object Label3: TLabel
- Left = 8
- Top = 216
- Width = 129
- Height = 13
- Caption = 'Insert into this HTML Page:'
- end
- object L3PageAttribGB: TGroupBox
- Left = 7
- Top = 13
- Width = 154
- Height = 49
- Caption = 'Page Attributes:'
- TabOrder = 0
- object L3PageAttribCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L3PageAttribBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L3PageAttribBtnClick
- end
- end
- object L3PageHeaderGB: TGroupBox
- Left = 7
- Top = 63
- Width = 154
- Height = 49
- Caption = 'Page Header:'
- TabOrder = 1
- object L3PageHeaderCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L3PageHeaderBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L3PageHeaderBtnClick
- end
- end
- object L3PageBodyGB: TGroupBox
- Left = 7
- Top = 113
- Width = 154
- Height = 49
- Caption = 'Page Body:'
- TabOrder = 2
- object L3PageBodyCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L3PageBodyBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L3PageBodyBtnClick
- end
- end
- object L3PageFooterGB: TGroupBox
- Left = 7
- Top = 163
- Width = 154
- Height = 49
- Caption = 'Page Footer:'
- TabOrder = 3
- object L3PageFooterCB: TCheckBox
- Left = 8
- Top = 19
- Width = 57
- Height = 17
- Caption = 'Include'
- TabOrder = 0
- OnClick = MPageAttribCBClick
- end
- object L3PageFooterBtn: TButton
- Left = 66
- Top = 16
- Width = 81
- Height = 25
- Caption = 'Define'
- TabOrder = 1
- OnClick = L3PageFooterBtnClick
- end
- end
- object L3PageTemplateEd: TEdit
- Left = 8
- Top = 232
- Width = 153
- Height = 21
- TabOrder = 4
- end
- object L3PageSelectBtn: TButton
- Tag = 2
- Left = 42
- Top = 256
- Width = 81
- Height = 25
- Caption = 'Select'
- TabOrder = 5
- OnClick = MPageSelectBtnClick
- end
- end
- object ReportTypeRG: TRadioGroup
- Left = 6
- Top = 12
- Width = 83
- Height = 60
- Caption = 'Report Type:'
- ItemIndex = 0
- Items.Strings = (
- '1- Level'
- '2- Level'
- '3- Level')
- TabOrder = 3
- OnClick = ReportTypeRGClick
- end
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'Hyperlinks'
- object GroupBox4: TGroupBox
- Left = 0
- Top = 0
- Width = 528
- Height = 372
- Align = alClient
- Caption = 'Hyperlinks:'
- TabOrder = 0
- object Label26: TLabel
- Left = 12
- Top = 22
- Width = 94
- Height = 13
- Caption = 'Use As a URL Link:'
- end
- object Label27: TLabel
- Left = 182
- Top = 22
- Width = 97
- Height = 13
- Caption = 'Target for URL Link:'
- end
- object Label52: TLabel
- Left = 352
- Top = 64
- Width = 161
- Height = 41
- AutoSize = False
- Caption =
- 'To create a URL link select a pair of Fields (URL Link and URL T' +
- 'arget) and click on Add button.'
- WordWrap = True
- end
- object LinkCB: TComboBox
- Left = 12
- Top = 36
- Width = 161
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 0
- end
- object UrlCB: TComboBox
- Left = 182
- Top = 36
- Width = 161
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 1
- end
- object LinkLB: TListBox
- Left = 12
- Top = 67
- Width = 161
- Height = 254
- ItemHeight = 13
- TabOrder = 2
- end
- object UrlLB: TListBox
- Left = 182
- Top = 67
- Width = 161
- Height = 254
- ItemHeight = 13
- TabOrder = 3
- end
- object Button3: TButton
- Left = 355
- Top = 107
- Width = 73
- Height = 25
- Caption = 'Add'
- TabOrder = 4
- OnClick = Button3Click
- end
- object Button4: TButton
- Left = 355
- Top = 139
- Width = 73
- Height = 25
- Caption = 'Delete'
- TabOrder = 5
- OnClick = Button4Click
- end
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'Maintenance'
- object GroupBox5: TGroupBox
- Left = 0
- Top = 0
- Width = 528
- Height = 372
- Align = alClient
- Caption = 'Maintenance:'
- TabOrder = 0
- object GraphicGB: TGroupBox
- Left = 8
- Top = 54
- Width = 249
- Height = 313
- Caption = 'Graphic Files:'
- TabOrder = 3
- Visible = False
- object Label21: TLabel
- Left = 8
- Top = 66
- Width = 115
- Height = 13
- Caption = 'Graphic File Name Field:'
- end
- object Label24: TLabel
- Left = 7
- Top = 18
- Width = 105
- Height = 13
- Caption = 'Start File Names With:'
- end
- object Label25: TLabel
- Left = 8
- Top = 46
- Width = 105
- Height = 13
- Caption = 'Start Numbering From:'
- end
- object GraphicNameCB: TComboBox
- Left = 8
- Top = 80
- Width = 233
- Height = 21
- Hint = 'Use this field as HTML File Names'
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 2
- OnChange = GraphicNameCBChange
- end
- object ImageNameRG: TRadioGroup
- Left = 8
- Top = 102
- Width = 233
- Height = 65
- Caption = 'File Naming Mode:'
- ItemIndex = 0
- Items.Strings = (
- 'Create All Names'
- 'Create Only Missing Names')
- TabOrder = 3
- Visible = False
- OnClick = ImageNameRGClick
- end
- object ImgLetter1Ed: TEdit
- Left = 116
- Top = 16
- Width = 121
- Height = 21
- TabOrder = 0
- Text = 'a'
- end
- object ImageNumberEd: TEdit
- Left = 116
- Top = 44
- Width = 121
- Height = 21
- Hint = 'The initial value of the counter used to generate file names'
- MaxLength = 6
- TabOrder = 1
- OnKeyPress = L2NumberEdKeyPress
- end
- end
- object Maintenance2GB: TGroupBox
- Left = 8
- Top = 54
- Width = 249
- Height = 313
- Caption = 'HTML Files - 2nd Report Level:'
- TabOrder = 1
- object Label15: TLabel
- Left = 8
- Top = 62
- Width = 108
- Height = 13
- Caption = 'HTML File Name Field:'
- end
- object Label51: TLabel
- Left = 7
- Top = 18
- Width = 105
- Height = 13
- Caption = 'Start File Names With:'
- end
- object Label18: TLabel
- Left = 8
- Top = 42
- Width = 105
- Height = 13
- Caption = 'Start Numbering From:'
- end
- object PageName2CB: TComboBox
- Left = 8
- Top = 76
- Width = 233
- Height = 21
- Hint = 'Use this field as HTML File Names'
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 2
- OnChange = PageName2CBChange
- end
- object PageName2RG: TRadioGroup
- Left = 8
- Top = 98
- Width = 233
- Height = 70
- Caption = 'File Naming Mode:'
- ItemIndex = 0
- Items.Strings = (
- 'Create All Files / Create All Names'
- 'Create Only Files With Empty Names'
- 'Create Files According to Update Rule'
- 'Create All Files / Don'#39't Update Names')
- TabOrder = 3
- OnClick = PageName2RGClick
- end
- object L2PageFileLetterEd: TEdit
- Left = 116
- Top = 16
- Width = 121
- Height = 21
- TabOrder = 0
- Text = 'a'
- end
- object UpdateRule2GB: TGroupBox
- Left = 8
- Top = 168
- Width = 233
- Height = 137
- Caption = 'Update Rule:'
- TabOrder = 4
- Visible = False
- object Label17: TLabel
- Left = 8
- Top = 14
- Width = 152
- Height = 13
- Caption = 'Update when Value of the Field:'
- end
- object Rule2Lbl: TLabel
- Left = 8
- Top = 94
- Width = 28
- Height = 13
- Caption = 'Than:'
- end
- object Update2CB: TComboBox
- Left = 8
- Top = 28
- Width = 217
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 0
- end
- object Is2GB: TGroupBox
- Left = 8
- Top = 50
- Width = 217
- Height = 41
- Caption = 'Is:'
- TabOrder = 1
- object Less2RB: TRadioButton
- Left = 8
- Top = 15
- Width = 30
- Height = 17
- Caption = '<'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = Less2RBClick
- end
- object LessE2RB: TRadioButton
- Left = 49
- Top = 15
- Width = 32
- Height = 17
- Caption = '<='
- TabOrder = 1
- OnClick = LessE2RBClick
- end
- object GreaterE2RB: TRadioButton
- Left = 132
- Top = 15
- Width = 32
- Height = 17
- Caption = '>='
- TabOrder = 3
- OnClick = GreaterE2RBClick
- end
- object Greater2RB: TRadioButton
- Left = 173
- Top = 15
- Width = 32
- Height = 17
- Caption = '>'
- TabOrder = 4
- OnClick = Greater2RBClick
- end
- object Equal2RB: TRadioButton
- Left = 91
- Top = 15
- Width = 30
- Height = 17
- Caption = '='
- TabOrder = 2
- OnClick = Equal2RBClick
- end
- end
- object Update2Ed: TEdit
- Left = 8
- Top = 107
- Width = 217
- Height = 21
- TabOrder = 2
- end
- end
- object L2NumberEd: TEdit
- Left = 116
- Top = 40
- Width = 121
- Height = 21
- Hint = 'The initial value of the counter used to generate file names'
- MaxLength = 6
- TabOrder = 1
- OnKeyPress = L2NumberEdKeyPress
- end
- end
- object Maintenance3GB: TGroupBox
- Left = 272
- Top = 54
- Width = 249
- Height = 313
- Caption = 'HTML Files - 3rd Report Level:'
- TabOrder = 2
- object Label16: TLabel
- Left = 8
- Top = 62
- Width = 108
- Height = 13
- Caption = 'HTML File Name Field:'
- end
- object Label7: TLabel
- Left = 7
- Top = 18
- Width = 105
- Height = 13
- Caption = 'Start File Names With:'
- end
- object Label20: TLabel
- Left = 8
- Top = 42
- Width = 105
- Height = 13
- Caption = 'Start Numbering From:'
- end
- object PageName3CB: TComboBox
- Left = 8
- Top = 76
- Width = 233
- Height = 21
- Hint = 'Use this field as HTML File Names'
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 2
- OnChange = PageName3CBChange
- end
- object PageName3RG: TRadioGroup
- Left = 8
- Top = 98
- Width = 233
- Height = 70
- Caption = 'File Naming Mode:'
- ItemIndex = 0
- Items.Strings = (
- 'Create All Files / Create All Names'
- 'Create Only Files With Empty Names'
- 'Create Files According to Update Rule'
- 'Create All Files / Don'#39't Update Names')
- TabOrder = 3
- OnClick = PageName3RGClick
- end
- object L3PageFileLetterEd: TEdit
- Left = 116
- Top = 16
- Width = 121
- Height = 21
- TabOrder = 0
- Text = 'a'
- end
- object UpdateRule3GB: TGroupBox
- Left = 8
- Top = 168
- Width = 233
- Height = 137
- Caption = 'Update Rule:'
- TabOrder = 4
- Visible = False
- object Label19: TLabel
- Left = 8
- Top = 14
- Width = 152
- Height = 13
- Caption = 'Update when Value of the Field:'
- end
- object Rule3Lbl: TLabel
- Left = 8
- Top = 94
- Width = 28
- Height = 13
- Caption = 'Than:'
- end
- object Update3CB: TComboBox
- Left = 8
- Top = 28
- Width = 217
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 0
- end
- object Is3GB: TGroupBox
- Left = 8
- Top = 50
- Width = 217
- Height = 41
- Caption = 'Is:'
- TabOrder = 1
- object Less3RB: TRadioButton
- Left = 8
- Top = 15
- Width = 30
- Height = 17
- Caption = '<'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = Less3RBClick
- end
- object LessE3RB: TRadioButton
- Left = 49
- Top = 15
- Width = 32
- Height = 17
- Caption = '<='
- TabOrder = 1
- OnClick = LessE3RBClick
- end
- object GreaterE3RB: TRadioButton
- Left = 132
- Top = 15
- Width = 32
- Height = 17
- Caption = '>='
- TabOrder = 3
- OnClick = GreaterE3RBClick
- end
- object Greater3RB: TRadioButton
- Left = 173
- Top = 15
- Width = 32
- Height = 17
- Caption = '>'
- TabOrder = 4
- OnClick = Greater3RBClick
- end
- object Equal3RB: TRadioButton
- Left = 91
- Top = 15
- Width = 30
- Height = 17
- Caption = '='
- TabOrder = 2
- OnClick = Equal3RBClick
- end
- end
- object Update3Ed: TEdit
- Left = 8
- Top = 107
- Width = 217
- Height = 21
- TabOrder = 2
- end
- end
- object L3NumberEd: TEdit
- Left = 116
- Top = 40
- Width = 121
- Height = 21
- Hint = 'The initial value of the counter used to generate file names'
- MaxLength = 6
- TabOrder = 1
- OnKeyPress = L2NumberEdKeyPress
- end
- end
- object GroupBox6: TGroupBox
- Left = 8
- Top = 13
- Width = 201
- Height = 39
- TabOrder = 0
- object RadioButton1: TRadioButton
- Left = 8
- Top = 14
- Width = 81
- Height = 17
- Caption = 'HTML Files'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = RadioButton1Click
- end
- object RadioButton2: TRadioButton
- Left = 104
- Top = 14
- Width = 81
- Height = 17
- Caption = 'Graphic Files'
- TabOrder = 1
- OnClick = RadioButton2Click
- end
- end
- end
- end
- end
- object DataSource1: TDataSource
- Left = 600
- Top = 288
- end
- object OpenDialog1: TOpenDialog
- Left = 600
- Top = 256
- end
- object ColorDialog1: TColorDialog
- Ctl3D = True
- Left = 568
- Top = 256
- end
- object Timer1: TTimer
- Enabled = False
- Interval = 3000
- OnTimer = Timer1Timer
- Left = 568
- Top = 288
- end
- object SaveDialog1: TSaveDialog
- Left = 536
- Top = 288
- end
- object PopupMenu1: TPopupMenu
- Left = 536
- Top = 256
- object Text1: TMenuItem
- Caption = 'Text'
- OnClick = Text1Click
- end
- object SystemDate1: TMenuItem
- Caption = 'System Date'
- OnClick = SystemDate1Click
- end
- object SystemTime1: TMenuItem
- Caption = 'System Time'
- OnClick = SystemTime1Click
- end
- object SystemDateAndTime1: TMenuItem
- Caption = 'System Date And Time'
- OnClick = SystemDateAndTime1Click
- end
- object RecordNumber1: TMenuItem
- Caption = 'Record Number'
- OnClick = RecordNumber1Click
- end
- end
- object Timer2: TTimer
- Enabled = False
- OnTimer = Timer2Timer
- Left = 544
- Top = 376
- end
- end
-