＜TImage＞画像の追加

Delphi の FireMonkey で画像を追加するメモ
Delphi バージョン：Delphi 10.4
使用するコンポーネント：TImage

①プロジェクト内に画像を追加
ツールバー → 「プロジェクト」 → 「リソースと画像...」
「追加」で使いたい画像を追加する
リソース識別子 → ソースの中に使う名前(自分のわかりやすい名前にしていいと思う)
リソースタイプ → RCDATAに設定(色々あるんだけど、とりあえず今回はRCDATA)

②TImage を追加

③コード：
procedure TFmMain.FormCreate(Sender: TObject);
var
  RS : TResourceStream;
  Bitmap : FMX.Graphics.TBitmap;
begin
  RS := TResourceStream.Create(HInstance, 'PngImage_Test', RT_RCDATA);
  Bitmap:= FMX.Graphics.TBitmap.CreateFromStream(RS);//FMX.Graphics
  Image1.Bitmap := Bitmap;
  RS.Free;
  Bitmap.Free;
end;