Узнать размер не созданного изображения

[Kronos913]

Есть объект TJpegImage
У него задан параметр качества

jpg.CompressionQuality := 70;

Нужно узнать, какого размера будет полученный файл, если сохранить это изображение в файл.

Возможно ли это узнать не сохраняя файл на жесткий диск?

Если да, то как?

(У меня задача такая, что нужно сначала узнать размер файла, а потом принимать решение сохранять ли его)

[BDA]

Сохранить картинку в MemoryStream и узнать его размер.

[Kronos913]

Правильно сделал?
Задача - при перемещении файла сначала попробовать его открыть и сохранить - если таким образом файл уменьшится в размерах, то сохранить "обработанную" версию, если не уменьшится - то оставить исходную

JpgLoadBmp - функция, которая загружает jpg файл в BitMap

512 байт добавляю потому что открыть-сохранить уже обработанный jpg - там происходят небольшие колебания размеров

Function JpgCleverMoveFile(const start_name, finish_name: string): boolean;
var
  bmp:TBitMap;
  Stream: TMemoryStream;
  jpg:TJpegImage;
 
begin
  If not(start_name=finish_name) then begin
    bmp:=TBitMap.create;
    If JpgLoadBmp(start_name, bmp) then begin
      jpg:=TJpegImage.Create;
      Stream:=TMemoryStream.Create;

      jpg.CompressionQuality := JpgCQ;
      jpg.Assign(bmp);
      jpg.SaveToStream(Stream);

      If GetFileSize(start_name) > (Stream.Size+512) then begin
        jpg.SaveToFile(finish_name);
        If FileExists(finish_name) then begin
          FileSetDate(finish_name, FileAge(start_name));
          DeleteFile(start_name);
          Result:=true;
        end else Result:=False;
      end else begin
        Result:=MoveFile(PChar(start_name), PChar(finish_name));
      end;
      jpg.Free;
      stream.Free;
    end;
    bmp.Free;
  end else result:=false;
end;