505 lines
13 KiB
Plaintext
505 lines
13 KiB
Plaintext
object Form1: TForm1
|
|
Left = 317
|
|
Top = 205
|
|
Width = 450
|
|
Height = 248
|
|
Caption = 'Form1'
|
|
Color = clBtnFace
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Style = []
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
Scaled = False
|
|
OnCreate = FormCreate
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
object QuickRep1: TQuickRep
|
|
Left = 0
|
|
Top = 0
|
|
Width = 794
|
|
Height = 1123
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
BeforePrint = QuickRep1BeforePrint
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -11
|
|
Font.Name = 'Arial Cyr'
|
|
Font.Style = []
|
|
Functions.Strings = (
|
|
'PAGENUMBER'
|
|
'COLUMNNUMBER'
|
|
'REPORTTITLE')
|
|
Functions.DATA = (
|
|
'0'
|
|
'0'
|
|
#39#39)
|
|
OnNeedData = QuickRep1NeedData
|
|
Options = [FirstPageHeader, LastPageFooter]
|
|
Page.Columns = 1
|
|
Page.Orientation = poPortrait
|
|
Page.PaperSize = A4
|
|
Page.Values = (
|
|
100
|
|
2970
|
|
100
|
|
2100
|
|
100
|
|
100
|
|
0)
|
|
PrinterSettings.Copies = 1
|
|
PrinterSettings.Duplex = False
|
|
PrinterSettings.FirstPage = 0
|
|
PrinterSettings.LastPage = 0
|
|
PrinterSettings.OutputBin = First
|
|
PrintIfEmpty = False
|
|
SnapToGrid = True
|
|
Units = MM
|
|
Zoom = 100
|
|
object TitleBand1: TQRBand
|
|
Left = 38
|
|
Top = 38
|
|
Width = 718
|
|
Height = 40
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
AlignToBottom = False
|
|
Color = clWhite
|
|
ForceNewColumn = False
|
|
ForceNewPage = False
|
|
Size.Values = (
|
|
105.833333333333
|
|
1899.70833333333)
|
|
BandType = rbTitle
|
|
object QRLabel1: TQRLabel
|
|
Left = 230
|
|
Top = 0
|
|
Width = 257
|
|
Height = 23
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
60.8541666666667
|
|
608.541666666667
|
|
0
|
|
679.979166666667)
|
|
Alignment = taCenter
|
|
AlignToBand = True
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = #207#240#238#225#237#251#233' '#238#242#247#229#242' 1'
|
|
Color = clWhite
|
|
Font.Charset = DEFAULT_CHARSET
|
|
Font.Color = clWindowText
|
|
Font.Height = -19
|
|
Font.Name = 'Arial'
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 14
|
|
end
|
|
end
|
|
object PageFooterBand1: TQRBand
|
|
Left = 38
|
|
Top = 122
|
|
Width = 718
|
|
Height = 22
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
AlignToBottom = False
|
|
Color = clWhite
|
|
ForceNewColumn = False
|
|
ForceNewPage = False
|
|
Size.Values = (
|
|
58.2083333333333
|
|
1899.70833333333)
|
|
BandType = rbPageFooter
|
|
object QRSysData1: TQRSysData
|
|
Left = 687
|
|
Top = 0
|
|
Width = 31
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
1817.6875
|
|
0
|
|
82.0208333333333)
|
|
Alignment = taRightJustify
|
|
AlignToBand = True
|
|
AutoSize = False
|
|
Color = clWhite
|
|
Data = qrsPageNumber
|
|
Text = 'Page '
|
|
Transparent = False
|
|
FontSize = 8
|
|
end
|
|
end
|
|
object ColumnHeaderBand1: TQRBand
|
|
Left = 38
|
|
Top = 78
|
|
Width = 718
|
|
Height = 22
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
AlignToBottom = False
|
|
Color = clWhite
|
|
ForceNewColumn = False
|
|
ForceNewPage = False
|
|
Size.Values = (
|
|
58.2083333333333
|
|
1899.70833333333)
|
|
BandType = rbColumnHeader
|
|
object QRLabel2: TQRLabel
|
|
Left = 1
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
2.64583333333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'EmpNo'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
object QRLabel3: TQRLabel
|
|
Left = 82
|
|
Top = 0
|
|
Width = 141
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
216.958333333333
|
|
0
|
|
373.0625)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'LastName'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
object QRLabel4: TQRLabel
|
|
Left = 233
|
|
Top = 0
|
|
Width = 106
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
616.479166666667
|
|
0
|
|
280.458333333333)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'FirstName'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
object QRLabel5: TQRLabel
|
|
Left = 349
|
|
Top = 0
|
|
Width = 29
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
923.395833333333
|
|
0
|
|
76.7291666666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'PhoneExt'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
object QRLabel6: TQRLabel
|
|
Left = 388
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
1026.58333333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'HireDate'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
object QRLabel7: TQRLabel
|
|
Left = 469
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = True
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
1240.89583333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Caption = 'Salary'
|
|
Color = clWhite
|
|
Transparent = False
|
|
WordWrap = True
|
|
FontSize = 8
|
|
end
|
|
end
|
|
object DetailBand1: TQRBand
|
|
Left = 38
|
|
Top = 100
|
|
Width = 718
|
|
Height = 22
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
AlignToBottom = False
|
|
BeforePrint = DetailBand1BeforePrint
|
|
Color = clWhite
|
|
ForceNewColumn = False
|
|
ForceNewPage = False
|
|
Size.Values = (
|
|
58.2083333333333
|
|
1899.70833333333)
|
|
BandType = rbDetail
|
|
object QRExpr1: TQRExpr
|
|
Left = 1
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
2.64583333333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taRightJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[EmpNo]'
|
|
FontSize = 8
|
|
end
|
|
object QRExpr2: TQRExpr
|
|
Left = 82
|
|
Top = 0
|
|
Width = 141
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
216.958333333333
|
|
0
|
|
373.0625)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[LastName]'
|
|
FontSize = 8
|
|
end
|
|
object QRExpr3: TQRExpr
|
|
Left = 233
|
|
Top = 0
|
|
Width = 106
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
616.479166666667
|
|
0
|
|
280.458333333333)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[FirstName]'
|
|
FontSize = 8
|
|
end
|
|
object QRExpr4: TQRExpr
|
|
Left = 349
|
|
Top = 0
|
|
Width = 29
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
923.395833333333
|
|
0
|
|
76.7291666666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[PhoneExt]'
|
|
FontSize = 8
|
|
end
|
|
object QRExpr5: TQRExpr
|
|
Left = 388
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
1026.58333333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taLeftJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[HireDate]'
|
|
FontSize = 8
|
|
end
|
|
object QRExpr6: TQRExpr
|
|
Left = 469
|
|
Top = 0
|
|
Width = 71
|
|
Height = 15
|
|
Frame.Color = clBlack
|
|
Frame.DrawTop = False
|
|
Frame.DrawBottom = False
|
|
Frame.DrawLeft = False
|
|
Frame.DrawRight = False
|
|
Size.Values = (
|
|
39.6875
|
|
1240.89583333333
|
|
0
|
|
187.854166666667)
|
|
Alignment = taRightJustify
|
|
AlignToBand = False
|
|
AutoSize = False
|
|
AutoStretch = False
|
|
Color = clWhite
|
|
ResetAfterPrint = False
|
|
Transparent = False
|
|
WordWrap = True
|
|
Expression = '[Salary]'
|
|
FontSize = 8
|
|
end
|
|
end
|
|
end
|
|
end
|