Перекрещивание обьектов!

← →
snowkam2 (2007-05-28 01:49) [0]

Ребята подскажите есть какоенибудь событие. При поподании обьекта на обьект. Например кнопка1 попала на кнопку2. Ну например есть событие у обьекта onMouseMove. вот тоже самое нужно только призахождении кнопки на кнопку.

← →
Германн © (2007-05-28 01:53) [1]

Таких событий я не знаю. Думаю, что их и быть не может в "стандартных" случаях.
Но есть функция:
function IntersectRect(out Rect: TRect; const R1, R2: TRect): Boolean;

Description

Call IntersectRect to obtain the rectangle that is the intersection of R1 and R2. The intersection is returned as the Rect parameter.

IntersectRect returns True if the two rectangles have a nonempty intersection. If R1 and R2 do not overlap, IntersectRect returns False, and the Rect parameter is set to a rectangle at position (0,0) with 0 Width and 0 Height.
Может поможет?

← →
snowkam2 (2007-05-28 02:01) [2]

2Германн © привет спасибо.
Только я не могу сообразить как ее прикрктить. скорее всего нужно вычеслять
тоесть координаты одной кнопки X Y плюс к ним высоту и ширину. Ну в этом диапазоне уже вызывать событие !

← →
Германн © (2007-05-28 02:20) [3]

> snowkam2 (28.05.07 02:01) [2]
>
> 2Германн © привет спасибо.
> Только я не могу сообразить как ее прикрктить. скорее всего
> нужно вычеслять
> тоесть координаты одной кнопки X Y плюс к ним высоту и
> ширину. Ну в этом диапазоне уже вызывать событие !
>

Ну, во-первых у всякого наследника TControl есть свойство BoundsRect, так что вычислять ничего и не нужно.
А дальше в зависимости от задачи.

← →
snowkam2 (2007-05-28 02:40) [4]

Германн © спасибо еще раз я уже сделал посвоему. А где можно почитать насчет вот этого

> у всякого наследника TControl есть свойство BoundsRect,
> так что вычислять ничего и не нужно.

← →
snowkam2 (2007-05-28 02:41) [5]

или пример посмотреть и что это такое TControl????

> snowkam2 (28.05.07 02:40) [4]
>
> Германн © спасибо еще раз я уже сделал посвоему. А где
> можно почитать насчет вот этого
>
> > у всякого наследника TControl есть свойство BoundsRect,
>
> > так что вычислять ничего и не нужно.
> <Цитата>
>
> snowkam2 (28.05.07 02:41) [5]
>
> или пример посмотреть и что это такое TControl????
>

В справке, разумеется. Вызывается оная нажатием клавиши F1 на клавиатуре.

Перекрещивание обьектов! Найти похожие ветки