Attempt to fix an 64bit-only access violation

This commit is contained in:
Ansgar Becker
2013-11-13 18:48:55 +00:00
parent caa7aec84c
commit c8e5121b66

View File

@ -609,6 +609,7 @@ begin
PCol.OrgPrivs.Add(rxTemp.Match[1]);
PCol.GrantCode := PCol.GrantCode + rxTemp.Match[1] + ' ('+Trim(Cols[j])+')' + ', ';
end;
Cols.Free;
end;
if not rxTemp.ExecNext then
@ -702,7 +703,6 @@ begin
FreeAndNil(Grants);
FreeAndNil(CloneGrants);
FreeAndNil(AllPnames);
FreeAndNil(Cols);
end;
// Populate privilege tree