Главная страница
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.03 c
8-1098630702
Charly22
2004-10-24 19:11
2005.02.06
Связать TImage с GDI+


11-1089504870
некто из темноты
2004-07-11 04:14
2005.02.06
url в richedit


8-1098332767
vg
2004-10-21 08:26
2005.02.06
Помогите в винде "содрать" рисунок.


1-1106597009
MadGhost
2005-01-24 23:03
2005.02.06
ValueListEditor как вставить в ячейку значение?


8-1098445103
zero-g
2004-10-22 15:38
2005.02.06
FullScreen в DSPack