114 lines
2.4 KiB
Plaintext
114 lines
2.4 KiB
Plaintext
inherited frmReportBox: TfrmReportBox
|
|
Left = 512
|
|
Top = 214
|
|
HorzScrollBar.Visible = False
|
|
VertScrollBar.Visible = False
|
|
Anchors = []
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'frmReportBox'
|
|
ClientHeight = 319
|
|
ClientWidth = 348
|
|
Font.Charset = ANSI_CHARSET
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
OnClose = FormClose
|
|
OnResize = FormResize
|
|
ExplicitWidth = 356
|
|
ExplicitHeight = 353
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object lblFontTest: TLabel [0]
|
|
Left = 148
|
|
Top = 208
|
|
Width = 77
|
|
Height = 14
|
|
Caption = 'lblFontTest'
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Courier New'
|
|
Font.Style = []
|
|
ParentFont = False
|
|
end
|
|
object memReport: TRichEdit [1]
|
|
Left = 0
|
|
Top = 0
|
|
Width = 348
|
|
Height = 298
|
|
Align = alClient
|
|
Color = clCream
|
|
Font.Charset = ANSI_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Courier New'
|
|
Font.Style = []
|
|
HideScrollBars = False
|
|
Lines.Strings = (
|
|
'memReport')
|
|
ParentFont = False
|
|
ReadOnly = True
|
|
ScrollBars = ssBoth
|
|
TabOrder = 0
|
|
WantReturns = False
|
|
WordWrap = False
|
|
end
|
|
object pnlButton: TPanel [2]
|
|
Left = 0
|
|
Top = 298
|
|
Width = 348
|
|
Height = 21
|
|
Align = alBottom
|
|
Anchors = []
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
DesignSize = (
|
|
348
|
|
21)
|
|
object cmdPrint: TButton
|
|
Left = 189
|
|
Top = 0
|
|
Width = 75
|
|
Height = 21
|
|
Anchors = [akRight]
|
|
Caption = 'Print'
|
|
TabOrder = 0
|
|
OnClick = cmdPrintClick
|
|
end
|
|
object cmdClose: TButton
|
|
Left = 272
|
|
Top = 0
|
|
Width = 75
|
|
Height = 21
|
|
Anchors = [akRight]
|
|
Cancel = True
|
|
Caption = 'Close'
|
|
Default = True
|
|
TabOrder = 1
|
|
OnClick = cmdCloseClick
|
|
end
|
|
end
|
|
inherited amgrMain: TVA508AccessibilityManager
|
|
Data = (
|
|
(
|
|
'Component = memReport'
|
|
'Status = stsDefault')
|
|
(
|
|
'Component = pnlButton'
|
|
'Status = stsDefault')
|
|
(
|
|
'Component = cmdPrint'
|
|
'Status = stsDefault')
|
|
(
|
|
'Component = cmdClose'
|
|
'Status = stsDefault')
|
|
(
|
|
'Component = frmReportBox'
|
|
'Status = stsDefault'))
|
|
end
|
|
object dlgPrintReport: TPrintDialog
|
|
Left = 318
|
|
Top = 41
|
|
end
|
|
end
|