home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Anthology
/
aDELPHI.iso
/
Runimage
/
Delphi50
/
Demos
/
Quickrpt
/
Qr3
/
history.dfm
/
history.txt
Wrap
Text File
|
1999-08-11
|
4KB
|
166 lines
object frmHistory: TfrmHistory
Left = 192
Top = 107
Width = 696
Height = 480
Caption = 'frmHistory'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object QuickRep1: TQuickRep
Left = 16
Top = 0
Width = 816
Height = 1056
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Description.Strings = (
'A simple report to display the version history for the QR3DEMO')
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Functions.Strings = (
'PAGENUMBER'
'COLUMNNUMBER'
'REPORTTITLE')
Functions.DATA = (
'0'
'0'
#39#39)
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = Letter
Page.Values = (
127.000000000000000000
2794.000000000000000000
127.000000000000000000
2159.000000000000000000
127.000000000000000000
127.000000000000000000
0.000000000000000000)
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = Auto
PrintIfEmpty = True
ReportTitle = 'Demo History Report'
SnapToGrid = True
Units = Inches
Zoom = 100
object DetailBand1: TQRBand
Left = 48
Top = 88
Width = 720
Height = 20
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 = (
52.916666666666670000
1905.000000000000000000)
BandType = rbDetail
object QRMemo1: TQRMemo
Left = 0
Top = 0
Width = 601
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
0.000000000000000000
0.000000000000000000
1590.145833333333000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = True
Color = clWhite
Lines.Strings = (
'Version 3.1.0'
' Modified to work with QuickReport 3 Standard'
'Version 3.0.5'
' Added version history report'
' Added Grouping and Subtotaling report'
' Augmented the OnNeedData example to update the preview'#39's prog' +
'ress indicator')
Transparent = False
WordWrap = True
FontSize = 10
end
end
object PageHeaderBand1: TQRBand
Left = 48
Top = 48
Width = 720
Height = 40
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -27
Font.Name = 'Arial'
Font.Style = [fsBold]
ForceNewColumn = False
ForceNewPage = False
ParentFont = False
Size.Values = (
105.833333333333300000
1905.000000000000000000)
BandType = rbPageHeader
object QRSysData1: TQRSysData
Left = 277
Top = 0
Width = 165
Height = 33
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
87.312500000000000000
732.895833333333300000
0.000000000000000000
436.562500000000000000)
Alignment = taCenter
AlignToBand = True
AutoSize = True
Color = clWhite
Data = qrsReportTitle
Transparent = False
FontSize = 20
end
end
end
end