Обрезка Picture в Image

[Аватар]

В uses Jpeg не забыть

  Image1.AutoSize:=False;
  Image1.Height:=300;
  Image1.Width:=300;
  Image1.Center:=True;
  Image1.Proportional:=True;
  Image1.Stretch:=True;
  Image1.Picture.LoadFromFile(...);

[Stilet]

Не у изображения, а у компоненте, на котором оно находится.!!!
Вот я сейчас создал форму, сделав ее черным фоном, на него поместил Image, по размеру он больше чем картинка, что я в него вставил, но никаких белых не получил. Отсюда вывод - возможно белый слой принадлежит самой фотке, с которой ты плитку делаешь, или контейнер, на котором помещены изображения имеет белый фон

[dwp_prof]

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

возможно белый слой принадлежит самой фотке, с которой ты плитку делаешь, или контейнер, на котором помещены изображения имеет белый фон

Ну он прорисовывается методом DrawImage библиотеки GDI plus

[dwp_prof]

Сообщение от Аватар

В uses Jpeg не забыть

  Image1.AutoSize:=False;
  Image1.Height:=300;
  Image1.Width:=300;
  Image1.Center:=True;
  Image1.Proportional:=True;
  Image1.Stretch:=True;
  Image1.Picture.LoadFromFile(...);

не то... значение picture всё равно останется 1680x800

Мне нужно сжатие изображения, ибо если сзображений много таких начинаются задержки в работе)

[Stilet]

Ну он прорисовывается методом DrawImage библиотеки GDI plus

Честно признаюсь - работаю с этой библой оч. давно, но не замечал чтоб она рисовала артефакты...

[dwp_prof]

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

Честно признаюсь - работаю с этой библой оч. давно, но не замечал чтоб она рисовала артефакты...

почему артефакты?
предложи свой код решения этой задачи пожалуйста

[dwp_prof]

Всё разобрался!)

Просто изменил первоначальное значение width и height перед тем как проделывать это
b:=TGPGraphics.Create(image.Canvas. Handle);
b.DrawImage(a,0,0,tmpW2,tmpH2);

[Stilet]

предложи свой код решения этой задачи пожалуйста

Легко: http://www.programmersforum.ru/showthread.php?t=104883
Когда-то для себя делал этот компонентик. Пока не жалуюсь, работает как надо.