リソースファイルからjpegをロードしようとしたときにメモリエラーが発生しました。

Question

このサイトでは次のようなコードが見つかりました。ありがとう しかし、 "logo.Bitmap.LoadFromStream（MyRs）;"

アクセス違反 - 何らかのメモリエラーと思われます。

私はProject |リソースと画像... Jpegを追加するには

これはリソースがリンクされていない、または私のコードに問題がありますか？

感謝:)

uses 
    Classes, FMX.Graphics, FMX.Objects; 

procedure MyProvedure(); 
var 
    logo : TImage; 
    MyRS : TResourceStream; 
begin 
    MyRS := TResourceStream.Create(HInstance, 'logo_1', RT_RCDATA); 
    try 
     logo.Bitmap.LoadFromStream(MyRs); 
    finally 
    MyRS.Free; 
    end; 
end; 

Answer 1

あなたはそれを使用する前にイメージを作成する必要があります。

logo := TImage.Create(nil);