Android用Delphi 10でマーカー（TMapMarkerDescriptor）のアイコンを変更するにはどうすればよいですか？

Question

アンドロイドアプリケーション用のDelphiでマーカーアイコンを変更する方法を教えてください。

私の試みは

s.Create(16, 16); //Image size 
position.Latitude := mapview1.Location.Latitude; 
position.Longitude := mapview1.Location.Longitude; 
MyMarker := TMapMarkerDescriptor.Create(Position, 'MyMarker'); 
MyMarker.Draggable := True; 
Mymarker.Icon := imagelist1.Bitmap(s,0); 
MyMarker.Visible :=True; 
Fmarkers.Add(MapView1.AddMarker(MyMarker)); 

イメージリストは、フォーム上TImageListのでは動作しません。 16x16イメージが追加されました。

私のアプリを実行すると、マーカーは表示されません。私はコメントをする/ /アイコンとの線は、すべて正常に動作しますが、私はカスタムマーカーのアイコンがありません。

私は4種類のマーカーアイコンが必要です。

Answer 1

TSizeF.Createはレコードのインスタンスを返します。これは変数sに保存する必要があります。これは、（あなたのイメージリストにインデックス0の16×16ビットマップを持って想定）動作するはずです：

s := TSizeF.Create(16, 16);   //Image size 
position.Latitude := mapview1.Location.Latitude; 
position.Longitude := mapview1.Location.Longitude; 
MyMarker := TMapMarkerDescriptor.Create(Position, 'MyMarker'); 
MyMarker.Draggable := True; 
Mymarker.Icon := imagelist1.Bitmap(s, 0); 
MyMarker.Visible :=True; 
Fmarkers.Add(MapView1.AddMarker(MyMarker)); 

あなたはまた、単に別の変数に作成をスキップし、コンストラクタから直接それを使用することができるはず[未検証] - TSizeFはレコードですので、破壊する必要はありません。

MyMarker.Icon := ImageList1.Bitmap(TSizeF.Create(16, 16), 0); 

Answer 2

まあ、私は長い時間のために、今、同じことのための答えを探していると私はそれを変えることができる唯一の方法はに私のPNG画像をロードしましたデザイナーのTImageコンポーネントに割り当ててから、Bitmapを割り当てます。

MyMarker.Icon := Image1.Bitmap; 

また、画像のサイズが

アップデートは関係ありません：このよう
を私はあなたの変数 `sは何イメージリスト

s.Create(16, 16); //Image size 
position.Latitude := mapview1.Location.Latitude; 
position.Longitude := mapview1.Location.Longitude; 
MyMarker := TMapMarkerDescriptor.Create(Position, 'MyMarker'); 
MyMarker.Draggable := True; 
MyMarker.Icon := ImageList1.Source.Items[0].MultiResBitmap.Items[0].Bitmap; 
MyMarker.Visible :=True; 
Fmarkers.Add(MapView1.AddMarker(MyMarker));