17.12.2006, 16:27
|
|
Местный
|
|
Регистрация: 03.06.2006
Адрес: Почту найдете на моем сайте
Сообщения: 576
Версия Delphi: D10.2
Репутация: 214
|
|
Цитата:
Но как теперь зделать так чтобы на Image1 не рисовалась точка красным цветом, а запоминаля её цвет (не знаю можно ли так зделать - бредовая наверное идея).
|
Код:
//Image1.Canvas.Pixels[50,50]:= clred;
//if (Image1.canvas.pixels[50,50] = clred) and … then
c1 := Image1.Canvas.Pixels[50,50]; // c1: TColor
if (c1 = clred) and … then
|