procedure dialog_OnShow(Sender: Integer); begin if CurrentUserHasPermission(53000) then begin //User hat Berechtigung netDBEdit1.Visible := true; end else begin //User hat Berechtigung NICHT netDBEdit1.Visible := false; end; end;