Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Вниз

Как увеличить изображение в Image?   Найти похожие ветки 

 
Дмитрий_177   (2006-02-16 16:34) [0]

Как увеличить изображение в Image? Попробовал так, не получилось..:(

with Image1.Picture.Bitmap do
 begin
 Width := Round(Width * 1.2);
 Height := Round(Height * 1.2);
 end;


 
DELORAC ©   (2006-02-16 17:06) [1]

Если я правильно понял условие, то

with Image1 do
begin
 Stretch := True;
 Width := Width * 10000000000000000000000000000000000000;
 Height := Height * 100000000000000000000000000000000000000000000;
end;


если хочеш соблюсти пропорции, то
 Image1.Proportional := True;


 
Дмитрий_177   (2006-02-16 17:11) [2]

Сам Image понятно как расстягивать... я имел ввиду само изображение которое в нем находится... а Image не изменял бы свои размеры..


 
DELORAC ©   (2006-02-16 17:16) [3]

Не понимаю для чего...
Кинь Image на панель и тяни его а увеличивающийся рисунок будет оставаться в пределах панели... Либо используй соответствующие алгоритмы...


 
Дмитрий_177   (2006-02-18 00:55) [4]

У меня изображение в Image в центре рисуется...


 
Gorger ©   (2006-02-19 02:45) [5]

Функция StretchBlt из стандартного API. Растягивает изображения очень неплохо, а вот сжимает паршиво.


 
Дмитрий_177   (2006-02-19 02:51) [6]

я уже справился с этим, сделал Canvas.StretchDraw )))



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

Форум: "Основная";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.04 c
11-1122956597
Кудрявцев Павел
2005-08-02 08:23
2006.03.26
Базы данных и KOL


2-1141645383
Lexa79
2006-03-06 14:43
2006.03.26
Вопрос


2-1141723301
Nsk3D
2006-03-07 12:21
2006.03.26
DLL


2-1142244119
Fenix
2006-03-13 13:01
2006.03.26
Проблема со String


11-1122651754
rOOse
2005-07-29 19:42
2006.03.26
OnMouseDown





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский