Графика

[tinton]

Добрый день! Можете помочь в работе с графикой.. у меня есть 6 квадратов я бегаю по ним и ввожу цифры но хрен поймешь в каком квадрате нахожусь пока ненажмешь на ввод цифр. Как сделать так что бы границы квадратов выделялись цветом когда я нахожусь на этом квадрате ? Операция должна выполняться когда бегаю по ним стерлками. Сам пробовал через аски код. намудрил.. желаемого неполучилось.

Заранее благодарю.

[s-andriano]

Из Вашего описания трудно что-нибудь понять. (ну, кроме того, что у Вас что-то не получилось)

[Stilet]

я бегаю

Спорт это хорошо. Я тоже решил спортом заниматься - по утрам на лайбе ездить

но хрен поймешь

Отож-бо... Ни ЯВУ ни понятного описания проблемы, ни примера кода...

[tinton]

Procedure PaintKnop2(var x:knop; kolknop:integer; y:nazknop);
begin
prom:=0;
settextstyle(0,0,0);
for i:=1 to kolknop do
begin
setcolor(cknop[i]);
setfillstyle(SolidFill,czk);
bar(20+prom,70,80+prom,100);
OutTextXY(41+prom,85,y[i]);
prom:=prom+80;
end;
end;

рисуются 6 закрашенных прямоугольников. куда производится ввод чисел. и одну кнопку ок. но как сделать что бы по периметру прямоугольников была цветная рамка и при переходе с одного прямоугольника на др она изменяла цвет что бы было видно перемещение... надеюсь так понятнее..

[tinton]

разобрался спасибо)