![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Чтобы Panel1 и Panel2 не пересекались! [D6, Win95/98, WinXP]
Angela © (2005-01-26 11:50:00)Мастера!
Кто подскажет, как узнать, находится ли на форме по заданным координатам Panel. Например для того, чтобы добавить ещё одну Panel, но чтобы с первой она не пересекалась и не накладывалась на неё?
Спасибо за внимание.
Erik1 (2005-01-26 12:48:00) [1]Вобщето есть такое свойство Align = alTop и прочие значения, советую поэксперементировать.
begin...end (2005-01-26 12:17:00) [2]> [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.
Angela (2005-01-26 12:10:00) [3]А как им пользоваться?
Может приведёте кусочек кода?
Плиз, если не тяжело!
begin...end (2005-01-26 11:56:00) [4]> Angela © (26.01.05 11:50)
TWinControl.ControlAtPos не подойдёт?