2014-09-28

In Delphi XE7 first, go to Project, Options and and click Entitlements.  Set the AdMob to true

Also, click Uses Permissions and make sure Internet is checked

Next on your form drop a TBannerAd and make sure the parent is the form instead of some control.  You can use the Structure view to drag the TBannerAd to the Form instead of some control.

Set the TBannerAd Align to BottomMost

In my FormCreate I added:

Code:

BannerAd1.AdUnitID := 'ca-app-pub-yournumberassignedbyadmob';

In my FormShow I added:

Code:

BannerAd1.LoadAd;

I also opened AndroidManifest.template.xml in Delphi and added these lines above the receiver tag:

Code:

<meta-data android:name="com.google.android.gms.version" android:value="4323000" />

<activity android:name="com.google.android.gms.ads.AdActivity" android:configChanges="keyboard|keyboardHidden|orientation|screenLayout|uiMode|screenSize|smallestScree​nSize"/>

Show more