Я нашел код, чтобы сделать следующее на этом сайте, поэтому спасибо Однако строка «logo.Bitmap.LoadFromStream (MyRs);»Ошибка памяти при попытке загрузить jpeg из файла ресурсов Delphi XE7/OSX
Нарушение прав доступа - некоторая ошибка памяти.
Я использовал Проект | Ресурсы и изображения ... для добавления 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;
Спросите себя, что время жизни 'logo' это? –
Эта процедура распечатывает PDF с логотипом (растровое изображение) - так что срок жизни в порядке - до тех пор, пока он будет создан! (как утверждает Ari0nah) - затем я освобожу его в блоке finally. Благодарю. – Trevor