Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];

Вниз

как найти цвет изображение в любой его точке   Найти похожие ветки 

 
ПАВЕЛ123 ©   (2007-04-11 19:02) [0]

подскажите по делфи. имеется картинка, как определить код цвета РГБ в любом ее месте??
photo := TBitmap.Create;
photo.LoadFromFile("trace.bmp");
как найти цвет на координате х, у??


 
Fenik ©   (2007-04-11 19:20) [1]

var C: TColor;

  C := photo.Canvas.Pixels[x, y]
  R := C and $FF;
  G := (C and $FF00) shr 8;
  B := (C and $FF0000) shr 16;



 
ПАВЕЛ123 ©   (2007-04-11 19:25) [2]

спасибо! оперативно:)


 
ПАВЕЛ123 ©   (2007-04-11 19:38) [3]

а переменные R,G,B как описывать?


 
ПАВЕЛ123 ©   (2007-04-11 19:45) [4]

с переменными разобрался.как теперь код вывести вывести на экран?


 
ПАВЕЛ123 ©   (2007-04-11 19:45) [5]

скажем в левом верхнем углу картинки....


 
Fenik ©   (2007-04-11 19:57) [6]

Что значит вывести на экран?
Можно положить на форму TLabel и менять его Caption.


 
ПАВЕЛ123 ©   (2007-04-11 20:09) [7]

можешь мне помочь по аське? я плоховато разбираюсь в Делфи.. Учусь.  Вобщем стукни 308-541-911. Пожалуста:)


 
ПАВЕЛ123 ©   (2007-04-11 20:27) [8]

я делаю лабораторку по делфи, игру - гонки. машинка по трассе уже ездит. трасса нарисована в паинте. трасса серая и белая, трава зеленая, объекты, в которые машинка может врезатся - темно-серые. вот хочу чтоб анализировалось положение машинки в каждый момент времени на трассе, и в зависимости от того, по какому цвету она едет, происходило либо замедление (если по траве), либо остановка (если машинка наезжает на темно-серый объект). координаты машинки определить получается, а вот с цветами проблема.....жду хелпа:)


 
ПАВЕЛ123 ©   (2007-04-11 20:28) [9]

фишка в том, что можно за 5 сек нарисовать новую трассу



Страницы: 1 вся ветка

Форум: "Media";
Текущий архив: 2008.03.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.043 c
3-1192802734
Vendict
2007-10-19 18:05
2008.03.09
создание DNS для Oracle


3-1193045210
NNH
2007-10-22 13:26
2008.03.09
Обновление запроса UPDATE


2-1202681835
Бэтман
2008-02-11 01:17
2008.03.09
Дата


15-1201722950
Марсер
2008-01-30 22:55
2008.03.09
Бесплатный прокси-сервер для обеспечения ноутбука Инетом


3-1192621905
gentos
2007-10-17 15:51
2008.03.09
как прикрепить файл к письму ?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский