ListBoxItem := TListBoxItem.Create(nil);
...
ListBox.AddObject(ListBoxItem);

ListBoxItem := TListBoxItem.Create(ListBox);

Position is not implemented in FireMonkey by ShowModal.

VCL ではアプリケーションのパスは Application.ExeName で取得していました。
FM では代わりに ParamStr(0) を使っていたのですが…

android の実機で試したところ ParamStr(0) は空文字でした？！
どうすればいいのでしょう？

まずは docwiki を見てみると、 TPath (System.IOUtils) を使ってプラットフォームに関わらずに、ホームパスなどを取得できるようです。
サポートされているターゲット_プラットフォームに適した標準の_RTL_パス関数 (docwiki)
これによると TPath.GetLibraryPath が、アプリケーションのパスだということのようですね。

DDMS を使ってファイルの配置状態を確認
DDMS は c:\ユーザ\パブリック\パブリックのドキュメント\RAD Studio\12.0\PlatformSDKs\adt-bundle-windows-x86-20130522\sdk\tools にあります。

android debug monitor
monitor.bat を使った方が良いみたいです。

追記

ちなみにアプリケーションファイル名は以下で取れる模様

JStringToString(TAndroidHelper.Context.getPackageCodePath())

ソースコードをモバイルコンパイラに対応しようとして s[1] を s.Chars[0] という具合に書き換えていたときのことです。
下記のようなコンパイルエラーが発生しました。
これは何でしょう？

[dcc32 エラー] xxxxx.pas(56): E2018 レコード，オブジェクトまたはクラスのいずれかが必要です

一瞬何が起きたのかよくわかりませんでしたが、よく考えてみれば簡単なことでした。
.Chars[] 構文は TStringHelper によって実現されており、TStringHelper は System.SysUtils で定義されています。
つまり、System.SysUtils を Uses していなかったからこのエラーが出てしまったという訳でした。

[関連記事]

Delphi 過去ソースからモバイルへポーティング(文字列処理2)

過去のプログラムから、モバイルアプリケーションへポーティングをする際の文字列処理の問題。 文字列へのインデックスアクセスはどのように変えましょうか。

文字列へのインデックスアクセス

文字列にインデックスでアクセスするのはとてもよく使います。
インデックスが 1から始まっていたものが 0始まりに変わるということですが、デスクトップコンパイラは 1始まりのままですから、両方に対応するように書かなければなりません。
以下のようなコードを書き換えるには、大きく二通りの方法がありそうです。

var
  i: Integer;
  S: String;
begin
  for i := 1 To Length(S) do begin
    S[i];
  end;
end;

Low, High を使って、適切なインデックス範囲にアクセス

Low() と High() は、デスクトップ/モバイルコンパイラ それぞれで適切な値を返すので、それを使ってアクセスする方法です。
(デスクトップでは 1～Length, モバイルでは 0～Length-1)

var
  i: Integer;
  S: String;
begin
  for i := Low(S) To High(S) do begin
    S[i];
  end;
end;

この書き方は配列アクセスするときにやっていた書き方ですね。
ループ処理をしているときには、ループ部分だけを書き換えればいいので楽かもしれません。
ただ、デスクトップとモバイルで添え字の値が違っているので、添え字の値を永続化して使う場合などには注意が必要かもしれません。

すべて 0 始まりでアクセスする

インデックスを 0始まりとしてアクセスする方法です。
この場合は S[n] でアクセスすることはできません。
かわりに S.chars[n] としてアクセスします。

var
  i: Integer;
  S: String;
begin
  for i := 0 To Length(S)-1 do begin
    S.chars[i];
  end;
end;

この場合、Copy や Pos のような関数も使うことができなくなります。
代わりに S.Substring や S.IndexOf のように TStringHelper のメソッドを使って書き換える必要があります。

1番目のやり方の方がコードの書き換え量は少なくて済みそうです。
ただ、2番目のやり方の方が Cなどと近くなるのでわかりやすいような...
とりあえず新規で書くときには 2番目のやり方が良いでしょう。
既存のものをメンテナンスするときには、適宜どちらかに決めて使うという感じでしょうか。

[関連記事]

Delphi 過去ソースからモバイルへポーティング(文字列処理1)

過去のプログラムから、モバイルアプリケーションへポーティングをする際に問題になることは色々ありますが、ありがちなのは文字列のインデックスの問題でしょうか。

Delphi モバイル コンパイラの場合、文字列は 0 から始まるインデックス方式を
採用しています。さらに、今後、文字列は不変（一定）になる見込みです。

from デスクトップ アプリケーションから iOS アプリケーションへの Delphi コードの移行

結構これは影響大きいですね。
この手の処理はロジックのコードのほうが影響を受けるように思います。
さらに今後、文字列は一定になると!
可変文字列を扱う場合は TStringBuilder を使うとか…
これについては私の場合、文字列の一部を変更する処理はあまり書かないので、影響はなさそうですけれど。

さて、今後に向けてどのように対応しておけば良いのでしょうか？

String -> PChar 変換

私のソースコードでは結構あるのが以下のようなものです

var
  S: String;
  Ptr: PChar;
begin
  S := 'foo';
  Ptr := @S[1];
end;

これは次のように書き換えます。

var
  S: String;
  Ptr: PChar;
begin
  S := 'foo';
  Ptr := PChar(S);
end;

[関連記事]

Delphi 過去ソースからモバイルへポーティング(文字列処理2)

以前 Delphi ML に FireMonkey + MacOSX で TWebBrowser を使いたいという投稿が流れていました。
stackoverflow にあるコードで WebView を使ってみたが、画面に表示されなかったということでした。
そのときに提示されたURLが↓
webview-not-displaying-in-macos-using-delphi-xe2(stackoverflow)

ようやく少し余裕ができたので、自分でも試してみることにしました。

確かにコードの通りやってもうまく行きません。
そもそも view が表示されているように見えないのです。
これについては addSubview が必要なのでは？と見当をつけてみました。
さらに念のために setHostWindow もしてみます。
ここまでは、stackoverflow のコメントにあったのと同じですね。
NSView などを取得するのが XE5 では XE2 より簡単にできるようになっています。

   var
       view: NSView;
   begin
    ...
   view := WindowsHandleToPlatform(Self.Handle).View;
   view.addSubview(WebView);
   WebView.setHostWindow(view.window);

これでとりあえず window は表示されるようになりました。
問題は WebView.mainFram.loadRequest をしても、何も表示されないことです。
どうもおかしいですね。loadHTMLString でもだめでした。
代わりに setMainFrameURL を使ってみると、おぉ！！！うまく表示されましたよ！！！

ということは NSURLなどの作り方が問題なのでしょう。

  urlStr := TNSURL.Wrap(TNSURL.OCClass.URLWithString(NSSTR(AUrl)));
  urlReq := TNSURLRequest.Wrap(TNSURLRequest.OCClass.requestWithURL(urlStr));
  view.mainFrame.loadRequest(urlReq);

という具合に修正したら、うまく動くようになりました。

OS X で URLをデフォルトブラウザで開く

アプリケーションを作るときに必ず作る About ダイアログ
About ダイアログに、ホームページのURL を記載することも多いですよね。
そして URL をクリックしたらホームページを開きたいものです。

Windows の場合は、URL を開くのに Shell API を使います。

uses
  Winapi.Windows, Winapi.ShellApi;

procedure ShowURL(const URL: String);
begin
  ShellExecute(0, 'open', PChar(URL), nil, nil, SW_SHOW);
end;

では OS X ではどのようにするのでしょうか？

Objective-C でデフォルトブラウザを開く

Objective-C でデフォルトブラウザで URL を開くには以下のようにします。

[[NSWorkspace sharedWorkspace] openURL:[NSURL URLWithString:@"http://example.com/"]];

from Mac OS XアプリからデフォルトのブラウザでURLを開きたい

Delphi で書いてみよう

これを Delphi で書き直すと

uses
  Macapi.Foundation, Macapi.AppKit;

procedure ShowURL(const URL: String);
var
  workspace: NSWorkspace;
  AUrl: NSURL;
begin
  workspace := TNSWorkspace.Wrap(TNSWorkspace.OCClass.sharedWorkspace);
  AUrl := TNSURL.Wrap(TNSURL.OCClass.URLWithString(NSSTR(URL)));
  workspace.openURL(AUrl);
end;

ちなみに、OS X では POSIX の _system関数を使って開く方法もあるそうです。
from 指定したURLをデフォルトのウェブブラウザで開く - 偏った言語信者の垂れ流し

   _system(PAnsiChar('open http://example.org/'));

コードとしてはこちらの方が短くて簡単ですね。 orz...

[参考サイト]

Mac OS XアプリからデフォルトのブラウザでURLを開きたい

[関連記事]

FireMonkey - OS X でバージョン情報を取得する