全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2730
推到 Plurk!
推到 Facebook!

XE5 使用 Android 內定的方法

 
cuteman0725
一般會員


發表:7
回覆:6
積分:2
註冊:2007-09-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2013-09-17 09:59:59 IP:125.227.xxx.xxx 訂閱
 斷斷續續的摸了幾天。

發現了 c:\Program Files (x86)\Embarcadero\RAD Studio\12.0\source\rtl\android\ 路徑

然後稍微試了一下

如果 uses FMX.Platform.Android 這個 unit


結束 Android 程式,相當於 Application.Terminate
procedure TForm1.Button1Click(Sender: TObject);
begin
MainActivity.finish;
end;

將 Activity 移到後面,相當於 Form1.Hide;
procedure TForm1.Button2Click(Sender: TObject);
begin
MainActivity.moveTaskToBack(true)
end;

如果 uses Androidapi.JNI.GraphicsContentViewText 這個 unit

回到主畫面
procedure TForm1.Button3Click(Sender: TObject);
var
Intent: JIntent;
begin
Intent:= TJIntent.Create;
Intent.setAction(TJIntent.JavaClass.ACTION_MAIN);
Intent.addCategory(TJIntent.JavaClass.CATEGORY_HOME);
Intent.setFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK);
MainActivity.startActivity(Intent);
end;


挺好玩的,晚上再來試試看有沒有打電話和發簡訊的功能

編輯記錄
cuteman0725 重新編輯於 2013-09-17 10:29:59, 註解 無‧
leveon
資深會員


發表:30
回覆:389
積分:303
註冊:2012-02-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2013-09-17 13:51:27 IP:111.240.xxx.xxx 訂閱
上一篇還在想XE5要如何處理intent
這一篇就看到了 原來已經包裝成JIntent
感謝分享
再問一下 Intent是沒有Free 還是不能Free?


===================引 用 cuteman0725 文 章===================
斷斷續續的摸了幾天。

發現了 c:\Program Files (x86)\Embarcadero\RAD Studio\12.0\source\rtl\android\ 路徑

然後稍微試了一下

如果 uses FMX.Platform.Android 這個 unit


結束 Android 程式,相當於 Application.Terminate
procedure TForm1.Button1Click(Sender: TObject);
begin
MainActivity.finish;
end;

將 Activity 移到後面,相當於 Form1.Hide;
procedure TForm1.Button2Click(Sender: TObject);
begin
MainActivity.moveTaskToBack(true)
end;

如果 uses Androidapi.JNI.GraphicsContentViewText 這個 unit

回到主畫面
procedure TForm1.Button3Click(Sender: TObject);
var
Intent: JIntent;
begin
Intent:= TJIntent.Create;
Intent.setAction(TJIntent.JavaClass.ACTION_MAIN);
Intent.addCategory(TJIntent.JavaClass.CATEGORY_HOME);
Intent.setFlags(TJIntent.JavaClass.FLAG_ACTIVITY_NEW_TASK);
MainActivity.startActivity(Intent);
end;


挺好玩的,晚上再來試試看有沒有打電話和發簡訊的功能

cuteman0725
一般會員


發表:7
回覆:6
積分:2
註冊:2007-09-27

發送簡訊給我
#3 引用回覆 回覆 發表時間:2013-09-17 15:15:02 IP:125.227.xxx.xxx 訂閱
JIntent 是個 Interface 。
所以沒有 Free 這個方法。

一切都交給 Android OS 處理。

===================引 用 leveon 文 章===================
上一篇還在想XE5要如何處理intent
這一篇就看到了 原來已經包裝成JIntent
感謝分享
再問一下 Intent是沒有Free 還是不能Free?



test28
一般會員


發表:28
回覆:28
積分:16
註冊:2013-08-26

發送簡訊給我
#4 引用回覆 回覆 發表時間:2013-09-18 10:52:04 IP:101.9.xxx.xxx 未訂閱
XE5要如何處理Uri(Universal Resource Identifier)?
謝謝分享
系統時間:2024-04-20 4:36:28
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!