|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
06.04.2008, 16:13 | #1 |
Пользователь
Регистрация: 06.04.2008
Сообщений: 22
|
Работа с изображением
уважаемые програмисты подскажите:
нужно загрузить изображение (jpg, bmp) и дальше его обрабатывать(т.е. рисовать на нем, выделять куски и тп) проблема в том, что если открыть изображение в Timage, дальше прога отказывается его обрабатывать, в TpaintBox нельзя загружать картинки из файла. собственно может я туплю и можно работать с Timage, то если это так подскажите как это реализовать или возможно есть другие пути решения проблемы? |
06.04.2008, 16:33 | #2 | |
Пользователь
Регистрация: 06.04.2008
Сообщений: 48
|
Цитата:
|
|
06.04.2008, 16:39 | #3 |
Форумчанин
Регистрация: 15.02.2008
Сообщений: 621
|
Имхо не нужены всякие PaintBox'ы лучше самому на канве рисовать.
Вот пример работы с TbitMap procedure TForm1.Button1Click(Sender: TObject); Код:
Помог? Ну так нажми на весы!
Последний раз редактировалось SNUPY; 06.04.2008 в 16:42. |
06.04.2008, 18:07 | #4 |
Старожил
Регистрация: 22.05.2007
Сообщений: 9,065
|
SNUPY, с jpeg теперь напиши как работать в таком случае
|
06.04.2008, 18:37 | #5 | |
Форумчанин
Регистрация: 15.02.2008
Сообщений: 621
|
Цитата:
Код:
Помог? Ну так нажми на весы!
|
|
06.04.2008, 22:37 | #6 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
za4ot, смотри в справке TBitmap, TJpegImage
Работа с изображением смотри TCanvas Алгоритм такой: загружаешь файл в TBitmap или TJpegImage методом LoadFromFile, если это Jpeg то копируешь его в битмап, метод Assign. И дальше делаешь все что тебе надо через TBitmap.Canvas не забывая отображать его куда-то, напр. в имидж Image1.Canvas.Draw(0,0,твой битмап); Создавать эти объекты и освобождать память когда они не нужны надо вручную: MyBM:=TBitmap.Create; MyBM.Free;
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)
Проверь себя! Онлайн тестирование | Мой блог |
08.04.2008, 00:52 | #7 |
Пользователь
Регистрация: 06.04.2008
Сообщений: 22
|
спасибо за помощь
mutabor, если действовать как вы говорите, то получается чтото вроде этого: Код:
согласно литературе тбитмап это потомок от тграфик, несовместимости типов не должно быть, в чем прична? Последний раз редактировалось Stilet; 08.04.2008 в 07:57. |
08.04.2008, 08:00 | #8 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
08.04.2008, 09:43 | #9 |
Пользователь
Регистрация: 06.04.2008
Сообщений: 22
|
версия дельфи 7.0(билд 4.453)
может я модули какие-то не подключил? |
08.04.2008, 10:01 | #10 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
У меня D6 и я ничего не подключал дополнительно.
I'm learning to live...
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
робота с изображением | Gorec | Помощь студентам | 3 | 28.05.2008 20:03 |
Работа с изображением | Artem | PHP | 4 | 20.10.2007 15:56 |
Изменение инициативы при перекрывании одним изображением другого | itisiam | Общие вопросы Delphi | 4 | 11.05.2007 23:33 |
Рабора с изображением | Spec | Общие вопросы Delphi | 1 | 19.02.2007 21:25 |