привязка размеров межу image

[Sibedir]

Используй Image. Но действуй следующим образом.

1.

  Image2.Picture.Bitmap.Width := 200;
  Image2.Picture.Bitmap.Height := 200;

2. Рисуй на канве Image2.
3. Растягивай.

  Image2.Stretch := True;

Попробуй

[kropotkina-alice]

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

Алиса, в том то и дело, что пока Picture нет все это не поможет. Нечего центрировать и аутосайзить.

Расположила пустой Image2 с размерами 40х40 рядом с Image1 (с загруженной в него картинкой 400х400).
Произвела:

Image2.Top:=Image1.Top;
Image2.Left:=Image1.Left;
Image2.Width:=Image1.Width;
Image2.Height:=Image1.Height;

А затем:

Image2.Canvas.Pen.Width:=3;
Image2.Canvas.Pen.Color:=clred;
Image2.Canvas.MoveTo(20,20);
Image2.Canvas.LineTo(320,320);

Линия нарисовалась полностью, а не на якобы "нерастягивающемся и нецентрируемом (?)" пустом Image2 размером 40х40 (Image2.Picture=None!)...

Аналогично происходит, если в Image2 предварительно загрузить некую маленькую картинку размером в одну десятую Image1...
Или задача вообще состоит в чём-то другом, недоступном мне???

P.S.
Естественно:

Image2.Autosize:=False;
Image2.Stretch:=True;

P.P.S.
Добавила в процедуру рисования еще кусочек:

Image1.Canvas.Pen.Width:=3;
Image1.Canvas.Pen.Color:=clGreen;
Image1.Canvas.MoveTo(20,320);
Image1.Canvas.LineTo(320,20);

Рисуется двухцветный крестик...
Очевидно, что Image2 получила размеры Image1, ибо в противном случае красная линия была бы совсем коротенькой...

[Khad515]

Да наверное я где то наплужил. Получается я поймал момент, когда все ок, только требует фикса(так как линия становится толще и сбиваются координаты прорисовки),если чисто включить программу и загрузить картинку, то пока по неизвестной мне(я ща просматриваю код) причине выходит тот эффект(который на скрине). В общем спасибо всем. Если будут еще какие то советы) я буду рад их услышать).

[Stilet]

работа с image отличается picturebox? Мне полностью переписывать выходит код?

Ну как тебе сказать? )
Да. Наверное в твоем случае переписывать. Я же не смотрел твой проект, я из своего опыта не советую связываться тебе с Image, который предназначался для показа статической картинки прежде всего.

может PaintBox. PictureBox это не из Delphi вроде.

Да. Ошибся в названии )

[Khad515]

Да спасибо. Я доведу до нормального состояния код(с которым сейчас проблема) и уже вплотную займусь выбором image или paintbox. да ошибся))) сори, чет заело у меня picturebox))

[Khad515]

Подскажите, а каким способом узнать, на сколько надо увеличивать или уменьшать координату при уменьшении/увелечении image. Я как делал масштаб там я в 2 раза увеличивал, значит нужно уменьшать координаты в 2 раза. А тут чет мысли с головы бегут подальше от меня)).

[Stilet]

каким способом узнать,

Это обычная пропорция же. Пропорции решать умеешь?