Форум: "Основная";
Текущий архив: 2005.02.06;
Скачать: [xml.tar.bz2];
ВнизЧтобы 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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.036 c