|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
11.07.2007, 19:32 | #1 |
Пользователь
Регистрация: 08.07.2007
Сообщений: 76
|
Изображение
Мне нужно вывести картинку, но компонент TImage не подходит из-за того, что он слишком искажает изображение, посоветуйте что-нить!!!! Заранее спасибо)
Только начал изучать Delphi...
|
11.07.2007, 20:22 | #2 |
Пользователь Подтвердите свой е-майл
Регистрация: 14.12.2006
Сообщений: 29
|
Пользуй TCanvas...
т.е. рисуй))
какой вопрос, такой ответ..
|
11.07.2007, 20:48 | #3 |
Пользователь
Регистрация: 08.07.2007
Сообщений: 76
|
напиши пожалуйста как это сделать, т.е. как картинку из файла '1.jpg' вывести, например, на форму используя Tcanvas???
Только начал изучать Delphi...
|
12.07.2007, 08:06 | #4 |
Участник клуба
Регистрация: 28.03.2007
Сообщений: 1,814
|
Что значит искажает? Пробовал изменять свойства имиджа: Stretch, Proportional,Center
|
12.07.2007, 10:13 | #5 |
Участник клуба
Регистрация: 07.07.2007
Сообщений: 1,518
|
Если перемещать картинку в run-time, то она мигает и искажается.
Попробуй поставить Image.ControlStyle:= Image.ControlStyle + [csOpaque]; |
12.07.2007, 14:11 | #6 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Шутник
Артему Правильно Serg1980 написал, доведи до ума и не будет искажать. Наоборот TImage как раз очень удобно использовать для вывода изображений.
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
13.07.2007, 12:05 | #7 |
Пользователь
Регистрация: 08.07.2007
Сообщений: 76
|
Искажает, всмысле качество картинки становиться хуже!!! Stretch, Proportional,Center - а это у меня все настроено!!!!
Только начал изучать Delphi...
|
13.07.2007, 12:57 | #8 |
Форумчанин
Регистрация: 30.03.2007
Сообщений: 124
|
Искажает если картинка уменьшается, и на ней есть тонкие линии, тогда их может быть невидно, но то что ты выведешь картинку на канву не поможет, все равно она уменьшается тем же способом
можешь попробовать апи (но уменьшить не получится) BitBlt(Canvas.Handle,x,y,w,h,а.Canv as.Handle,0,0,SRCCOPY); x,y -куда выводить w,h- размер или без уменьшения: canvas.draw(x,y,a) c уменьшением: сanvas.CopyRect(куда,откуда,что);
Тут без 100г не розберешся.....
Спасибо не нужно, а на весы слева кликнуть не помешает!!! |
13.07.2007, 13:17 | #9 |
я получил эту роль
Старожил
Регистрация: 25.05.2007
Сообщений: 3,694
|
TImage с jpeg хреново работает, в смысле маштабирования. Можно конечно поизвращаться с би/три тинейным (или -""- кубическим), - исходники в DelphiX были, в примере DIbEffects вроде. Там изображение в dib переделывалось и с ним уже мудрили
пыщь
|
13.07.2007, 13:20 | #10 |
Студент
Форумчанин
Регистрация: 10.11.2006
Сообщений: 196
|
Есть фильтры для этих целей. Выкладываю модуль Resample.pas + пример использования (написан мной(пример))
З.Ы. 100% компилится на Delphi 7, на остальных не проверял =)
Visita Interiorem Terrae Rectificando Operae Lapidem...
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
БД в Delphi7 +Изображение | _NATASHENKA_ | Помощь студентам | 3 | 15.04.2008 08:31 |
Изображение | Terran | Работа с сетью в Delphi | 2 | 08.02.2008 22:28 |
Замостить изображение | SunKnight | Общие вопросы Delphi | 5 | 13.01.2008 14:23 |