Скачать: CL | DM;

Масштабирование TImage   Найти похожие ветки 

← →
Piero ©   (2003-12-06 18:14) [0]

Можно ли как-то автоматически выбирать масштаб для TImage. Stretch - не подходит т.к. нужно, что бы картинка изменялася в размерах пропорционально по вертикали и горизонтали. Спасибо

---

← →
Anatoly Podgoretsky ©   (2003-12-06 18:22) [1]

Все равно Stretch и математика из начальной школы, про пропорции.

---

← →
Mihey ©   (2003-12-06 18:45) [2]

Не знаю, конечно, как это поможет, но вт если бы ты использовал Graphic32, то ни о чём беспокоиться не надо было бы.

---

← →
Stilgar ©   (2003-12-06 20:18) [3]

Image1.Proportional:=True;

---

← →
Piero ©   (2003-12-06 20:24) [4]

Stilgar ©, я работаю на 5-й Delphi, и там нет такого свойства :(

---

← →
Stilgar ©   (2003-12-06 20:47) [5]

Ладно, воспользуюсь советом Anatoly Podgoretsky © (06.12.03 18:22) [1] :
procedure TMainForm.StretchProportional(Percent: Word);
begin
Image1.Stretch:=True;
if Image1.AutoSize=False then{может проверка лишняя, но я не знаю как у вас установлено это свойство}
begin
Image1.AutoSize:=True;
Image1.AutoSize:=False;
end;
Image1.Width:=Round(Image1.Width*Percent/100);
Image1.Height:=Round(Image1.Height*Percent/100);
end;

---

← →
Zew ©   (2003-12-06 22:01) [6]

http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=21-988625190

---

← →
Piero ©   (2003-12-06 23:53) [7]

Спасибо

---

← →
Piero ©   (2003-12-06 23:53) [8]

Спасибо

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c