procedure TForm4.FormCreate(Sender: TObject);
begin
UniConnection1.Open;
UniConnection1.ConnectString:='Provider Name=SQL Server;Data Source=192.168.20.2;Initial Catalog=ITPROCESS;Port=0;User ID=it;Password=123456';
TblGroups.Active:=true;
TblGroupMembers.Active:=true;
TblGroupAccess.Active:=true;
TblPermissions.Active:=true;
TblUserAccess.Active:=true;
TblUser.Active:=true;
end;
    procedure TForm4.Button2Click(Sender: TObject);
begin
 uilSecurityDlg1.Execute;
end;