I have this class :
UIViewController = interface(UIResponder)
[‘{F7A5E372-3F4A-4F25-A2F9-C91D7CB5FC09}’]
….
function supportedInterfaceOrientations: NSUInteger; cdecl;
….
end;
TUIViewController = class(TOCGenericImport<UIViewControllerClass, UIViewController>) end;
And i need to override the function supportedInterfaceOrientations. Something like this under xcode :
class NavigationController: UIViewController {
override var supportedInterfaceOrientations: UIInterfaceOrientationMask {
return .portrait
}
}
How to do this under delphi tokyo ?