Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Увеличение в Image [D7, WinXP]

Kortes © (2006-11-08 11:54:00)
Здраствуйте мастера.
Подскажите как можно грамотно увеличить изображение выводимое на Image,
например на 50% , на 100% от начального размера?
Пробовал делать так:

Увеличение на 50%:

procedure TForm1.Uvelich;
var a, b : integer;
begin
Image1.Height:=460;
Image1.Width:=693;
Image1.AutoSize:=False;
Image1.Stretch:=True;
a:=50;
H:=Image1.Height;
W:=Image1.Width;
Image1.Height:=(H*a)/100;
Image1.Width:=(W*a)/100;
end;
Но естественно не получилось, потому что
значения Height, Width не всегда будут целыми.

Vovan # 2 (2007-02-11 12:58:00) [1]
>Просто так с языка сорвалось, или есть такие алгоритмы? :)

Так ведь вроде есть. Переводят изображения в вектор и масштабируют. И фрактальные есть. Да только не нужно всё это для рядового проекта, а если что специализированное делается, то слово Image не должно звучать в вопросе.

homm (2007-02-11 12:46:00) [2]
> Ищи алгоритмы, которые умеют масштабировать векторно, сам
> напиши алгоритмы, которые будут уметь масштабировать векторно ,
Просто так с языка сорвалось, или есть такие алгоритмы? :)

Jeer (2006-11-15 10:38:00) [3]
TImage - наследник TControl, а у него события OnMouseWeel и тп упрятаны в protected.

Надо их вытащить в published секцию, сделав наследника от TImage.

Kortes (2006-11-14 19:41:00) [4]
Спасибо Jeer,
я сделал то , что хотел - просто надо литературу открывать, если че забыл.
Теперь думаю, как привезать процедуру увеличения к скролу мыши. Может кто знает? Image1.Height:=H+20;
Image1.Width:=W+20; Если скрол вверх крутим.
или
Image1.Height:=H+20;
Image1.Width:=W-20; Если вниз крутим.
???

grisme (2006-11-11 17:09:00) [5]
В бабруйск Image'ы :0)

Vovan#2 (2006-11-11 16:36:00) [6]
>Ищи алгоритмы, которые умеют масштабировать векторно, сам напиши алгоритмы, которые будут уметь масштабировать векторно, накрайняк, юзай OpenGL/DirectX

Фигасе. Крутая разработочка получится.

grisme (2006-11-11 11:35:00) [7]
Jeer © (10.11.06 18:54) [3]
%))))))))))))

Kortes (08.11.06 11:54)
Коряво так "увеличивать", imho :) Ищи алгоритмы, которые умеют масштабировать векторно, сам напиши алгоритмы, которые будут уметь масштабировать векторно, накрайняк, юзай OpenGL/DirectX, но никак не Image1 :D

Jeer (2006-11-10 18:54:00) [8]

> Leency (10.11.06 18:21) [2]
>
> Jeer, ты гострык :)

Попробовал массу перестановок, включил перекодировку "любой2любой", выполнил дешифрацию методами DES, TripleDES, IDEA, ГОСТ и тп, даже просто XOR попробовал, взял подсказку, позвонил товарищу, помощь зала... - но ничего не понял.

Ты главное скажи-то - жить буду ?

Leency (2006-11-10 18:21:00) [9]
Jeer, ты гострык :)

Jeer (2006-11-08 12:25:00) [10]
Открою тайну .Height и .Width всегда целые
div ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »