Java İle Android Program Tetikleme

[Halil Han BADEM]

Herkese selamlar,

Bu makalemde sizlere Java ile uygulamanızı nasıl tetikleyeceğinizi anlatacağım. Rus bir eleman sağolsun(Rusçada olsa resimlerden falan anlamaya çalıştım) makalesinden yapmış olduğu aşamaları sizinle de paylaşmak istedim. 

İlk olarak mantığını anlamak gerekirse bir Java dosyası derlemesi yapacağız ve Delphi IDE'si aracılığı ile library bölümüne ekleyeceğiz. Sonrasında bu dosyayı tetikleyerek, uygulamamızın açılmasını sağlayacağız.

  1. Aşama: Java Derleme

 Bu aşamada bir klasör oluşturarak daha rahat çalışmanızı tavsiye ediyorum. Notepad uygulamasını(veya başka bir düzenleme programı. Ben EditPlus3 kullanıyorum.) açararak aşağıda ki Java derleme kodlarınız yazıyoruz.

@echo off
setlocal

if x%ANDROID% == x set ANDROID=E:\Program Files (x86)\Embarcadero\Studio\19.0\PlatformSDKs\android-sdk-windows
set ANDROID_PLATFORM=%ANDROID%\platforms\android-27
set PROJ_DIR=%CD%
set VERBOSE=0

echo.
echo Compiling the Java service activity source files
echo.
mkdir output 2> nul
mkdir output\classes 2> nul
if x%VERBOSE% == x1 SET VERBOSE_FLAG=-verbose
javac -source 1.7 -target 1.7 %VERBOSE_FLAG% -Xlint:deprecation -cp %ANDROID_PLATFORM%\android.jar -d output\classes src\com\ServiceExample\ServisExample.java

echo.
echo Creating jar containing the new classes
echo.
mkdir output\jar 2> nul
if x%VERBOSE% == x1 SET VERBOSE_FLAG=v
jar c%VERBOSE_FLAG%f output\jar\ServisExample.jar -C output\classes com

echo.
echo Now we have the end result, which is output\jar\ServisExample.jar

:Exit

pause

endlocal

Önemli Not: Belirtilmiş olan olan SDK ve Java yollarını kendinize göre ayarlamanız gerekmektedir. Şu anda benim standart olarak kullanmış olduğum yerler mevcut.

İpucu: Kısayoldan "Delphi IDE> Tools> Options> SDK Manager" bölümünden tanımlı yolları bulabilirsiniz. 

 Önemli Not: Java derlemesi için gerekli komutları tanımlamanız gerekmektedir. "Bilgisayar> Özellikler> Gelişmiş> Ortam Değişkenleri" yolunu takip ederek, "Path" bölümünü düzenlemeniz gerekmektedir. Aşağıdaki resimde göründüğü gibi Java/bin klasörünü tanımlıyorsunuz. Unutmayın ki; her yol belirtilişinde ";" kullanılmaktadır.

"Build" olayını hallettiğimize göre artık gerekli dosyaları oluşturabiliriz. "Build" kodunda belirtlien "src\com\ServiceExample\ServisExample.java" yoluna göre klasör açalım(İsteğe bağlı olarak kısaltılıp, değiştirilebilir.). En son klasörün içine ".java" uzantılı bir dosya ekleyelim(Herhangi bir editör ile). Java dosyamızın içeriği aşağıda bulunmaktadır.

package com.ServiceExample;
 
import android.content.BroadcastReceiver;
import android.content.Context;
import android.content.Intent;

public class ServisExample extends BroadcastReceiver {
   public void onReceive(Context context, Intent intent) {
           Intent TestLauncher = new Intent();
           TestLauncher.setClassName(context, "com.embarcadero.firemonkey.FMXNativeActivity");
           TestLauncher.setFlags(Intent.FLAG_ACTIVITY_NEW_TASK);
           context.startActivity(TestLauncher);
   }
}

 Burada bir "Intent" oluşturulup TestLauncher olarak tanımlanıyor. Sonrasında FLAG_ACTIVITY_NEW_TASK ile yeni bir işlem(uygulamamızın açılması için) oluşturup. Context.StartActivity komutu ile TestLauncher tanımlı uygulamayı tetikliyor. 

 Önemli Not: Belirtlien Class ismine dikkat etmeniz gerekmekte şu anda "ServisExample" olarak tanımlı. Bu tanımı Delphi'de çağırma işleminde kullanacağız.

Bu işlemlerin ardından artık "Build.bat" dosyamızı çalıştırmamız da bir sorun yok. Dosya çalıştıktan sonra; otomatik oluşan "output\jar" yolunda Delphi'de kullanacağımız Java kütüphanesi oluşmuş olarak görmeniz gerekmektedir.

  Java kısmı biter   


 2. Aşama: Delphi Kısmı
 
Delphi'yi açarak işlemlerimize başlayalım. Hemen bir Android uygulama oluşturup, formumuzun içine bir tane buton ekleyelim. 



"Project Manager> TargetPlatforms> Android - Android SDK xx> Libraries" yolunu izleyerek, oluşturmuş olduğumuz ".jar" dosyasını projemize ekliyoruz. Bu aşamalardan sonra yapmamız gereken küçük bir değişiklik olacak. Projemizi bir "Build" edelim. Proje klasörüne gittiğimizde bir dosya göreceksiniz; "AndroidManifest.template.xml" adlı dosyayı editör ile açıp gerekli düzenlemeleri yapın.



 Önemli Not: Resim göründüğü bölümde Java kodumuzu yazarken kullanmış olduğum(ilk satırda ki koddan bahsediyorum) "package com.ServiceExample" kodu ile Class olarak tanımladığımız "ServisExample" isimlerini birleştirerek Class yapımızı tanımlıyoruz. 

bkz. (Birleşimi; com.ServiceExample.ServisExample).

  Devam edelim...

Şimdi ise Android sistemin takvim metodunu kullanarak, fonksiyonumuzu oluşturuyoruz ki mili saniyeyi, saniyeye çevirebilelim.

function getTimeAfterInSecs(Seconds: Integer): Int64;
var
 Calendar: JCalendar;
begin
 Calendar := TJCalendar.JavaClass.getInstance;
 Calendar.add(TJCalendar.JavaClass.SECOND, Seconds);
 Result := Calendar.getTimeInMillis;
end;

 Bu fonksiyonumuzu ekledikten sonra artık rahatça kodumuzu yazabiliriz.

procedure TfrmMain.Button1Click(Sender: TObject);
var
 Intent: JIntent;
 PendingIntent: JPendingIntent;
begin
 Intent := TJIntent.Create;
 Intent.setClassName(TAndroidHelper.Context, StringToJString('com.embarcadero.firemonkey.FMXNativeActivity'));
 PendingIntent := TJPendingIntent.JavaClass.getActivity(TAndroidHelper.Context, 1, Intent, 0);
 TAndroidHelper.AlarmManager.&set(TJAlarmManager.JavaClass.RTC_WAKEUP, getTimeAfterInSecs(10),
   PendingIntent);
end;

Prosedürü açıklayacak olursam; bu prosedür ile biz yazmış olduğumuz Java dosyamızda ki kodu time ile tetikleyip, RTC_WAKEUP ile çalıştırıyoruz. Java dosyamızda "Intent" ile işlem yaptığımız için Delphi ile de "Intent" yapısını kullanarak bir nevi iletişime geçmesini sağlıyoruz. StringToJString ile Class ismini alıyor ve işimize bakıyoruz. "getTimeAfterInSecs(10)" kodu ile 10 saniye sonra programımızın açılmasını istediğimizi bildiriyoruz. Sonrasında ise işlemlerimiz tamam...

Bu makale bir servis niteliği taşımaz. Sadece tetikleme niteliği taşır ve bu işlemler ile programınızı "RECEIVE_BOOT_COMPLETED" iznini ve "BOOT_COMPLETED" eylemini yakalayarak işleminizi gerçekleştirebilirsiniz.

Bu araştırma için yaklaşık 5 günlük bir zaman harcadım. Bu araştırmalarımda bana yardımcı olan;

Uğur PARLAYAN (Çeviri için) 

Fesih ARSLAN (İpin ucunu elime verdiği için) 

gonulali (Kaynak yardımı için) 

   Teşekkür ederim...

Şimdi biraz bu olay hakkında konuşmaya gelirsek. Delphi'nin bu konu hakkında biraz yetersiz kaldığını düşünüyorum çünkü herhangi bir dilden yardım almadan bağımsız olarak (en azından bu kadar uğraştırmadan) olayı halletmesi gerekirdi. Yani birkaç sürüme artık bu olaya el atması gerek çünkü önemli konulardan bir tanesi. 

Umarım bu makale ile umarım yardımcı olabilmişimdir. Ben aşağıya yine de incelemeniz bakımından bırakayım.

Kaynak Dosyalar | GitHub


  Destek için GitHub üzerinden projeyi yıldızlayabilir ve REP puanı ile süsleyebilirsiniz. 




Yaralandığım Kaynaklar:

DelphiFMAndroid
Blog.Blong


Saygılarımla,
İyi çalışmalar.

[Fesih ARSLAN]

Merhaba,
DelphiCan'a bu değerli kaynağı kazandırdığınız için teşekkür ederiz. Beş günlük emeğiniz, bu işlemi yapmak isteyen bir DelphiCan'a 5 gün kazandıracak demektir.  

(17-02-2018, Saat: 22:55)hyperxman Adlı Kullanıcıdan Alıntı: ...
Şimdi biraz bu olay hakkında konuşmaya gelirsek. Delphi'nin bu konu hakkında biraz yetersiz kaldığını düşünüyorum çünkü herhangi bir dilden yardım almadan bağımsız olarak (en azından bu kadar uğraştırmadan) olayı halletmesi gerekirdi. Yani birkaç sürüme artık bu olaya el atması gerek çünkü önemli konulardan bir tanesi. 

Aslında yaptığınız işlem adımlarına bakarsanız, Delphi'nin çok doğru bir yöntem izlediğini görürsünüz. Android platformunun altında Library kısmının olması; tüm derlemiş java kodlarının tıpkı bir API gibi kullanabileceği manasına geliyor. Delphi içerisinde tüm java kodları veya metodları olamaz, ama tüm derlemiş java kodları kullanılabilir. Bundan daha iyisi olamaz bence.
Aslında Delphi bu durumu diğer platformlar içinde uygulamıştır. Platforma özgü API veya içerdiği metod bir Unit içerisinde platform kütüphanesine (dll, dylib, so, a vb.) referanslıdır.

[Halil Han BADEM]

(17-02-2018, Saat: 23:26)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Merhaba,
DelphiCan'a bu değerli kaynağı kazandırdığınız için teşekkür ederiz. Beş günlük emeğiniz, bu işlemi yapmak isteyen bir DelphiCan'a 5 gün kazandıracak demektir.  

(17-02-2018, Saat: 22:55)hyperxman Adlı Kullanıcıdan Alıntı: ...
Şimdi biraz bu olay hakkında konuşmaya gelirsek. Delphi'nin bu konu hakkında biraz yetersiz kaldığını düşünüyorum çünkü herhangi bir dilden yardım almadan bağımsız olarak (en azından bu kadar uğraştırmadan) olayı halletmesi gerekirdi. Yani birkaç sürüme artık bu olaya el atması gerek çünkü önemli konulardan bir tanesi. 

Aslında yaptığımız işlem adımlarına bakarsanız, Delphi'nin çok doğru bir yöntem izlediğini görürsünüz. Android platformunun altında Library kısmının olması; tüm derlemiş java kodlarının tıpkı bir API gibi kullanabileceği manasına geliyor. Delphi içerisinde tüm java kodları veya metodları olamaz, ama tüm derlemiş java kodları kullanılabilir. Bundan daha iyisi olamaz bence.
Aslında Delphi bu durumu diğer platformlar içinde uygulamıştır. Platforma özgü API veya içerdiği metod bir Unit içerisinde platform kütüphanesine (dll, dylib, so, a vb.) referanslıdır.

 Hocam haklısınız ama en azından derleme(build.bat) aşamasında ki kodlar, java içine yazılan class için bir kısayol sunabilir veya kendi resmi sitesinde bunun makalesine yayınlayabilir. Rusça zor bir dil 

[Fesih ARSLAN]

Aslında Delphi XE7'den beri Java kodunu Object Pascal koduna dönüştüren bir araç (Java2OP) sunmuştu.
Anladığım kadarıyla, bu işe (platform kodlarının entegrasyonundaki güçlük ve hammaliyeden dolayı) çok da bulaşmak istemiyor.

[Halil Han BADEM]

(17-02-2018, Saat: 23:37)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Aslında Delphi XE7'den beri Java kodunu Object Pascal koduna dönüştüren bir araç (Java2OP) sunmuştu.
Anladığım kadarıyla, bu işe (platform kodlarının entegrasyonundaki güçlük ve hammaliyeden dolayı) çok da bulaşmak istemiyor.

Yine Delphi'nin bir tanıtım faciasına denk gelmişim. Birçok makale okumama rağmen bu konuda böyle bir aracın olduğu söylenmedi. Teşekkürler üstat bilgi için

[Fesih ARSLAN]

(17-02-2018, Saat: 23:42)hyperxman Adlı Kullanıcıdan Alıntı:

(17-02-2018, Saat: 23:37)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Aslında Delphi XE7'den beri Java kodunu Object Pascal koduna dönüştüren bir araç (Java2OP) sunmuştu.
Anladığım kadarıyla, bu işe (platform kodlarının entegrasyonundaki güçlük ve hammaliyeden dolayı) çok da bulaşmak istemiyor.

Yine Delphi'nin bir tanıtım faciasına denk gelmişim. Birçok makale okumama rağmen bu konuda böyle bir aracın olduğu söylenmedi. Teşekkürler üstat bilgi için

Rica ederim. Sana verdiğimiz bilgiler bize misliyle geri dönüyor. Emek ve desteklerin için tekrar teşekkürler.

[Halil Han BADEM]

(18-02-2018, Saat: 00:31)Fesih ARSLAN Adlı Kullanıcıdan Alıntı:

(17-02-2018, Saat: 23:42)hyperxman Adlı Kullanıcıdan Alıntı: Yine Delphi'nin bir tanıtım faciasına denk gelmişim. Birçok makale okumama rağmen bu konuda böyle bir aracın olduğu söylenmedi. Teşekkürler üstat bilgi için

Rica ederim. Sana verdiğimiz bilgiler bize misliyle geri dönüyor. Emek ve desteklerin için tekrar teşekkürler.

 Ben teşekkür ederim hocam, bana sağlamış olduğunuz desteklerden ötürü