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

Comparing ibx/trunk/examples/employee/unit1.pas (file contents):
Revision 106 by tony, Wed Aug 23 08:23:42 2017 UTC vs.
Revision 107 by tony, Thu Jan 18 14:37:40 2018 UTC

# Line 99 | Line 99 | type
99      EmployeeSource: TDataSource;
100      IBDatabase1: TIBDatabase;
101      IBTransaction1: TIBTransaction;
102    procedure EmployeesAfterPost(DataSet: TDataSet);
102      procedure EmployeesValidatePost(Sender: TObject; var CancelPost: boolean);
103      procedure JobCodeChangeTimerTimer(Sender: TObject);
104      procedure JobGradeChangeTimerTimer(Sender: TObject);
# Line 230 | Line 229 | begin
229    end;
230   end;
231  
233 procedure TForm1.EmployeesAfterPost(DataSet: TDataSet);
234 begin
235  Employees.Refresh
236 end;
237
232   procedure TForm1.EmployeesValidatePost(Sender: TObject; var CancelPost: boolean
233    );
234   begin

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines