So sperren Sie die Ausrichtung zur Laufzeit

Gibt es eine Möglichkeit, die Ausrichtung zur Laufzeit zu sperren? Zum Beispiel möchte ich dem Benutzer erlauben, den Bildschirm für Querformat zu sperren, wenn sich der Benutzer gerade im Querformat befindet, und die Menüoption umschalten.