Как проеделить координаты для DropDownMenu у ToolButton?

← →
Kolan © (2007-11-03 15:50) [0]

Здравствуйте,
Нужно показать DropDownMenu, как вычислить координаты.

ЗЫ
И как это сделано в VCL я не нашел код, который это делает&#133

← →
Reindeer Moss Eater © (2007-11-03 15:58) [1]

TToolButton1.Style := tbsDropDown;

← →
Amoeba © (2007-11-03 17:14) [2]

[1], и вычислять ничего не надо.

← →
Kolan © (2007-11-03 17:45) [3]

Не у кнопки уже tbsDropDown.
Я хочу сделать так:

Кнопка.ПопАпниСвоёМеню. //То есть сделайть надо так, как будто пользователь нажал на треугольничег

← →
Kolan © (2007-11-03 17:45) [4]

> Кнопка.ПопАпниСвоёМеню

Но так как тагого метода нет, то я решил сделать

Кнопка.DropDownMenu.Popup(а чё сюда подставлять?)

← →
Kolan © (2007-11-03 17:51) [5]

Я пытался так:
Point.X := SaveToolButton.Left; Point.Y := SaveToolButton.Top + SaveToolButton.Height; Point := SaveToolButton.ClientToScreen(Point); SaveToolButton.DropdownMenu.Popup(Point.X, Point.Y);

Но координаты не правильные&#133 :(

← →
Reindeer Moss Eater © (2007-11-03 18:10) [6]

TToolButton.PopupMemu

← →
Kolan © (2007-11-03 20:23) [7]

ToolButton1.PopupMenu  Это свойство типа TPopupMenu, а не метод

Что я делаю не так?

ЗЫ
Код:
Point.X := SaveToolButton.Left; Point.Y := SaveToolButton.Top + SaveToolButton.Height; Point := SaveToolButton.ClientToScreen(Point); SaveToolButton.DropdownMenu.Popup(Point.X, Point.Y);

сработал, толко
Point.X  184

← →
Reindeer Moss Eater © (2007-11-03 21:40) [8]

Вот и присвой этому свойству свое попапменю.

← →
Kolan © (2007-11-04 07:35) [9]

> Вот и присвой этому свойству свое попапменю.

Уже присвоено, только DropDownMenu&#133 Как его показать под кнопкой? Не вычисля координат&#133

← →
korneley © (2007-11-04 09:36) [10]

свойство Style у ToolButton выставь в tbsDropDown как в [1], или в инспекторе объектов. Оно само и заработает.

> Kolan © (03.11.07 20:23) [7]

> Point := SaveToolButton.ClientToScreen(Point);

Point := Self.ClientToScreen(Point); // т.е., в координатах формы

--
Regards, LVT.

> Point := Self.ClientToScreen(Point); // т.е., в координатах
> формы

Тут один затык&#133 ТуБар лежит на фрейие, а фрейм в пакете. И на форму он попадает при загрузки приложения. Ессно сам этот фрейм ниче не знает о том что с ним станет в ран тайме&#133

Да ладно вариант Point.X — 184 работает нормально&#133

> Kolan © (04.11.07 10:58) [12]

> этот фрейм ниче не знает о том что с ним станет в ран тайме…

GetParentForm ?

> Да ладно вариант Point.X — 184 работает нормально…

Гы.

--
Regards, LVT.

with ToolButton5, ClientToScreen(Point(0, Height)) do DropdownMenu.Popup(X, Y);

Ок, завтра проверю. О результатах доложу.

Как проеделить координаты для DropDownMenu у ToolButton? Найти похожие ветки