|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
05.09.2007, 12:55 | #1 |
Регистрация: 05.09.2007
Сообщений: 3
|
помогите с размерами изображения
Здравствуйте! Не могли бы вы помочь мне в одной программке. Вот например матрица, и на ней расположена картинка в виде круга или квадрата, как угодно! И дело в том, что нужно узнать какой размер этой картинки ширина, высота, и координаты расположения её на матрице. Подскажите, пожалуйста, может уже есть такая, исходник, или хотя бы ссылки, где можно посмотреть что то похожее. Заранее спасибо. Александр!
|
05.09.2007, 13:03 | #2 |
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
Совсем не въехал......
Что за матрица? Что значит - на ней расположена картинка? Картинка - это компонент Image или Bitmap??? Если так, то у них есть свойства: ========================= Top, Left - координаты Width, Height - Ширина, Высота =========================
Life is too short, play more...
Как правильно задавать вопросы |
05.09.2007, 13:46 | #3 |
Владимир М.
Участник клуба
Регистрация: 30.10.2006
Сообщений: 1,289
|
я понял так :
на рисунке нужно выделить объект, его координаты и размеры. для чего именно ?
Берегите друг друга!
|
06.09.2007, 15:20 | #4 |
Регистрация: 05.09.2007
Сообщений: 3
|
А ну да, компонент image в нём загружен рисунок. например круг, и он например посередине. И нужно просто узнать его размер Width, Height. И в какой позиции он расположен на компоненте image. А, видимо вот так правельней, какое расстояние от левого края, правого края, верх, низ.
|
06.09.2007, 15:47 | #5 |
Андрей
Форумчанин
Регистрация: 21.11.2006
Сообщений: 457
|
А известен цвет рисунка и фона?
Если да, то вот пример. Предположим, что это черный рисунок на белом (не черном ) фоне. Var Width,Height,Left,Right,Top,Bottom: Integer; //Координаты и размеры рисунка I,J:Integer; Begin For I:=0 To Image1.Height-1 do For J:=0 To Image1.Width-1 do If Image1.Pixels[I,J] = clBlack Then Begin If I<Top Then Top:=I; If I>Bottom Then Bottom:=I; If J<Left Then Left:=J; If J>Right Then Right:=J; End; Width:=Right-Left; Height:=Bottom-Top; End;
ICQ: 5311314
[SIGPIC][/SIGPIC] |
19.09.2007, 14:37 | #6 |
Регистрация: 05.09.2007
Сообщений: 3
|
Да всё верно, белое, и чёрный рисунок, а как сделать сканирование например с лева на право. Попадается скажем точка и программа сразу её записывает. скажем частоту, размер, вообщем что есть не ровность.
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Чтение изображения из базы данных, Вместо изображения - "System.Byte[]" | ruelCrow | Общие вопросы .NET | 3 | 10.07.2008 23:29 |
Помогите с алгоритмом сжатия изображения | Kulibim | Мультимедиа в Delphi | 3 | 20.12.2007 19:33 |
помогите со сборкой изображения... | ИЛ87 | Помощь студентам | 0 | 03.12.2007 22:39 |
Изображения в БД | alikon1 | БД в Delphi | 3 | 08.10.2007 13:13 |