mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-13 12:09:21 +02:00
78 lines
1.5 KiB
Plaintext
78 lines
1.5 KiB
Plaintext
object Form1: TForm1
|
|
Left = 301
|
|
Height = 151
|
|
Top = 162
|
|
Width = 685
|
|
HorzScrollBar.Page = 684
|
|
VertScrollBar.Page = 150
|
|
ActiveControl = DBGrid1
|
|
Caption = 'LazReport BarCode Demo'
|
|
ClientHeight = 151
|
|
ClientWidth = 685
|
|
OnCreate = FormCreate
|
|
Position = poDesktopCenter
|
|
LCLVersion = '0.9.31'
|
|
object DBGrid1: TDBGrid
|
|
Left = 8
|
|
Height = 100
|
|
Top = 40
|
|
Width = 632
|
|
Color = clWindow
|
|
Columns = <>
|
|
DataSource = Datasource1
|
|
TabOrder = 0
|
|
end
|
|
object Button1: TButton
|
|
Left = 456
|
|
Height = 25
|
|
Top = 8
|
|
Width = 75
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'DesignReport'
|
|
OnClick = Button1Click
|
|
TabOrder = 1
|
|
end
|
|
object Button2: TButton
|
|
Left = 544
|
|
Height = 25
|
|
Top = 8
|
|
Width = 75
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'ShowReport'
|
|
OnClick = Button2Click
|
|
TabOrder = 2
|
|
end
|
|
object Dbf1: TDbf
|
|
IndexDefs = <>
|
|
TableName = 'disco.dbf'
|
|
TableLevel = 3
|
|
FilterOptions = []
|
|
end
|
|
object Datasource1: TDatasource
|
|
DataSet = Dbf1
|
|
top = 32
|
|
end
|
|
object frDBDataSet1: TfrDBDataSet
|
|
DataSet = Dbf1
|
|
top = 96
|
|
end
|
|
object frReport1: TfrReport
|
|
Dataset = frDBDataSet1
|
|
InitialZoom = pzDefault
|
|
Options = []
|
|
PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbHelp, pbExit]
|
|
DataType = dtDataSet
|
|
top = 124
|
|
ReportForm = {
|
|
19000000
|
|
}
|
|
end
|
|
object frBarCodeObject1: TfrBarCodeObject
|
|
top = 124
|
|
end
|
|
object OpenDialog1: TOpenDialog
|
|
FilterIndex = 0
|
|
top = 64
|
|
end
|
|
end
|