Скачать: CL | DM;

DelphiX и спрайты   Найти похожие ветки 

← →
Norlin ©   (2003-08-06 23:25) [0]

Здравствуйте! Кто знает, скажите, как определить на какой спрайт наведен курсор?

З.Ы. В DelphiX это всё на Delphi 5...

---

← →
TButton ©   (2003-08-06 23:48) [1]

СпрайтЕнджин юзаешь?
и что ето ваще за спрайты?

---

← →
Norlin ©   (2003-08-07 00:08) [2]

юзаю
всмысле, что за спрайты??? Ну типа чтоб в меню кнопки нажимать...

---

← →
TButton ©   (2003-08-07 00:10) [3]

ну вообще, когда я делал(делаю) кнопки в меню - создаю для каждой TRect (в смысле массив ректов создаю), и онКликово, онМаусМувово, онТаймерово и т.п. проверяю PointInRect(cur,brect[n]);

---

← →
Norlin ©   (2003-08-07 00:22) [4]

так Рект - вроде ж прямоугольник ? а если кнопка круглая?

---

← →
TButton ©   (2003-08-07 02:33) [5]

эммм.... делаешь тип
TCircle = record
x,y:integer;
r:integer;
end;
и процедуру
procedure PointInCircle(p: TPoint; c: TCircle);
var
dx,dy:integer;
r:integer;
begin
dx:=p.x-c.x; dx:=dx*dx;
dy:=p.y-c.y; dy:=dy*dy;
r:=SQRT(dx+dy);
if r<=c.r
then result:=true
else result:=false;
end;

дописал процедуру и пальцы сами к Ctrl и F9 потянулись =)))))))))))

---

← →
pasha676_*   (2003-08-07 13:07) [6]

> Кто знает, скажите, как определить на какой спрайт наведен
> курсор?

Если координаты курсора, есть координаты спрайта, есть размеры спрайта. Неужели трудно догадаться и написать находиться ли курсор над спрайтом?

---

← →
Norlin ©   (2003-08-09 01:08) [7]

2 TButton спасибо!
да, знакомый рефлекс :)) а ещё после каждого символа ctrl S :)))

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c