Como Usar AdMob em um Aplicativo Android | Delphi

Inserindo Propagandas em seus Aplicativos Android feitos em Delphi com AdMob.

Neste tutorial estou usando o Delphi Xe7 Trial

Procedimento:

1. Crie uma conta no AdMob.
2. Adicione o componente TBannerAd no formulário e altere a propriedade Align para MostBottom ( mostra no final do form );
3. Com o projeto salvo e compilado, abra  na pasta do seu projeto o arquivo AndroidManifest.template.xml com o bloco de notas ou algum editor HTML.

Procure pelo comentário:

Our activity is a subclass of the built-in NativeActivity framework class. This will take care of integrating with our NDK code.

Adicione a linha abaixo antes do comentário:

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

Adicione logo após o </activity> na linha 32 do AndroidManifest.template.xml:

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

No evento OnShow do formulário adicione:

procedure TForm1.FormShow(Sender: TObject);
begin
 //Se BannerAD for igual então adicione o AdUnitID, carregue e exiba
 if BannerAd.AdUnitID = '' then
  begin
    BannerAd.AdUnitID := 'ca-app-pub/123456789xxxxxxxxxxx';
    BannerAd.LoadAd;
    BannerAd.Visible := True;
  end;
end;

Altere as permissões do projeto:

1. Vá no menu Projeto » Options… » Uses Permissions e marque para true: Access network state e Internet.
2. Vá no menu Projeto » Options » Entitlement List, e selecione AdMob Service. Defina seu valor para True.
3. Compile o aplicativo e ao instalar irá aparecer a propaganda conforme exemplo.

Exemplo: