[Tost]

var
Bmp: TBitmap;
Jpg: TJPEGImage;
begin
Jpg := TJPEGImage.Create;
Bmp := TBitmap.Create;

bmp.Width := Screen.Width;
bmp.Height := Screen.Height;
BitBlt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,
GetDC(GetDesktopWindow), 0, 0, SRCCopy);

Jpg.Assign(Bmp);
Jpg.CompressionQuality:=20;
Jpg.Compress;
end;

Вот, получаю таким образом изображение экрана в Jpg (мб и коряво, но не в этом смысл). А вопрос заключатеся в том, что: как узнать сколько это изображение "весит"?

[Yurk@]

http://www.delphisources.ru/pages/fa...file_size.html
http://www.delphisources.ru/pages/fa...ile_size5.html

[Tost]

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