ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/scriptengine/unit1.lfm
(Generate patch)

Comparing ibx/trunk/examples/scriptengine/unit1.lfm (file contents):
Revision 37 by tony, Mon Feb 15 14:44:25 2016 UTC vs.
Revision 45 by tony, Tue Dec 6 10:33:46 2016 UTC

# Line 7 | Line 7 | object Form1: TForm1
7    ClientHeight = 402
8    ClientWidth = 773
9    OnShow = FormShow
10 <  LCLVersion = '1.4.4.0'
10 >  LCLVersion = '1.6.0.4'
11    object Label1: TLabel
12      Left = 14
13      Height = 15
14      Top = 16
15 <    Width = 99
15 >    Width = 86
16      Caption = 'Database Name:'
17      ParentColor = False
18    end
# Line 20 | Line 20 | object Form1: TForm1
20      Left = 14
21      Height = 15
22      Top = 56
23 <    Width = 36
23 >    Width = 30
24      Caption = 'Script'
25      ParentColor = False
26    end
# Line 46 | Line 46 | object Form1: TForm1
46      TabOrder = 1
47    end
48    object Label3: TLabel
49 <    Left = 459
49 >    Left = 467
50      Height = 15
51      Top = 56
52 <    Width = 68
52 >    Width = 60
53      Anchors = [akTop, akRight]
54      Caption = 'Results Log'
55      ParentColor = False
# Line 87 | Line 87 | object Form1: TForm1
87      Left = 119
88      Height = 15
89      Top = 16
90 <    Width = 52
90 >    Width = 47
91      Caption = 'DBName'
92      ParentColor = False
93    end
94    object StopOnError: TCheckBox
95      Left = 104
96 <    Height = 22
96 >    Height = 19
97      Top = 375
98 <    Width = 136
98 >    Width = 116
99      Caption = 'Stop On First Error'
100      OnChange = StopOnErrorChange
101      TabOrder = 5
102    end
103    object EchoInput: TCheckBox
104      Left = 248
105 <    Height = 22
105 >    Height = 19
106      Top = 375
107 <    Width = 91
107 >    Width = 77
108      Caption = 'Echo Input'
109      OnChange = EchoInputChange
110      TabOrder = 6
111    end
112    object IBXScript1: TIBXScript
113      Database = IBDatabase1
114 +    IgnoreGrants = False
115      Transaction = IBTransaction1
116      GetParamValue = IBXScript1GetParamValue
117      OnOutputLog = IBXScript1LogProc
# Line 130 | Line 131 | object Form1: TForm1
131      )
132      IdleTimer = 0
133      TraceFlags = []
134 +    UseDefaultSystemCodePage = False
135      left = 24
136      top = 156
137    end

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines