Image1 показывает всю картинку, а не обрезает ее.

@HanDi · Регистрация: 11.02.2012

Author24 — интернет-сервис помощи студентам

Есть код :

Delphi

  bmp:=TBitmap.Create;
  jpgImg := TJPEGImage.Create;
    bmp.Height:=Screen.Height;
    bmp.Width:=Screen.Width;
    DC:=GetDC(0);
    bitblt(bmp.Canvas.Handle, 0, 0, Screen.Width, Screen.Height,
      DC, 0, 0, SRCCOPY);
 
  ReleaseDC(0, DC);
  jpgImg.Assign(bmp); {в JPG грузим Битмап}
[COLOR="Red"]    image1.Width:=bmp.Width;
  image1.Height:=bmp.Height;
  image1.Picture.Bitmap:=bmp;[/COLOR]
  jpgImg.CompressionQuality:=100; {устанавливаем компрессию (качество) (1-100)}
 if SavePictureDialog1.Execute then
    jpgImg.SaveToFile(SavePictureDialog1.FileName+'.jpg'); {сохраняем в формате JPG}
  jpgImg.Free;
  bmp.Free;

Как сделать, чтобы image1 показывало всю уменьшенную картинку, а не обрезал ее?

@NIch · 18.02.2012, 17:22

В ObjectInspector твоего Image установи свойство
Stretch в True
AutoSize в False

@HanDi · 18.02.2012, 17:25 **[ТС]**

Пробовал, тоже самое.

Добавлено через 1 минуту
http://img-life.ru/upload_imag... 2949f7.png

@NIch · 18.02.2012, 17:29

Естественно у тебя ведь Image размером с картинку.

Delphi

1 2	image1.Width:=bmp.Width; image1.Height:=bmp.Height;

У тебя просто сам Image не помещается на форму.
Установи полосы прокрутки на форме и двигай их что бы увидеть всю картинку или убери этот код.

@HanDi · 18.02.2012, 17:31 **[ТС]**

С этим разобрался.

Тут еще кое что

@NIch · 18.02.2012, 17:37

Сообщение от HanDi

Тут еще кое что

Пиши)))

@HanDi · 18.02.2012, 19:08 **[ТС]**

Вот к примеру я нажал в трее на иконку программы, как сделать чтобы я мог выбрать определенную область и тогда уже как выше показать ее в image и сохранить?

А то не удобно, когда форма еще висит, вот так получается: http://img-life.ru/upload_imag... e4422f.png

Добавлено через 1 час 28 минут
up'///

@NIch 401 / 312 / 74 Регистрация: 17.03.2010 Сообщений: 1,119
	18.02.2012, 17:22	2
	В ObjectInspector твоего Image установи свойство Stretch в True AutoSize в False 0

@HanDi 898 / 345 / 65 Регистрация: 11.02.2012 Сообщений: 1,502
	18.02.2012, 17:25 [ТС]	3
	Пробовал, тоже самое. Добавлено через 1 минуту http://img-life.ru/upload_imag... 2949f7.png 0

@HanDi 898 / 345 / 65 Регистрация: 11.02.2012 Сообщений: 1,502
	18.02.2012, 17:31 [ТС]	5
	С этим разобрался. Тут еще кое что 0

@NIch 401 / 312 / 74 Регистрация: 17.03.2010 Сообщений: 1,119
	18.02.2012, 17:37	6
	Сообщение от HanDi Тут еще кое что Пиши))) 0

@HanDi 898 / 345 / 65 Регистрация: 11.02.2012 Сообщений: 1,502
	18.02.2012, 19:08 [ТС]	7
	Вот к примеру я нажал в трее на иконку программы, как сделать чтобы я мог выбрать определенную область и тогда уже как выше показать ее в image и сохранить? А то не удобно, когда форма еще висит, вот так получается: http://img-life.ru/upload_imag... e4422f.png Добавлено через 1 час 28 минут up'/// 0