home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Buyer 1999 September
/
Dpcb0999.iso
/
Business
/
Empire
/
_SETUP.1
/
EBRepDesigner.exe
/
0
/
RCDATA
/
TFRMSRWDESIGN
/
TFRMSRWDESIGN.txt
Wrap
Text File
|
1999-06-21
|
28KB
|
825 lines
object frmSrwDesign: TfrmSrwDesign
Left = 310
Top = 101
Width = 247
Height = 383
BorderIcons = [biSystemMenu, biMinimize]
Caption = 'Page Designer'
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
FormStyle = fsStayOnTop
KeyPreview = True
PixelsPerInch = 96
PopupMenu = popMenu
Position = poScreenCenter
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnDeactivate = FormDeactivate
OnKeyDown = FormKeyDown
OnResize = FormResize
OnShow = FormShow
TextHeight = 16
object tabMain: TTabbedNotebook
Left = 0
Top = 0
Width = 239
Height = 356
Align = alClient
PageIndex = 2
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
OnClick = tabMainClick
OnChange = tabMainChange
object TTabPage
Left = 5
Top = 26
Caption = '&Arrange'
object grdSections: TStringGrid
Left = 4
Top = 4
Width = 221
Height = 288
ColCount = 3
DefaultRowHeight = 19
FixedRows = 0
Options = [goFixedVertLine, goFixedHorzLine, goDrawFocusSelected]
RowCount = 30
ScrollBars = ssVertical
TabOrder = 0
OnDrawCell = grdSectionsDrawCell
OnSelectCell = grdSectionsSelectCell
ColWidths = (
33
64
64)
end
object cmdSections: TBitBtn
Left = 126
Top = 176
Width = 17
Height = 17
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
OnClick = cmdSectionsClick
Glyph.Data = {
BE000000424DBE00000000000000760000002800000009000000090000000100
04000000000048000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777000
0000777077777000000077700777700000007770007770000000777000077000
0000777000777000000077700777700000007770777770000000777777777000
0000}
end
object panSections: TPanel
Left = 0
Top = 293
Width = 229
Height = 32
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
object cmdAdd: TBitBtn
Left = 4
Top = 4
Width = 109
Height = 25
Caption = '&Add'
TabOrder = 0
OnClick = cmdAddClick
Style = bsNew
end
object cmdDelete: TBitBtn
Left = 116
Top = 4
Width = 109
Height = 25
Caption = '&Delete'
TabOrder = 1
OnClick = cmdDeleteClick
Style = bsNew
end
end
end
object TTabPage
Left = 5
Top = 26
Caption = '&Place'
object panObjects: TPanel
Left = 0
Top = 0
Width = 40
Height = 325
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object bevObjects: TBevel
Left = 34
Top = 4
Width = 2
Height = 317
end
object cmdPointer: TSpeedButton
Left = 4
Top = 4
Width = 25
Height = 25
Hint = 'Pointer'
GroupIndex = 1
Down = True
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777700
77777777777770FF07777777777770FF0777777707770FF07777777700770FF0
777777770F00FF07777777770FFFFF07777777770FFFFF00007777770FFFFFFF
077777770FFFFFF0777777770FFFFF07777777770FFFF077777777770FFF0777
777777770FF07777777777770F07777777777777007777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdPointerClick
end
object cmdLabel: TSpeedButton
Left = 4
Top = 32
Width = 25
Height = 25
Hint = 'Label'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
777777777777777777777777888888888777777CCCCCCCCC877777777CC877CC
877777777CC8777C777777777CC87777777777777CC87777777777777CC87777
777777777CC87777777777777CC87777777777777CC87777777777777CC87777
7777777CCCCCC777777777777777777777777777777777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdMemo: TSpeedButton
Left = 4
Top = 56
Width = 25
Height = 25
Hint = 'Memo'
GroupIndex = 1
Glyph.Data = {
18010000424D1801000000000000760000002800000010000000110000000100
0400000000008800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777888888888
88877700000000000087770FFFFFFFFFF087770FCCCCCCCCF087770FFFFFFFFF
F087770FCCCCCCCCF087770FFFFFFFFFF087770FCCCCCCCCF087770FFFFFFFFF
F087770FCCCCCCCCF087770FFFFFFFFFF087770FCCCCCFFFF087770FFFFFFFF0
0077770FCCCCCF0F0777770FFFFFFF0077777700000000077777777777777777
77770000000000000000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdRectangle: TSpeedButton
Left = 4
Top = 80
Width = 25
Height = 25
Hint = 'Rectangle'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
777777788888888888877700000000000087770BBBBBBBBBB087770BBBBBBBBB
B087770BBBBBBBBBB087770BBBBBBBBBB087770BBBBBBBBBB087770BBBBBBBBB
B087770BBBBBBBBBB087770BBBBBBBBBB087770BBBBBBBBBB087770BBBBBBBBB
B087770000000000007777777777777777777777777777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdCircle: TSpeedButton
Left = 4
Top = 104
Width = 25
Height = 25
Hint = 'Circle'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
77777777778888777777777770000088777777700AAAAA008777770AAAAAAAAA
0877770AAAAAAAAA087770AAAAAAAAAAA08770AAAAAAAAAAA08770AAAAAAAAAA
A08770AAAAAAAAAAA087770AAAAAAAAA0877770AAAAAAAAA087777700AAAAA00
7777777770000077777777777777777777777777777777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdHorzLine: TSpeedButton
Left = 4
Top = 128
Width = 25
Height = 25
Hint = 'Horizontal Line'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
7777777777777777777777788888888888877700000000000087770000000000
0077777777777777777777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdVertLine: TSpeedButton
Left = 4
Top = 152
Width = 25
Height = 25
Hint = 'Verticle Line'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777778877777777777770087777777777777008777777777777700877
7777777777700877777777777770087777777777777008777777777777700877
7777777777700877777777777770087777777777777008777777777777700877
7777777777700777777777777777777777777777777777777777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdImage: TSpeedButton
Left = 4
Top = 176
Width = 25
Height = 25
Hint = 'Image'
GroupIndex = 1
Glyph.Data = {
50010000424D5001000000000000760000002800000014000000100000000100
040000000000C000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
88888888000084F4B4E4C4C4C4C4C4B800008C4E4E4C4C4C4C4C4888000084C4
F4B4C4C4C4B8822800008C4B4E4C4C4CB82A222800008EFEFEFEFEFEA222A228
00008EEEEEEEEEEEEEEA222800008EEEEEEEEEEEEEEEEA2800008EEEEEEEEEEE
EEEEEEA800008EEEBBEEEEEEEEEEEEE800008EEBFFBEEEEEEEEEEEE800008EEB
FFBEEEEEEEEEEEE800008EEEBBEEEEEEEEEEEEE800008EEEEEEEEEEEEEEEEEE8
00008EEEEEEEEEEEEEEEEEE80000888888888888888888880000000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdDate: TSpeedButton
Left = 4
Top = 200
Width = 25
Height = 25
Hint = 'Date'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00778888888888
8887700000000000008770FFFFFFFFFFF08770FFFFCCFFFFF08770FFFFCCFFFF
F08770FFFFCCFFFFF08770FFFFCCFFFFF08770FFFFFCCFFFF08770FFFFFCCFFF
F08770FFFFFFCCFFF08770FFFCCCCCFFF08770FFFFFFFFFFF087709999999999
9087709999999999908770FFFFFFFFFFF0877000000000000077000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdTime: TSpeedButton
Left = 4
Top = 224
Width = 25
Height = 25
Hint = 'Time'
GroupIndex = 1
Glyph.Data = {
68010000424D6801000000000000760000002800000012000000120000000100
040000000000D800000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777788887
777777000000777777000008877777000000777700FFFFF00877770000007770
FFFF1FFFF08777000000770FF1FFFFF1FF087700000070FFFFFFFFFFFFF08700
000070F1FFFFFFFFF1F0870000000FFFFFFFFFFFFFFF080000000FFFFFFFF777
7FFF080000000F1FFFFF0000FF1F080000000FFFFFFF07FFFFFF080000000FFF
FFFF07FFFFFF0800000070F1FFFF07FFF1F08700000070FFFFFF07FFFFF08700
0000770FF1FF07F1FF08770000007770FFFF0FFFF08777000000777700FFFFF0
0777770000007777770000077777770000000000000000000000000000000000
000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdPageNo: TSpeedButton
Left = 4
Top = 248
Width = 25
Height = 25
Hint = 'Page Number'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777888888888
88877700000000000087770FFFFFFFFFF087770FCFFCFFFFF087770FCFFCFFFF
F087770FCFFCFFFFF087770FCCCCCCFFF087770FFCFFCFFFF087770FFCFFCFFF
F087770FCCCCCCFFF087770FFFCFFCFFF087770FFFCFFCFFF087770FFFCFFCF0
0077770FFFFFFF0F0777770FFFFFFF0077777700000000077777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdPageCount: TSpeedButton
Left = 4
Top = 272
Width = 25
Height = 25
Hint = 'Page Count'
GroupIndex = 1
Glyph.Data = {
10010000424D1001000000000000760000002800000010000000100000000100
0400000000008000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777888888888
88877700000000000087770FFFFFFFFFF087770FFFFFFFFFF087770FFFFCCFFF
F087770FFFFCCFFFF087770FFFFCCFFFF087770FCCCCCCCCF087770FCCCCCCCC
F087770FFFFCCFFFF087770FFFFCCFFFF087770FFFFCCFFFF087770FFFFFFFF0
0077770FFFFFFF0F0777770FFFFFFF0077777700000000077777000000000000
0000000000000000000000000000000000000000}
ParentShowHint = False
ShowHint = True
OnClick = cmdLabelClick
end
object cmdBarcode: TSpeedButton
Left = 4
Top = 296
Width = 25
Height = 25
Hint = 'Bar Code'
GroupIndex = 1
Glyph.Data = {
4E010000424D4E01000000000000760000002800000013000000120000000100
040000000000D8000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777000007777007770077700777000007770770707707077077000007770
7707077070770770000077707707077070770770000077707707077070770770
0000777700777007770077700000777777777777777777700000777077007077
0070777000007770770070770070777000007770770070770070777000007770
7700707700707770000077707700707700707770000077707700707700707770
0000777077007077007077700000777077007077007077700000777777777777
777777700000777777777777777777700000}
ParentShowHint = False
ShowHint = True
Visible = False
OnClick = cmdLabelClick
end
end
object panFields1: TPanel
Left = 40
Top = 0
Width = 189
Height = 325
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object panFields2: TPanel
Left = 0
Top = 271
Width = 189
Height = 54
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object labCalculate: TLabel
Left = 0
Top = 28
Width = 69
Height = 13
Caption = '&Calculate Field'
FocusControl = cmbCalculate
end
object chkCaption: TCheckBox
Left = 0
Top = 2
Width = 173
Height = 17
Hint = 'Place a label and field object'
Caption = 'Automatically caption fields'
State = cbChecked
TabOrder = 0
end
object cmbCalculate: TComboBox
Left = 80
Top = 28
Width = 105
Height = 21
Hint = 'Place field in a function'
Style = csDropDownList
ItemHeight = 13
Items.Strings = (
'None'
'Sum'
'Count'
'Minimum'
'Maximum'
'Average')
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object lstFields: TListBox
Left = 1
Top = 4
Width = 184
Height = 261
ItemHeight = 13
MultiSelect = True
TabOrder = 1
OnDragDrop = lstFieldsDragDrop
OnDragOver = lstFieldsDragOver
OnMouseDown = lstFieldsMouseDown
end
end
end
object TTabPage
Left = 5
Top = 26
Caption = '&Customize'
object tabValues: TTabSet
Left = 0
Top = 304
Width = 229
Height = 21
Align = alBottom
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Tabs.Strings = (
'Properties')
TabIndex = 0
OnChange = tabValuesChange
end
object nbkValues: TNotebook
Left = 0
Top = 30
Width = 229
Height = 274
Align = alClient
TabOrder = 1
object TPage
Left = 0
Top = 0
Caption = 'Values'
object grdValues: TStringGrid
Left = 4
Top = 1
Width = 222
Height = 268
ColCount = 3
DefaultRowHeight = 19
FixedRows = 0
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing]
ParentFont = False
RowCount = 20
ScrollBars = ssVertical
TabOrder = 6
OnDrawCell = grdValuesDrawCell
OnKeyPress = grdValuesKeyPress
OnSelectCell = grdValuesSelectCell
OnSetEditText = grdValuesSetEditText
ColWidths = (
85
136
64)
RowHeights = (
19
19
19
19
20
19
19
19
19
19
19
19
19
19
19
19
19
19
19
19)
end
object cmbAlign: TComboBox
Left = 54
Top = 160
Width = 105
Height = 21
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'Left'
'Right'
'Center'
'')
ParentFont = False
TabOrder = 0
Visible = False
OnChange = cmbAlignChange
end
object cmdFont: TBitBtn
Left = 166
Top = 160
Width = 17
Height = 17
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
Visible = False
OnClick = cmdFontClick
Glyph.Data = {
BE000000424DBE00000000000000760000002800000009000000090000000100
04000000000048000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777000
0000777077777000000077700777700000007770007770000000777000077000
0000777000777000000077700777700000007770777770000000777777777000
0000}
end
object cmbColor: TComboBox
Left = 54
Top = 184
Width = 105
Height = 21
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'White'
'Black'
'Maroon'
'Green'
'Olive'
'Navy'
'Purple'
'Teal'
'Gray'
'Silver'
'Red'
'Lime'
'Yellow'
'Blue'
'Fuchsia'
'Aqua'
'Custom')
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 3
Visible = False
OnChange = cmbColorChange
end
object cmdFile: TBitBtn
Left = 166
Top = 184
Width = 17
Height = 17
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
Visible = False
OnClick = cmdFileNameClick
Glyph.Data = {
BE000000424DBE00000000000000760000002800000009000000090000000100
04000000000048000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777000
0000777077777000000077700777700000007770007770000000777000077000
0000777000777000000077700777700000007770777770000000777777777000
0000}
end
object cmbShapeStyle: TComboBox
Left = 54
Top = 208
Width = 105
Height = 21
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'Solid'
'Dash'
'Dot'
'Dash Dot'
'Dash Dot Dot')
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
Visible = False
OnChange = cmbShapeStyleChange
end
object cmbBarcodeStyle: TComboBox
Left = 54
Top = 233
Width = 105
Height = 21
Style = csDropDownList
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
Items.Strings = (
'ENC 1'
'ENC 2'
'ENC 3'
'ENC 4'
'ENC 5'
'ENC 6')
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 5
Visible = False
OnChange = cmbBarcodeStyleChange
end
object cmdName: TBitBtn
Left = 166
Top = 208
Width = 17
Height = 17
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
Visible = False
OnClick = cmdNameClick
Glyph.Data = {
BE000000424DBE00000000000000760000002800000009000000090000000100
04000000000048000000CE0E0000D80E00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777000
0000777077777000000077700777700000007770007770000000777000077000
0000777000777000000077700777700000007770777770000000777777777000
0000}
end
end
object TPage
Left = 0
Top = 0
Caption = 'Caption'
object memCaption: TMemo
Left = 4
Top = 1
Width = 224
Height = 268
Lines.Strings = (
'')
ScrollBars = ssVertical
TabOrder = 0
OnKeyPress = memCaptionKeyPress
end
end
end
object panNames: TPanel
Left = 0
Top = 0
Width = 229
Height = 30
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object cmbNames: TComboBox
Left = 4
Top = 4
Width = 222
Height = 21
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 0
OnChange = cmbNamesChange
end
end
end
end
object dlgFont: TFontDialog
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'System'
Font.Style = []
MinFontSize = 0
MaxFontSize = 0
Left = 192
Top = 224
end
object dlgColor: TColorDialog
Left = 192
Top = 256
end
object dlgOpen: TOpenDialog
Left = 192
Top = 288
end
object popMenu: TPopupMenu
Left = 192
Top = 192
object mnuTop: TMenuItem
Caption = '&Stay on top'
Checked = True
OnClick = mnuTopClick
end
object mnuHide: TMenuItem
Caption = '&Hide'
OnClick = mnuHideClick
end
object mnuLine1: TMenuItem
Caption = '-'
end
object mnuSetup: TMenuItem
Caption = '&Report Setup'
OnClick = mnuSetupClick
end
object mnuFont: TMenuItem
Caption = 'Default &Font'
OnClick = mnuFontClick
end
object mnuLine2: TMenuItem
Caption = '-'
end
object mnuHelp: TMenuItem
Caption = 'H&elp'
OnClick = mnuHelpClick
end
end
end