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

Comparing ibx/trunk/examples/DBAdmin/DataModule.pas (file contents):
Revision 209 by tony, Wed Mar 14 12:48:51 2018 UTC vs.
Revision 210 by tony, Wed Mar 14 15:03:38 2018 UTC

# Line 153 | Line 153 | type
153      procedure IBXServicesConnection1Login(Service: TIBXServicesConnection;
154        var aServerName: string; LoginParams: TStrings);
155      procedure LegacyUserListAfterOpen(DataSet: TDataSet);
156 +    procedure LegacyUserListAfterPost(DataSet: TDataSet);
157      procedure LegacyUserListBeforeClose(DataSet: TDataSet);
158      procedure ShadowFilesCalcFields(DataSet: TDataSet);
159      procedure SubjectAccessRightsBeforeOpen(DataSet: TDataSet);
# Line 1234 | Line 1235 | begin
1235    RoleNameList.Active := true;
1236   end;
1237  
1238 + procedure TDatabaseData.LegacyUserListAfterPost(DataSet: TDataSet);
1239 + begin
1240 +  RoleNameList.Active := true;
1241 + end;
1242 +
1243   procedure TDatabaseData.LegacyUserListBeforeClose(DataSet: TDataSet);
1244   begin
1245    RoleNameList.Active := false;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines