Распознавание цвета пикселя под курсором мыши

@Martyr · Регистрация: 02.04.2013

Author24 — интернет-сервис помощи студентам

Есть программа, простая игра, в которой на поле Image1 при нажатий левой кнопкой ведешь красную линию.
На поле Image1 располагается картинка черно-белого лабиринта.
Вопрос: можно-но ли сделать так, что при попадании линии (т.е. координат мыши) на стенку лабиринта (черный цвет) игра начиналась сначала? Т.е. возможно ли распознать цвет и задать такое условие, при котором игра понимала, что это черный цвет и отправляла мышь в определенные координаты?
P.S.: программа максимальна простая, чуть позже выложу.

@volvo · 25.04.2013, 18:25

В OnMouseMove своего Image напиши вот это:

Pascal

procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Self.Caption := ColorToString(Image1.Canvas.Pixels[X, Y]);
end;

, поводи над изображением мышью, и смотри как изменяется заголовок формы, когда мышь над пикселями разных цветов. Я надеюсь, идея понятна?

@Martyr · 25.04.2013, 20:15 **[ТС]**

Если честно, пока нет) Завтра после вставки этой части попробую разобраться.

@Martyr · 29.04.2013, 20:09 **[ТС]**

В общем, вот что получилось.
Не ясно два момента:

Delphi

1	if Image1.Caption=ColorToString(clblack) then...

Как прописать условие, при котором программа бы направляла курсор в указанные координаты? Т.е. если мы попали на черный цвет, то, предположим, программа отправляет нас в координаты (0;0).
Второй вытекает из первого. Как при перемещении в координаты (0;0) очистить картинку от красных линии?

@Martyr · 04.05.2013, 16:37 **[ТС]**

Что, вообще нету идей?

@Martyr 0 / 0 / 0 Регистрация: 02.04.2013 Сообщений: 9
		1
	Распознавание цвета пикселя под курсором мыши 25.04.2013, 17:56. Показов 3485. Ответов 4 Метки нет (Все метки) Есть программа, простая игра, в которой на поле Image1 при нажатий левой кнопкой ведешь красную линию. На поле Image1 располагается картинка черно-белого лабиринта. Вопрос: можно-но ли сделать так, что при попадании линии (т.е. координат мыши) на стенку лабиринта (черный цвет) игра начиналась сначала? Т.е. возможно ли распознать цвет и задать такое условие, при котором игра понимала, что это черный цвет и отправляла мышь в определенные координаты? P.S.: программа максимальна простая, чуть позже выложу. 0

@Martyr 0 / 0 / 0 Регистрация: 02.04.2013 Сообщений: 9
	25.04.2013, 20:15 [ТС]	3
	Если честно, пока нет) Завтра после вставки этой части попробую разобраться. 0

@Martyr 0 / 0 / 0 Регистрация: 02.04.2013 Сообщений: 9
	04.05.2013, 16:37 [ТС]	5
	Что, вообще нету идей? 0