Например так:
const
RequiredSclae = 1.0;
var
BitmapItem: TFixedBitmapItem;
Bitmap: TBitmap;
begin
if OpenDialog.Execute then
begin
// Запрашиваем картинку для нужного Scale
Bitmap := Image1.MultiResBitmap.Bitmaps[RequiredSclae];
// Проверяем, есть картинка или нет.
if Bitmap = nil then
begin
// Если нет, то заводим контейнер для новой картинки
BitmapItem := Image1.MultiResBitmap.Add;
BitmapItem.Scale := RequiredSclae;
Bitmap := BitmapItem.Bitmap;
end;
Bitmap.LoadFromFile(OpenDialog.FileName);
end;
