Sub SetUIDelegate (W As WKWebView)
Dim NaObj As NativeObject = W
NaObj.SetField("UIDelegate",Me)
End Sub
#If Objc
- (void)webView:(WKWebView *)webView runJavaScriptAlertPanelWithMessage:(NSString *)message initiatedByFrame:(WKFrameInfo *)frame completionHandler:(void (^)(void))completionHandler
{
UIAlertController *alertController = [UIAlertController alertControllerWithTitle:message
message:nil
preferredStyle:UIAlertControllerStyleAlert];
[alertController addAction:[UIAlertAction actionWithTitle:@"OK"
style:UIAlertActionStyleCancel
handler:^(UIAlertAction *action) {
completionHandler();
}]];
[__page1.object presentViewController:alertController animated:YES completion:^{}];
}
#End If