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

Comparing ibx/trunk/examples/ibtable/Unit1.lfm (file contents):
Revision 112 by tony, Thu Jan 18 14:37:55 2018 UTC vs.
Revision 118 by tony, Mon Jan 22 13:58:14 2018 UTC

# Line 148 | Line 148 | object Form1: TForm1
148      end
149    end
150    object IBDatabase1: TIBDatabase
151 <    Connected = True
151 >    Connected = False
152      AfterConnect = IBDatabase1AfterConnect
153      CreateIfNotExists = False
154      AllowStreamedConnected = False
# Line 172 | Line 172 | object Form1: TForm1
172        'rec_version'
173        'nowait'
174      )
175 <    left = 232
175 >    left = 272
176      top = 24
177    end
178    object Depts: TIBTable
# Line 189 | Line 189 | object Form1: TForm1
189      IndexFieldNames = 'DEPT_NO'
190      ReadOnly = True
191      TableName = 'DEPARTMENT'
192 <    left = 314
192 >    left = 424
193      top = 24
194      object DeptsDEPT_NO: TIBStringField
195        DisplayWidth = 3
# Line 273 | Line 273 | object Form1: TForm1
273    end
274    object DataSource2: TDataSource
275      DataSet = Depts
276 <    left = 272
276 >    left = 360
277      top = 24
278    end
279    object Datasource1: TDataSource
280      DataSet = Employees
281 <    left = 368
281 >    left = 496
282      top = 24
283    end
284    object Employees: TIBTable
# Line 296 | Line 296 | object Form1: TForm1
296      MasterFields = 'DEPT_NO'
297      MasterSource = DataSource2
298      TableName = 'EMPLOYEE'
299 <    left = 416
299 >    left = 576
300      top = 24
301      object EmployeesEMP_NO: TSmallintField
302        DisplayWidth = 10

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines