коллизия

[Fruit]

есть два Timage-объекта.. Как можно определить, пересеклись ли они?
Если выписывать все возможные варианты типа
if Image1.Left >= Image2.Left and...
это будет слишком долго и муторно. К тому же, нужно чтобы было как можно проще - это будет типа цикла от 1 до четырех
( нужно сравнить один image1 с image2[1], с image2[2], с image2[3], с image2[4]). К тому же сравнение идет в таймере с интервалом 15 мс...

Может, сумбурно выразился.. хм..

[Virtson]

> Если выписывать все возможные варианты типа
> if Image1.Left >= Image2.Left and...

а для прямоугольных объектов так и делается.
конечно ничего не делать - проще. хм.

[BOBAH13]

Интересно... Я бы сделал проверки как вы и описали, незнаю что еще Вы можете придумать.

[Fruit]

хм.. я думал, может есть какой-то лучше способ
где-то слышал, про PivotPoint - опорные точки.. Только принцип проверки не могу сформулировать..

[B_N]

В Windows API для этого есть специальные функции, например IntersectRect. В сумме с GetWindowRect или GetClientRect я полагаю они дадут то, что нужно..

[Fruit]

Спасибо ) Сейчас попробую разобраться, что за функции такие )

[Fruit]

код:
var
lpRect: TRect;
res, RectGrreen, RectBlue: TRect;
collis: boolean;

...

for i:=1 to 4 do
begin
GetWindowRect(osnova.Handle,lpRect) ;
GetClientRect();
RectGrreen:=imgGreen.ClientRect;
RectBlue:=imgBlue[i].ClientRect;
collis:= IntersectRect(res,RectGrreen,RectBl ue);
if collis = false Then
begin
Collision:=true;
exit;
end
else Collision:=false;
end;

И все равно не получается... в свое оправдание скажу, что с WinAPI работаю второй раз в жизни

[B_N]

Ну а зачем Вы все в кучу-то?

Если Вы уже берете прямоугольники как делфьийские property, то зачем в начале кода зовете GetClientRect и GetWindowRect? Я их написал, чтобы Вы выбрали, кто из них нужен. Кстати, может быть в TRect есть метод IntersectRect, негде глянуть. И еще, API не в курсе, что существуют такие штуки, как TRect, туда надо передавать адрес стандартного апишного RECT, иначе в зависимости от внутреннего устройства TRect, все будет непредсказуемо.

[Fruit]

"Кстати, может быть в TRect есть метод IntersectRect, негде глянуть"
не... нету. ) По крайней мере я не нашел..

хмм.. не понял...
я создаю переменную Trect, присваиваю ей этот imgGreen.ClientRect к примеру, передаю эту запись в APIшную функцию... в перем. res по идее, они должны показать 0 или что-нить др.? В смысле - 0 - не пересекаются....

[B_N]

IntersectRect ожидает указатель на RECT

typedef struct tagRECT
{
    LONG left;
    LONG top;
    LONG right;
    LONG bottom;
}RECT;

Я не знаю, соответствует ли TRect в дельфи такому объявлению, потому так и пишу, всегда стоит перестраховаться . Кстати, а что в Дельфи TRect.Intersect такое?