Форум: "Начинающим";
Текущий архив: 2007.04.15;
Скачать: [xml.tar.bz2];

Вниз

Проверить   Найти похожие ветки 

← →
magicworld   (2007-03-23 01:36) [0]

Если Image во всю форму. Есть button на нем. Помогите написать функцию, возвращающая true если button входит в Image и false в противном случае. Проверять необходимо используя свойства left и top, только вот как?

---

← →
Сергей М. ©   (2007-03-23 09:37) [1]

var
 dst, ir, br: TRect;
..
with Image do
  ir := Rect(Left, Top, Left+Width-1, Top+Height-1);
with Button do
  br := Rect(Left, Top, Left+Width-1, Top+Height-1);
Result := UnionRect(dst, ir, br);

---

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

Форум: "Начинающим";
Текущий архив: 2007.04.15;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.047 c