Главная страница
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.044 c
4-1103204035
pavel_guzhanov
2004-12-16 16:33
2005.02.06
Как убить процесс на удаленном компьютере с помощью WMI?


4-1103213325
Kg
2004-12-16 19:08
2005.02.06
Выход из Windows


3-1104821945
Нуждающийся в помощи
2005-01-04 09:59
2005.02.06
Использование IB в глобальных сетях


14-1105861550
Константинов
2005-01-16 10:45
2005.02.06
VMWare


10-1074505745
comwad
2004-01-19 12:49
2005.02.06
Проблемы с идентификатором объекта Corba?