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

"Абсолютная" позиция контрола относительно формы   Найти похожие ветки 

← →
Derevyanniy kak Rels   (2005-01-26 14:36) [0]

А можно это как то узнать ?

то-есть я имею ввиду, к примеру .

Есть форма на ней есть панель .
на этой панели есть кнопка.

и относительно формы  , координаты у нее будут

l := Panel.Left + Button1.Left ;
w := Panel.Top + Button1.Top;

ну а если у меня кол-во панелек друг на друге будет штук 10 .
и на самой последней кнопка .
перебирать всех предков как то не хочется , к тому же
еще и определять BorderStyle итд .

как быть ?

---

← →
Александр Иванов ©   (2005-01-26 14:40) [1]

ScreenToClient?

---

← →
KSergey ©   (2005-01-26 14:40) [2]

p: TPoint

p := Button1.BoundsRect.LeftTop (или TopLeft)
p := Button1.ClientToScreen (p);
p := Form1.ScreenToClient(p);

---

← →
MBo ©   (2005-01-26 14:55) [3]

GetParentForm

---

← →
KSergey ©   (2005-01-26 15:39) [4]

> [3] MBo ©   (26.01.05 14:55)
> GetParentForm

В каком смысле?

---

← →
Derevyanniy kak Rels   (2005-01-26 16:07) [5]

Вот так вот будет правильней , точнее то что мне нужно .
p := Form1.ScreenToClient(Button1.ClientToScreen(p));

спасибо !
как говориться век живи век учись :)

---

← →
MBo ©   (2005-01-27 07:23) [6]

>KSergey ©   (26.01.05 15:39) [4]
> [3] MBo ©   (26.01.05 14:55)
> GetParentForm
>В каком смысле?

это в помощь по этому вопросу:

>ну а если у меня кол-во панелек друг на друге будет штук 10 .
и на самой последней кнопка .перебирать всех предков как то не хочется

---

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

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



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