File: cbunit.lfm

package info (click to toggle)
lazarus 2.0.0%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 214,460 kB
  • sloc: pascal: 1,862,622; xml: 265,709; cpp: 56,595; sh: 3,008; java: 609; makefile: 535; perl: 297; sql: 222; ansic: 137
file content (77 lines) | stat: -rw-r--r-- 1,545 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
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