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

Comparing ibx/trunk/examples/local-employeedb/unit1.pas (file contents):
Revision 380 by tony, Mon Jan 10 10:13:17 2022 UTC vs.
Revision 410 by tony, Thu Jun 22 13:52:39 2023 UTC

# Line 264 | Line 264 | procedure TForm1.Reopen(Data: PtrInt);
264   begin
265    with IBTransaction1 do
266      if not InTransaction then StartTransaction;
267  Countries.Active := true;
267    Employees.Active := true;
268 +  Countries.Active := true;
269    JobCodes.Active := true;
270    Depts.Active := true;
271   end;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines