home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Kompuutteri Kaikille K-CD 2000 #13
/
K-CD-2000-13.iso
/
BogFi
/
_SETUP.1
/
Bog.exe
/
0
/
RCDATA
/
TQRLISTFORM
/
TQRLISTFORM.txt
Wrap
Text File
|
2000-08-17
|
16KB
|
660 lines
object QRListForm: TQRListForm
Left = -239
Top = 0
Width = 794
Height = 1123
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = Form1.BogDataSet
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Options = [LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = A4
Page.Values = (
100.000000000000000000
2970.000000000000000000
100.000000000000000000
2100.000000000000000000
70.000000000000000000
50.000000000000000000
0.000000000000000000)
PrintIfEmpty = False
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = First
ReportTitle = 'Bogsamling'
SnapToGrid = True
Units = MM
Zoom = 100
object DetailBand1: TQRBand
Left = 26
Top = 124
Width = 749
Height = 24
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = True
Frame.DrawLeft = True
Frame.DrawRight = True
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
63.500000000000000000
1981.729166666667000000)
BandType = rbDetail
object QRDBText1: TQRDBText
Left = 8
Top = 4
Width = 169
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
10.583333333333330000
447.145833333333400000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Titel'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText2: TQRDBText
Left = 180
Top = 4
Width = 146
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
476.250000000000000000
10.583333333333330000
386.291666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Forfatter'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText3: TQRDBText
Left = 329
Top = 4
Width = 72
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
870.479166666666700000
10.583333333333330000
190.500000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Placering'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText4: TQRDBText
Left = 406
Top = 4
Width = 105
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1074.208333333333000000
10.583333333333330000
277.812500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Genre'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText5: TQRDBText
Left = 515
Top = 4
Width = 89
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1362.604166666667000000
10.583333333333330000
235.479166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'ISBN'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText6: TQRDBText
Left = 609
Top = 4
Width = 62
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1611.312500000000000000
10.583333333333330000
164.041666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Dato'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText7: TQRDBText
Left = 676
Top = 4
Width = 69
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1788.583333333333000000
10.583333333333330000
182.562500000000000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = Form1.BogDataSet
DataField = 'Pris'
Transparent = False
WordWrap = True
FontSize = 10
end
end
object PageFooterBand1: TQRBand
Left = 26
Top = 148
Width = 749
Height = 24
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 = (
63.500000000000000000
1981.729166666667000000)
BandType = rbPageFooter
object QRSysData2: TQRSysData
Left = 673
Top = 4
Width = 76
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1780.645833333333000000
10.583333333333330000
201.083333333333300000)
Alignment = taRightJustify
AlignToBand = True
AutoSize = False
Color = clWhite
Data = qrsPageNumber
Text = 'Side '
Transparent = False
FontSize = 10
end
object QRExpr1: TQRExpr
Left = 112
Top = 4
Width = 35
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
296.333333333333400000
10.583333333333330000
92.604166666666670000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'Count'
FontSize = 10
end
object QRLabel9: TQRLabel
Left = 8
Top = 4
Width = 100
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
10.583333333333330000
264.583333333333400000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Antal b�ger i alt: '
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel10: TQRLabel
Left = 329
Top = 3
Width = 26
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
870.479166666666700000
7.937500000000000000
68.791666666666670000)
Alignment = taCenter
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'I alt '
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRExpr2: TQRExpr
Left = 360
Top = 3
Width = 61
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
952.500000000000000000
7.937500000000000000
161.395833333333300000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'SUM(Pris)'
Mask = 'Kr ###,##0.00'
FontSize = 10
end
end
object TitleBand1: TQRBand
Left = 26
Top = 38
Width = 749
Height = 63
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 = (
166.687500000000000000
1981.729166666667000000)
BandType = rbTitle
object QRSysData1: TQRSysData
Left = 292
Top = 4
Width = 165
Height = 33
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
87.312500000000000000
772.583333333333400000
10.583333333333330000
436.562499999999900000)
Alignment = taCenter
AlignToBand = True
AutoSize = True
Color = clWhite
Data = qrsReportTitle
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -27
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
FontSize = 20
end
object QRLabel8: TQRLabel
Left = 338
Top = 40
Width = 72
Height = 19
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
50.270833333333330000
894.291666666666700000
105.833333333333300000
190.500000000000000000)
Alignment = taCenter
AlignToBand = True
AutoSize = True
AutoStretch = False
Caption = 'QRLabel8'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 12
end
end
object ColumnHeaderBand1: TQRBand
Left = 26
Top = 101
Width = 749
Height = 23
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = True
Frame.DrawLeft = True
Frame.DrawRight = True
AlignToBottom = False
Color = clSilver
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
60.854166666666680000
1981.729166666667000000)
BandType = rbColumnHeader
object QRLabel1: TQRLabel
Left = 8
Top = 2
Width = 169
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
5.291666666666667000
447.145833333333400000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Bogtitel'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel2: TQRLabel
Left = 180
Top = 2
Width = 144
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
476.250000000000000000
5.291666666666667000
381.000000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Forfatter'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel3: TQRLabel
Left = 329
Top = 2
Width = 72
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
870.479166666666700000
5.291666666666667000
190.500000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Placering'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel4: TQRLabel
Left = 406
Top = 2
Width = 106
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1074.208333333333000000
5.291666666666667000
280.458333333333400000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Genre'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel5: TQRLabel
Left = 515
Top = 2
Width = 90
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1362.604166666667000000
5.291666666666667000
238.125000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'ISBN'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel6: TQRLabel
Left = 609
Top = 2
Width = 63
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1611.312500000000000000
5.291666666666667000
166.687500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Dato'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
object QRLabel7: TQRLabel
Left = 676
Top = 2
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1788.583333333333000000
5.291666666666667000
171.979166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Caption = 'Pris'
Color = clWhite
Transparent = True
WordWrap = True
FontSize = 10
end
end
end