Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.05.2011, 01:30   #1
YaMolekula
 
Регистрация: 23.04.2011
Сообщений: 8
По умолчанию Вывод фотографии на экран

Доброго Времени Суток! Написал программу рисующую фото на экран. Рисующий код получился такой:
Цитата:
b:=TBitmap.Create;
JpegIm := TJpegImage.Create;
JpegIm.LoadFromFile(sAddr+str+tmp0^ .data.alb+tmp0^.data.n);
b.Assign(JpegIm);
b.Width:=1024;
b.Height:=768;
StretchBlt(StringGrid1.Canvas.Handl e,rect.Left,rect.Top,rect.Right-rect.Left,
Rect.Bottom-rect.Top,b.Canvas.Handle,0,0,b.Widt h,b.Height,SRCCOPY);
b.Destroy;
JpegIm.Destroy;
Но картинки имеют лишь 16 цветов и не очень чёткие. Есть ли возможность хотя бы расширить цветовую палитру?

Пробывал задать значения свойству PixelFormat, но не помогло. Если задать маленький бит на пиксель, то картинка меняется, а при большем нежели стоит по умолчанию - картинка остается как по умолчанию.

Последний раз редактировалось YaMolekula; 28.05.2011 в 01:34.
YaMolekula вне форума Ответить с цитированием
Старый 28.05.2011, 09:01   #2
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,899
По умолчанию

я тоже чегой-то не добился от данного кода норм реакции
сделай проще - нужный_объект.canvas.draw(0,0,jpegi m); а можно и stretchdraw;
phomm вне форума Ответить с цитированием
Старый 29.05.2011, 03:20   #3
YaMolekula
 
Регистрация: 23.04.2011
Сообщений: 8
По умолчанию

Чет не работает. У меня картинка должна быть для ячеек StringGrid, пишет что для Cells[] нет объекта Canvas.
YaMolekula вне форума Ответить с цитированием
Старый 30.05.2011, 10:31   #4
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,899
По умолчанию

ну дал.. конечно нет, ибо cells это массив строк! обращайся к stringgrid.canvas.draw/stretchdraw(тут либо 4 координаты, либо 1 ячеечный rect , погляди был у grid'a метод cellrect вроде, и картинка ), и по уму надо это вещь в Ondrawcell положить, и тогда всё будет в своём естественном ритме работать, автоматически для ячеек, и rect доступен для текущей рисуемой ячейки
phomm вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
вывод на экран Nikolai_90 Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 11 02.05.2012 09:25
Вывод на экран tools Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 0 01.12.2009 22:26
Вывод на экран Timpi Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 30.11.2009 18:05
Вывод на 2-ой экран DShiller Общие вопросы Delphi 0 26.05.2008 15:25