Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Чтобы Panel1 и Panel2 не пересекались!   Найти похожие ветки 

 
Angela ©   (2005-01-26 11:50) [0]

Мастера!
Кто подскажет, как узнать, находится ли на форме по заданным координатам Panel. Например для того, чтобы добавить ещё одну Panel, но чтобы с первой она не пересекалась и не накладывалась на неё?
Спасибо за внимание.


 
begin...end ©   (2005-01-26 11:56) [1]

> Angela ©   (26.01.05 11:50)

TWinControl.ControlAtPos не подойдёт?


 
Angela ©   (2005-01-26 12:10) [2]

А как им пользоваться?
Может приведёте кусочек кода?
Плиз, если не тяжело!


 
begin...end ©   (2005-01-26 12:17) [3]

> [2] Angela ©   (26.01.05 12:10)

var
 X, Y: Integer; // Координаты относительно клиентской части формы MyForm
 Control: TControl;

begin
 Control := MyForm.ControlAtPos(Point(X, Y), True, True);
 if (Control is TPanel) and (Control.Name = "...") then
   // Значит, найденный control - это экземпляр TPanel с именем "..."
   ...
end.


 
Erik1 ©   (2005-01-26 12:48) [4]

Вобщето есть такое свойство Align = alTop и прочие значения, советую поэксперементировать.



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

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
1-1106655181
Antonn
2005-01-25 15:13
2005.02.06
Опять, всем надоевший, StringGrid...


4-1103311169
sashas
2004-12-17 22:19
2005.02.06
Использование стандартных шрифтов


14-1106123612
07BB:080Dh
2005-01-19 11:33
2005.02.06
Требования по программе


6-1101395412
Txst
2004-11-25 18:10
2005.02.06
Загрузка страницы HTTPS через Indy


1-1106303298
Tomkat
2005-01-21 13:28
2005.02.06
Net Send из приложения