Developer Sadettin Polat wrote in with a link to a demo he wrote which implements AdMob interstitials in Delphi XE5 Firemonkey. The demo is a good demonstration of using the Delphi Android JNI. In previous demos of using Admob with Delphi I’ve only seen banner ads demonstrated. One caveat is that Google Play may no longer be accepting applications with the original Admob SDK in them as of August 1st 2014. Google has a new Admob SDK which is part of the Google Play Services SDK. However, even if you can no longer use the SDK from this demo on Google Play it does give you a great starting point for converting it forward to the new Google Play Services Admob SDK. Google has a migration guide here that shows the differences between the two SDKs. Similar Android JNI code should work in Delphi XE6 and AppMethod. Here is a sample of the type section from the Admob interstitial demo:
type
TInterstitialAdListener = class(TJavaLocal, JAdListener)
public
FParent:TForm;
// constructor Create(aParent:TForm);
procedure onReceiveAd(ad: JAd); cdecl;
procedure onFailedToReceiveAd(ad: JAd; error: JAdRequest_ErrorCode); cdecl;
procedure onPresentScreen(ad: JAd); cdecl;
procedure onDismissScreen(ad: JAd); cdecl;
procedure onLeaveApplication(ad: JAd); cdecl;
end;
Head over and check out the full source code for the Admob SDK interstitial demo on Github before downloading it.
